Open/Save диалог сбивает директорию программы

← →
oradb (2005-09-08 13:04) [0]

У меня в программе используются относительные пути. Например, "Images\MyFoto.bmp".
После выполнения OpenDialog.Execute() папка Images начинает искаться не в каталоге программы, а в папке выдранной в OpenDialog.
Как быть ?

← →
Signate © (2005-09-08 13:08) [1]

Писать абсолютные пути к файлам

например не так

$filename = "Images\MyFoto.bmp";

а так

$filename = ExtractFilePath(Application.ExeName) + "Images\MyFoto.bmp";

тогда $filename будет содержать что нибудь типа c:\delphi\fotoviewer\Images\MyFoto.bmp

← →
Lamer@fools.ua © (2005-09-08 13:12) [2]

>>Signate © (08.09.05 13:08) [1]

Смесь PHP с Object Pascal - это круто :o)

← →
Signate © (2005-09-08 13:15) [3]

Ох меня переклинило :)

← →
Makcim © (2005-09-08 14:06) [4]

Поставь в OpenDialog в Properties...Options...ofNoChengeDir = True !!! И будет всё ок !!!

> oradb (08.09.05 13:04)
- совет Makcim поможет, но не надолго. Достаточно какому нибудь юзеру покопаться в ярлыке и изменить рабочий каталог и все слетит. Лучше перейти на полные пути, как в совете Signate © (08.09.05 13:08) [1]
ЗЫ. Какой ник прикольный.

← →
kyro (2005-09-08 14:21) [6]

> ANB ©

Это самый елементарный выход и достатосно действенный, что б запороть его надо быть уникальным просто юзером !!! Конечно по полному пути к екзешнику будет больше гарантий, да и зделать это елементарно одной функцией !!!

Open/Save диалог сбивает директорию программы Найти похожие ветки