Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Информационный Канал Subscribe.Ru

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 316
от 06.12.2005, 16:36

Администратор:Калашников О.А.
В рассылке:Подписчиков: 254, Экспертов: 48
В номере:Вопросов: 2, Ответов: 6


Вопрос № 30573: Извините пожалуйста! Я новичек в програмировании DELPHI, можно кто то выслать на мыло или дать в рассылку пример прогу каторая открывает какую ту папку и визуализирует ее скажем в какое то окно 'edit', а потом при помошти мыши даееть право маркир...
Вопрос № 30584: Вопрос: У меня на компьютере стоит Denver (PHP, MySql и др). Недавно мне понадобилось управлять своей MySQl базой на localhost по совету эксперта Jadd поставил ODBC administrator for Mysql. Теперь довольно резво работаю с базой через ADO....

Вопрос № 30.573
Извините пожалуйста!
Я новичек в програмировании DELPHI, можно кто то выслать на мыло или дать в рассылку пример прогу каторая открывает какую ту папку и визуализирует ее скажем в какое то окно 'edit', а потом при помошти мыши даееть право маркировать и выбрать файл из папку . Мое мыло
trusev@neochim.bg
Отправлен: 01.12.2005, 12:25
Вопрос задал: Tancho (статус: Практикант)
Всего ответов: 5
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: sir henry
Здравствуйте, Tancho!
Именно чтобы в 'Edit'? Наверное Вы неправильно выразили свою мысль. Edit - это однострочный компонент для ввода текста. Наверное Вам нужно переформулировать вопрос, а то бестолковщина какая-то получается.
Если не обращать внимание на это Ваше 'edit', то открыть папку можно так:
ShellExecute(0, 'open', 'Путь_к_папке', NIL, NIL, SW_SHOW);
Если нужно выбрать файл, допустим чтобы занести его содержимое в Мемо, то можно воспользоваться компонентом OpenDialog:
If OpenDialog1.Execute Then
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
При этом открывается окно выбора файла, где Вы можете выбрать один или несколько файлов и переходить туда-сюда по папкам.
Ответ отправил: sir henry (статус: Академик)
Отправлен: 01.12.2005, 12:39

Отвечает: Golden Spider
Здравствуйте, Tancho!
Мне не совсем ясен ваш вопрос.
Edit не позволит вам вставить в него больше 1 стороки.
Но возможно вы хотите просто видель на каком-то компоненте все файлы?
Тогда зачем изобретать велосипед на вкладке win 3.1 уже всё готово.
Возьмите компоненты Tdirectorylistbox и Tfilelistbox и всё :)
Смотри пример.
Если не разберешся шли на мыло (goldenSpider@mail.ru).

Приложение:

---------
Знания ничто! Хорошие знания Всё!

Ответ отправил: Golden Spider (статус: 2-ой класс)
Отправлен: 01.12.2005, 14:57

Отвечает: Schmak
Здравствуйте, Tancho!
Не совсем ясен вопрос, но всё же попробую ответить.
1) Если Вам необходимо просто отбразить содержимое папки, то для этого достаточно вспользоваться ср-вами системы? следующая команда открывает для просмотра диск C:
ShellExecute(0, 'open', 'C:', NIL, NIL, SW_SHOW);

2) Если же Вам надо открывать папки в своей программе, то для этого можно сделать следующее:
а) Кинуть компоненты TShellTreeView, TShellComboBox, TShellListView
б) В свойтсвах этих компонентов ShellTreeView, ShellComboBox, ShellListView (у каждого 2 несовпадающих с собстенным названием) выбрать названия других 2-ух компонентов.
в) Программа готова к работе.

---------
Не всё то Windows, что висит!
Ответ отправил: Schmak (статус: Студент)
Отправлен: 01.12.2005, 16:53

Отвечает: Ataman N. N.
Здравствуйте, Tancho!
В Delphi во вкладке Win...(точно не помню) есть компоненты для выбора папок, дисков:
TFileListBox, TDirComboBox, и т.д.
В Delphi 7 во вкладке Samples есть компоненты TShellTreeView, TShellListView.
Я думаю - это, то что вам нужно.
Ответ отправил: Ataman N. N. (статус: 3-ий класс)
Отправлен: 01.12.2005, 17:51

Отвечает: Bochvarov NikB
Здравствуйте, Tancho!
Да, можно сказать, что новичок в Windows. Тьи видел где-то в Edit ставлят списки файлов? Обьично кладут их в спсики (List) или дерево (Tree) и ето так не толко в Windows :)
Ответ отправил: Bochvarov NikB (статус: 4-ый класс)
Отправлен: 01.12.2005, 18:36


Вопрос № 30.584
Вопрос:
У меня на компьютере стоит Denver (PHP, MySql и др).
Недавно мне понадобилось управлять своей MySQl базой на localhost
по совету эксперта Jadd поставил ODBC administrator for Mysql. Теперь довольно резво работаю с базой через ADO. Но теперь мне требуется создавать источники данных (они доступны через odbc administrato->системный DNS) программно. Пробовал через BDE, но создаются только Databases которым можно назначать уже готовые источники.
Кто нибудь знает как их программно создавать?
Отправлен: 01.12.2005, 16:06
Вопрос задал: Golden Spider (статус: 2-ой класс)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Jadd
Здравствуйте, Golden Spider!
Да. Пардон, что сам не ответил, закрутился. На Torry.net есть компонент mODBC. Посомтри его, там все ясно. Просто, чесное слово, не успеваю все делать - 3 проекта нужно делать, а времени 0. Удачи и пиши, если что не ясно.
---------
Если в сердце дверь закрыта, нужно в печень постучаться
Ответ отправил: Jadd (статус: Специалист)
Отправлен: 01.12.2005, 17:51


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2005, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Яндекс Rambler's Top100 hotlog_js="1.0"; hotlog_r=""+Math.random()+"&s=314124&im=101&r="+escape(document.referrer)+"&pg="+ escape(window.location.href); document.cookie="hotlog=1; path=/"; hotlog_r+="&c="+(document.cookie?"Y":"N"); hotlog_js="1.1";hotlog_r+="&j="+(navigator.javaEnabled()?"Y":"N") hotlog_js="1.2"; hotlog_r+="&wh="+screen.width+'x'+screen.height+"&px="+ (((navigator.appName.substring(0,3)=="Mic"))? screen.colorDepth:screen.pixelDepth) hotlog_js="1.3" hotlog_r+="&js="+hotlog_js; document.write("HotLog")

Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.delphiplus
Архив рассылки
Отписаться
Вспомнить пароль

В избранное