Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Не работает FileExists!!! [D6, Win95/98, WinME, NT4, Win2k, WinXP]


Ganzer ©   (2002-04-30 19:35:00) 

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

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

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

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

спасибо


VID   (2002-05-01 15:38:00) [1]

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

TO Anatoliy Podgoretskiy:

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


:)))


Ganzer   (2002-05-01 11:10:00) [2]

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


Malder   (2002-05-01 11:08:00) [3]

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

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

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

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


Anatoly Podgoretsky   (2002-05-01 09:57:00) [4]

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


Aleks1   (2002-05-01 02:30:00) [5]

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


Aleks1   (2002-05-01 02:14:00) [6]

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


VID   (2002-05-01 01:33:00) [7]

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


Vovchik   (2002-04-30 23:33:00) [8]

> Ganzer

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


Anatoly Podgoretsky   (2002-04-30 22:46:00) [9]

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


VID   (2002-04-30 22:26:00) [10]

SOLVE:

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

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


Vovchik   (2002-04-30 20:14:00) [11]

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

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


Ganzer   (2002-04-30 20:06:00) [12]

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

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

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

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


MBo   (2002-04-30 19:45:00) [13]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо