Показать сообщение отдельно

  #313  
Старый 24.07.2007, 15:16
W!z@rD
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме:
1892597

Репутация: 836


Отправить сообщение для W!z@rD с помощью ICQ
По умолчанию

Цитата:
Сообщение от mari00  
Эээ чет вы тут начали лаяться=\, ну да ладно, вот такой вопрос как организовать поиск определенного файла по имени или части имени.Какие компоненты использовать?И можно ли обойтись без Апи функций и процедур?
Компоненты? ну вот тебе webfile.ru/1477726 (6кб)
простой думаю разберешься...
ун а если руками-то:

button1.click

var sr:TSearchRec;
begin
//ищем... папка c:\windows; по расширению exe; все файлы (скрытые, системные, и т.д.) кроме папок
//если функция возр-т 0, то что-то найденно...
if FindFirst('c:\windows\*.exe', faAnyFile-faDirectory,sr)=0 then
try
repeat
ListBox1.Items.Add(ExtractFileName(sr.Name));
//добавляем имя найденного файла в listbox
until FindNext(sr)<>0;
finally
//освобождаем ресурсы
FindClose(sr);
end;
end;

вот и все... собственно говоря...
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
 
Ответить с цитированием