Проблемы с установленной программой

[Спартак]

Доброго времени суток!
Подскажите, может кто знает в чем проблема...
Есть программа, написанная на дельфи. Она использует картинки, которые хранятся в подпапке Resourses (картинки подгружаются в Image).
С помощью программы InnoSetup сделал установщик, но возникла проблема. Досустим, что программа установилась в C:\MyProgram. Так если запускать ее из этой папки -все нормально, а если запускать ее с ярпыка на рабочем столе или через меню Пуск - говорит, что картинки не найдены.
В чем проблема?

[_Engine_]

Проблема в том, что в твоей программе при определении пути к папке с картинками нужно использовать такой способ:
ExtractFilePath(ParamStr(0))
а ты скорее всего пользуешь такой способ:
GetDir / GetCurrentDir

Угадал?

[_Engine_]

Кстати, можешь еще в свойствах ярлыка прописать "правильную" рабочую папку. Тогда в программе можешь пока ничего не править.

[Спартак]

Сообщение от _Engine_

Проблема в том, что в твоей программе при определении пути к папке с картинками нужно использовать такой способ:
ExtractFilePath(ParamStr(0))
а ты скорее всего пользуешь такой способ:
GetDir / GetCurrentDir

Угадал?

ага.. я потом прочитал про ParamStr(0) но как представил, сколько всего править надо - аж страшно стало ))

Сообщение от _Engine_

Кстати, можешь еще в свойствах ярлыка прописать "правильную" рабочую папку. Тогда в программе можешь пока ничего не править.

что значит правильная рабочая папка?? напиши кнкретно где прописывать

[woo]

что значит правильная рабочая папка?? напиши кнкретно где прописывать

В свойствах ярлыка. Должна совпадать с папкой, где лежит приграмма.

[Спартак]

Сообщение от woo

В свойствах ярлыка. Должна совпадать с папкой, где лежит приграмма.

а как путь может не совпадать, если программа все-таки запускается? она пытается работать, но постоянно выдает ошибку... если программа установлена в c:\Program, то картинки находятся в c:\Program\Resourses. И это действительно так... НО!!! когда я запускаю с раб. стола мне говорят, что невозможно найти файл c:\Program\Resourses\Resourses\pic1 .bmp!!!!
Почему он Resourses 2 раза пишет??

[zetrix]

Потому что вы ошиблись при написании программы. На расстоянии ваш код не видим. Либо выкладывайте, либо ищите ошибку сами.

[Спартак]

Сообщение от zetrix

Потому что вы ошиблись при написании программы. На расстоянии ваш код не видим. Либо выкладывайте, либо ищите ошибку сами.

ок!
Суть состоит в том, что имеется пара сотен лампочек и пара десятков кнопок. Все это счастье размещается на 6 форм. Надо сделать так, чтобы лампочки "зажигались" разным цветом в зависимости от нажатых кнопок.
В программе событие "зажечь лампочку" выглядит либо так:

Image1.Picture.LoadFromFile('Resour ses/pick1.bmp');

либо так:
Image1.Picture := Image2.Pictire

Т.е. файл pick1.bmp находится во вложенной подпапке. При запуске с ярлыка вылетает та самая ошибка, что не найден файл c:\Program\Resourses\Resourses\pick 1.bmp.


2_Engine_
понял, что именно ты имел ввиду... исправил - заработало... возник другой вопрос: как сделать так, чтобы эта рабочая папка прописывалась автоматом?

P.S. я не преувеличиваю, когда говорю о паре сотен лампочек ))) это реально так поэтому мне так страшно переделывать

[eoln]

Вот так можно

var Path: string;
...
Path := sysutils.ExtractFilePath(application.ExeName) + 'Resourses\';
Image1.Picture.LoadFromFile(PChar(Path + 'pick1.bmp'));

тогда и ярлык не при чём будет и работать должно