Накатал маленькую консольную програмку. Выдает список файлов в файл.
Просто может кому интересно как искать файлы, писать в файл или выводить в консоль.
Размер EXE: ~48 Кб. (Не упакованный)
А все из-за того что нечем было снять список файлов в папке. ( Карт Counter-Strike ).

Это сообщение отредактировал(а) Delphins - 4.9.2005, 19:30

Присоединённый файл ( Кол-во скачиваний: 15 )
 list.zip 29,96 Kb

Delphins

Цитата

А все из-за того что нечем было снять список файлов в папке. ( Карт Counter-Strike ).

Нечем снять? Если не в консоли, то попробуй вот так :

Код

s:= 'c:\windows\*.ini'; ListBox1.Perform(LB_DIR,0,Integer(s));  //  получим список всех файлов *.ini

Для консолки findfirst/findnext - в WinAPI другого нет.

Ну и до кучи:

Код

s := 'c:\list1.txt' ListBox1.Items.SaveToFile(s);

Чтобы список получить в файле.
Может тоже кому пригодится.

В сумме 4 (2) строчки. Кто меньше?

cmd.exe dir /B *.ini > list.txt

Ну и че?
ListBox В каком модуле находится? Скоко размер EXE будет?
Темболее самому написать это намного интереснее. Темболее там подключен тока SysUtils модуль!!!
Теперь вот думаю мож чего еще прикрутить интересного....

Delphins
Если интересно, тогда конечно ой. В общем-то все через такое проходят. Некоторые даже операционки пишут. Если честно, я тоже чуть не начал когда-то.
А чтобы еще интереснее было, подкину кое-что:

Код

function BuildFileList(const Path: string; const Attr: Integer; const List: TStrings): Boolean;

(с) Project JEDI Code Library (JCL)
http://projectjedi.sourceforge.net/
И там такого 3.2 Мб зазипованного, а с JVCL - 9 Мб.
Чтобы посмотреть, что есть и придумать что-нибудь новенькое. Например не просто список файлов, а список с атрибутами (размер, флаги, даты, ...) в массив. Не помню, есть там такое или нет. И если при этом не забыть, что файл может быть > 2 Гб, так совсем даже приятная штучка получится. Тогда я ее у тебя с удовольствием утащу.


z-END
А в Win9x это работать разве будет?
IMHO нет. Так что добавь распознавание ОС .
Чтобы полностью эквивалентно было.

Цитата(SergeBS @ 6.9.2005, 09:30)

А в Win9x это работать разве будет?

вместо CMD.exe используй command.com и все у тебя будет

OK. Будет время ченить напишу.
Блин как забодала эта школа... Каждый день уроки.... (

~FoX~

Цитата

вместо CMD.exe используй command.com и все у тебя будет

Дык и я об том . У меня 2 строки для любой Винды. Исправлять ничего не надо. А у тебя - 2 и выбор нужной. Больше .