Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: CL | DM;

Вниз

Как вывести в TMemo содержимое определённой папки   Найти похожие ветки 

 
Volf_555   (2005-10-18 23:56) [0]

Есть папка E:\Files
Каким образом, не используя дополнительных компонентов, вывести содержимое этой папки?


 
Fay ©   (2005-10-19 00:02) [1]

2 Volf_555   (18.10.05 23:56)
FindFirst + F1


 
TStas ©   (2005-10-19 00:38) [2]

if FindFirst(Folder+"*.*", sr)<>0 then
repeat
Memo1.Lines.add(sr.Name)
until FindNext(sr)=0
FindClose(sr)


 
TStas ©   (2005-10-19 00:38) [3]

if FindFirst(Folder+"*.*", sr)<>0 then
repeat
Memo1.Lines.add(sr.Name)
until FindNext(sr)=0
FindClose(sr)


 
Германн ©   (2005-10-19 01:32) [4]

А так ли уж нужно именно TMemo?


 
Fay ©   (2005-10-19 01:49) [5]

2 Германн ©   (19.10.05 1:32) [4]
Это  намёк на ListBox/CombBox ? 8)


 
Германн ©   (2005-10-19 02:19) [6]

2 Fay ©   (19.10.05 01:49) [5]
Пока что это вопрос. А намёки будут потом, если...



Страницы: 1 вся ветка

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.052 c
14-1129270901
msguns
2005-10-14 10:21
2005.11.06
Мед


1-1129217187
navinavi
2005-10-13 19:26
2005.11.06
Экспорт даннфх из Stringgrid в Excel


3-1127721141
nikolas
2005-09-26 11:52
2005.11.06
Подстрока в Interbase


2-1129009737
Серг73
2005-10-11 09:48
2005.11.06
Помогите плз... Delphi7>ADO>Access


14-1129051858
Galiaf
2005-10-11 21:30
2005.11.06
Синий экран в Windows XP SP 2.