Как узнать имя файла?

← →
Иван (2008-05-07 09:54) [0]

Добрый день!

Есть папка в которой содержатся файлы с разными расширениями и с разными именами.
Как можно узнать имя файла по маске например dd*.d* (первого файла), а затем узнать имя следующего файла по этой же маске.

← →
Knight © (2008-05-07 09:57) [1]

FindFirst, FindNext, FindClose

← →
Иван (2008-05-07 09:59) [2]

Это для перехода по файлам. Впринципе понятно. А как узнать имя первого текущего файла по маске dd*.d*?

← →
Jeer © (2008-05-07 10:01) [3]

Например так
"dir /B /ON > out.txt"

Есть еще масса вариантов.

← →
Иван (2008-05-07 10:02) [4]

"dir /B /ON > out.txt"
Здесь же жостко имя файла задано.

← →
Jeer © (2008-05-07 10:02) [5]

> имя первого текущего файла

Задуматься над критерием "первость" ?

← →
Knight © (2008-05-07 10:02) [6]

Функции ищут по маске и возвращают TSearchRec в котором есть имя файла. Набери FindFirst и нажми F1 там пример есть...

← →
Reindeer Moss Eater © (2008-05-07 10:03) [7]

А как узнать имя первого текущего файла по маске dd*.d*?

А что такое "первый текущий файл"?
И где находится "второй текущий файл"?
И далеко ли они от последнего текущего и предпоследнего не текущего файлов?

← →
Иван (2008-05-07 10:03) [8]

Jeer, первый файл который будет найден по маске dd*.d* (имя файла по алфовиту)

← →
Jeer © (2008-05-07 10:04) [9]

> Иван (07.05.08 10:02) [4]

То есть включить моск не удалось ?
"dir /B /OE dd*.d* > out.txt"

← →
Jeer © (2008-05-07 10:07) [10]

> Иван (07.05.08 10:03) [8]

Еще раз включай думалку - что такое первый ?

Я тебе привел два варианта dir, один с сортировкой по имени, второй по расширению.
Как думаешь, первый файл в первом варианте каким будет во втором ?

← →
Иван (2008-05-07 10:07) [11]

А в какой функции это используется "dir /B /OE dd*.d* > out.txt" ?

← →
имя (2008-05-07 10:09) [12]

Удалено модератором

← →
Knight © (2008-05-07 10:11) [13]

> [11] Иван (07.05.08 10:07)

Это не функция.. это командная строка.

← →
Jeer © (2008-05-07 10:14) [14]

Вах..

Набрать в командной строке dir /?
Думать.
Думать над ShellExecute также.

← →
Knight © (2008-05-07 10:18) [15]

> [14] Jeer © (07.05.08 10:14)

А чё такие сложности с командной строкой?

> [2] Иван (07.05.08 09:59)

Пробегай по маске Findами... загоняй в TStringList и в конце сортируй, получишь список по алфавиту, делай с ним чё хошь.

← →
Jeer © (2008-05-07 10:19) [16]

> А чё такие сложности с командной строкой?

А пусть моск тренирует:)

← →
Иван (2008-05-07 10:28) [17]

А как Findamи пробежаться?

Бегом

Удалено модератором
Примечание: Флудить завязываем

> Knight © (07.05.08 10:33) [21]

Совсем ты парня запутал:)

sOutFile: string = "C:\D7\Projects\out.txt";
WinExec(PAnsiChar("cmd.exe /c dir /B /ON *.pas > " + sOutFile),0);
Sleep(500);
with TStringList.Create do begin
LoadFromFile(sOutFile);
ShowMessage(Text);
Free;
end;

← →
Иван (2008-05-07 11:01) [23]

Jeer, большое спасибо!

> [22] Jeer © (07.05.08 10:43)

Тоже нормально...
заодно поломает мозк над правами доступа (для записи в sOutFile) и ожиданием окончания работы процесса (задержки 500 может и не хватить)

%)

> задержки 500 может и не хватить

if (WinExec(PChar("cmd.exe /c dir /B /ON *.pas > " + sOutFile),0) > 31) then
with TStringList.Create do begin
LoadFromFile(sOutFile);
ShowMessage(Text);
Free;
end;

Как узнать имя файла? Найти похожие ветки