Не работает FileExists!!!

← →
Ganzer (2002-04-30 19:35) [0]

В одном месте программы работает!
А в другом!!! нет ...

у меня друг тоже пишет на 6м делфи, у него такая же беда :(

я конечно могу написать свою функцию проверки наличия файла
не это будет неправильно

если мне кто нибудь обяснит в чем дело, буду оч.признателен.

спасибо

← →
MBo © (2002-04-30 19:45) [1]

код?
скорее всего, путаница с относ./абс. путем

← →
Ganzer (2002-04-30 20:06) [2]

S:=GetFilePath(Application.ExeName)+"файлкоторыйяпрверяю.ext";

так все функции работы с фалйлом( S) - работают.

т.е. я читаю его,запускаю и проч.

а FileExists говорит что его нет ... :(

← →
Vovchik © (2002-04-30 20:14) [3]

Во-первых, FileExists всю жизнь работала.
Во-вторых, ты хоть смотрел, что ты ей подсовываешь? Есть там "\" перед именем "файлкоторыйяпрверяю.ext"?

Действительно, нужно видеть весь текст, а не обрывок.

← →
VID © (2002-04-30 22:26) [4]

SOLVE:

S := IncludeTrailingBackslash(ExtractFilePath (Application.ExeName))+"файлкоторыйяпроверяю.ext";

должно работать.

← →
Anatoly Podgoretsky © (2002-04-30 22:46) [5]

ExtractFilePath уже включает заключительный слеш

← →
Vovchik © (2002-04-30 23:33) [6]

> Ganzer

Ты где-то наглючил и тебе никто не скажет где именно, пока ты не рассекретишь весь свой код.

← →
VID © (2002-05-01 01:33) [7]

TO Anatoly Podgoretskiy: В дни, Pentium 1600-1800Mhz, и ОЗУ 512МБ можно сказать : Бережённого бог бережёт :)))

← →
Aleks1 (2002-05-01 02:14) [8]

2 VID
А причем тут Пентиум или ОЗУ?

← →
Aleks1 (2002-05-01 02:30) [9]

Даже с учетом смайликов!

Ganzer, пиши вот так:

S:=ExtractFilePath(Application.ExeName)+"файлкоторыйяпрверяю.ext";

Потом уж пиши If FileExists(s) then Reset(F)...и т.д.

А чтобы проверить, можешь при каждом обращении к S просматривать ее сожержимое (по брекпоинту или перед Reset(s), Fileexists(S) пиши Showmessage(s) =)

← →
Ganzer (2002-05-01 11:10) [12]

Спасибо всем, разобрался, у меня в конце S пробел дописался :(

to aleks1: смайлики ты видать плохо учёл :)

TO Anatoliy Podgoretskiy:

> VID © (01.05.02 01:33)
> Конечно это не ошибка, а роскошь :-)

:)))

Не работает FileExists!!! Найти похожие ветки