Вывести список файлов из папки, в имени которой есть побел

← →
Lola © (2004-11-17 12:58) [0]

или имя на кириллице. Т.е. когда полный маршрут к файлу указывается в комычках.
Пробовала присобачить ковычки в FindFirst, но тогда результат выдает ошибку с кодом 123.
Как в эту тривиальную процедуру приспособить эти нетривиальные, но так всеми юзерами любимые маршруты?

← →
Lola © (2004-11-17 13:07) [1]

В принципе не надо уже :)) Главное в листинг список выводит. Там ковычки и проставлю.
Извините за беспокойство :)

← →
Игорь Шевченко © (2004-11-17 13:43) [2]

procedure TForm1.Button1Click(Sender: TObject); var S: string; F: TSearchRec; begin ListBox1.Items.Clear; S := "C:\Program Files\*.*"; if FindFirst (S, faAnyFile, F) <> 0 then RaiseLastWin32Error; try ListBox1.Items.Add (F.Name); while FindNext(F) = 0 do begin ListBox1.Items.Add(F.Name); end; finally FindClose(F); end; end;

> Игорь Шевченко © (17.11.04 13:43) [2]

Нет-нет, Игорь, спасибо :) Процедура у меня уже есть, и давно все работает. Только вот сейчас понадобился маршрут с пробелом. А меня почему-то заклинило, что это надо самой процедуре менять. Глюк, одним словом!

Вывести список файлов из папки, в имени которой есть побел Найти похожие ветки