Ярлык программы

[Washington]

Завершил прогу, записал на диск, авторан, анау-мынау.
Но столкнулся с такой проблемой:
Устанавливаю прогу, создаётся ярлык на рабочем столе. А прога использует базу данных. В строке подключение компонента ADOConnection висит адрес Base.mdb. Получается, если запускать прогу из корневого каталога, то всё ОК. А если через ярлычки, то она пытается найти Base.mdb на рабочем столе. Но её там нет, как ни верти. Чо делать, а?

[Nemesisking]

Как на мое мнение это бред какой-то, не мог ли ты кинуть файл exe на рабочий стол, либо ярлык без указаного пути к exe?!

[dron-s]

в строке подлючения определять путь к файлу через ExtractFilePath(ParamStr(0))

[Сильванович Михаил]

При создании ярлыка программой-установщиком указывается рабочая
дериктория, если рабочая дериктория - та, в которой лежит Base.mdb, то
программа будет видить его.

[dron-s]

чем сздаёшь инсталляционный пакет?

[Трофимов Александр]

Дело втом что ты запускаешь в дирректории рабочего стола.
Попробуй сначала определить какой рабочий каталог (GetCurrentDir - если не ошибаюсь). Можно также принудительно указать рабочий каталог, но щас не помню оператора (по моему CurrentDir:='...'.

[Washington]

Юзаю прогу InnoSetup. А насчёт рабочей директории - я же её не буду знать, пользователь сам её выбирает.

[Fainder]

Делаешь глобальную переменную path : string;
В событии FormCreate главной формы пишешь
path := extractfilepath(application.exename );
Теперь Path - путь к твоей проге. Отсюда и пляши, т.е. если файл данных в той же папке, то path + 'filename.dbf';

[Washington]

Появилась такая идея - Base.mdb кинуть в Windows'овскую папку. Вопрос только в том, как узнать адрес Windows'овской паки. Она ведь не обязательно в C:\\Windows?

[Umen]

путь к папке виндовса содержится в переменной %windir%

например:

path := '%windir%\base.mdb';