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

Вниз

Вопросец   Найти похожие ветки 

 
grab3 ©   (2003-01-10 13:17) [0]

Скажите пожалуйста, как мне найти имена с неким расширением в нужной директории и добавить их в StringList.


 
F1 ©   (2003-01-10 13:29) [1]

FindFirst.. FindNext!!!


 
Anatoly Podgoretsky ©   (2003-01-10 13:33) [2]

Не прошло и полгода, как ты возвратился (вопрос про FindFirst)


 
grab3 ©   (2003-01-10 14:00) [3]

var ff:_WIN32_FIND_DATA;
var nf:_WIN32_FIND_DATA;
var firsts:cardinal;
begin
firsts:=findfirstfile("c:\*.*",ff);
listbox1.Items.Add(ff.cFileName);

while findnextfile(firsts,nf) do
findnextfile(firsts,nf);
listbox1.Items.Add (nf.cFileName);
end;

Вот смотрите! Он при таком раскладе находит только два файла, что неверно?


 
MBo ©   (2003-01-10 14:02) [4]

после do поставь begin ;)


 
grab3 ©   (2003-01-10 14:09) [5]

Тьфу ты! Надо бы спать почаще... :-)))



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

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

Наверх




Память: 0.47 MB
Время: 0.019 c
14-62731
Ag2002
2002-12-27 17:53
2003.01.20
Компоненты RXLIB


1-62478
Pavliner
2003-01-10 01:21
2003.01.20
Подскажите please новичку как свернуть прогу в SysTray?


1-62569
Амангос
2003-01-11 14:23
2003.01.20
Запуск программы


14-62801
Anatoly Podgoretsky
2003-01-01 01:25
2003.01.20
С Новым Годом


14-62831
Nimda
2002-12-26 07:53
2003.01.20
Matrix