Вниз
Скачать: CL | DM;

Как проверить путь на его наличие   Найти похожие ветки 

 
Silver_ ©   (2004-02-09 12:12) [0]

Вобшем в параметрах задается путь для сохранения некоего файла.
Но может быть ситуация когда этот самый путь недействителен (был на сервере и теперь недоступен,
удалена папка, ...) как проверить если путь безпрблемный.
можно типа
try
... попытка записи
except
on E: EInOutError do
... Юзверь Задай нормальныи путь ...
.............. А теперь вызываем заного эту процедуру ...............
end;

Но это не самый элегантный по моему способ.
Было б куда лучше If NormalPath(Path) then...


 
Игорь Шевченко ©   (2004-02-09 12:16) [1]

DirectoryExists


 
Димос ©   (2004-02-09 12:17) [2]

Или PathExists


 
Digitman ©   (2004-02-09 12:17) [3]

while True dotry
... попытка записи
break;
except
on E: EInOutError do
... Юзверь Задай нормальныи путь ...
end;

а If NormalPath(Path) ненадежен - сейчас он normal, а через доли секунды, когда выполнение дойдет до "попытка записи", может стать уже не-normal, и - вот тебе грабли..


 
Verg ©   (2004-02-09 12:19) [4]

uses FileCtrl;

function DirectoryExists(const Directory: string): Boolean;

Хм... А это чем не устраивает?


 
Silver_ ©   (2004-02-09 12:56) [5]


> DirectoryExists

Да не устроит просто в help-е искал не"Directory" а по другому потому и не нашел. А здесь быстро прошло :о) Сенькс


 
Digitman ©   (2004-02-09 13:00) [6]

поди искал по ключ.слову "Path" ?

"маршрут" и "директория" - весьма различающиеся сущности


 
Anatoly Podgoretsky ©   (2004-02-09 13:08) [7]

Нормальный путь (существующий) им возможность записи в него, это весьма разные вещи. Если нельзя записать, то путь не нормальный, но существующий. Но даже так, допустим все ОК, путь существует, записать туда можно, но все это верно только до момента записи, при том возможно на полпути это станет невозможно. Грохнули папку, администратор сменил права и т.д.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
14-53765
Goida
2004-01-27 16:55
2004.02.17
Почтовая программа на Delphi


3-53405
DimaF
2004-01-26 18:25
2004.02.17
BOOL Firebird 1.5


1-53508
Sam Stone
2004-02-05 21:23
2004.02.17
Перестановки


3-53431
Avreliy
2004-01-28 14:07
2004.02.17
Округление в FireBird


14-53750
SemFLY
2004-01-27 01:27
2004.02.17
Посоветуйте книжку(и) для изучения ОС семейства UNIX...




   Наверх