Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

dir [D6, Win95/98, WinXP]

kima © (2002-08-05 18:30:00)
Не знаю много ли этот вопрос спрашивался
но как узнать имена файлов в директории
и положить их в array of string?

Dimka Maslov (2002-08-07 12:30:00) [1]
http://delphibase.endimus.com/?action=viewfunc&topic=fileops&id=10046

Song (2002-08-06 11:29:00) [2]
>А чем TStringList не нравится?
Да нравится, просто нужно ещё цикл с TSearchRec делать.

zavdim (2002-08-06 11:15:00) [3]
2Song

А чем TStringList не нравится?

Song (2002-08-06 08:41:00) [4]
>>и положить их в array of string?
Самый лёгкий array of String: TListBox+LB_DIR

zavdim (2002-08-06 08:36:00) [5]
var Source: string;
sr: TSearchRec;
FileAttrs: Integer;
Files : TStringList;
begin
Files := TStringList.Create;
FileAttrs :=faAnyFile;
Source:= YorsDirectory+"\";
if FindFirst(Source+"*.*", FileAttrs, sr) = 0 then
begin
repeat
Files.Add(sr.Name)
until FindNext(sr) <> 0
end;
//---
//А тут чего надо то и делай
//--
end;

kima (2002-08-05 20:17:00) [6]
спасибо щас буду разбираться

Странный Прохожий (2002-08-05 18:35:00) [7]
См. FAQ или

FindFirstFile() -- FindNextFile() -- CloseHandle() Win32 API

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »