Не запускаются приложения,написанные в среде Delphi

[blazonic]

DIgorevich
Да, это самый простой выход, но чтобы не засорять папку с исполняемым файлом, я бы в этой папке создал папку Sounds и в неё поместил бы звуки. Часть пути бы снимал за счёт исполняемого файла с помощью функции ExtractFilePath, а часть добавлял бы константой типа «Sounds\Name.wav» и т.п. Т.о. можно обойтись без ini-файлов.

[ALKOrobot]

О,точно!
Спасибо!
У меня такая шняга для одного из медиаплэеров закреплена.
Щас попробую сделать инсталлятор.

[ALKOrobot]

Хм...странно...
При запуске через ярлык всё равно выбивает ошибку,а при непосредственном клике по .exe работает.
Хотя путь обращения ярлыка указан верно.

[DIgorevich]

Потому что при запуске по ярлыку, программа получает путь не тот, где она храниться, а тот, где находиться ярлык.

[ALKOrobot]

Но сообщение об ошибке то же,что и указано в посте #4
Никак не связанное с ярлыком.

[DIgorevich]

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

Но сообщение об ошибке то же,что и указано в посте #4
Никак не связанное с ярлыком.

Всё правильно. Программа ищет файлы рядом с ExtractFilePath но, при запуске с ярлыка, данная функция возвратит путь самого ярлыка.

[spamer]

На счет ярлыка, в функции которая создает ярлык, по идее вы должны работать с объектом типа:

IShellLink;

Так вот, необходимо ему установить директорию, где находится программа:

SetWorkingDirectory(PAnsiChar(GetCurrentDir));

Ну вот как-то так...

[ALKOrobot]

Ярлык создаётся InstallShield'ом

[blazonic]

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

Но сообщение об ошибке то же,что и указано в посте #4
Никак не связанное с ярлыком.

А какое именно вы имеете сообщение об ошибке в виду?
Если то, в котором говорится "...Данный файл не найден...", то, тогда подойдёт решение проблемы, указанное мною в посте:

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

DIgorevich
Да, это самый простой выход, но чтобы не засорять папку с исполняемым файлом, я бы в этой папке создал папку Sounds и в неё поместил бы звуки. Часть пути бы снимал за счёт исполняемого файла с помощью функции ExtractFilePath, а часть добавлял бы константой типа «Sounds\Name.wav» и т.п. Т.о. можно обойтись без ini-файлов.

Т.е. сделать пути к файлам звуков гибче по отношению к использованным вами компонентам MediaPlayer.

[lowercase]

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

На мой взгляд, ini-файлы и вовсе не нужны в данном случае. Достаточно прописать в MediaPlayer путь НЕ как (к примеру 'c:\my.mp3'), а просто ('my.mp3') и поместить файл в папку с программой. В этом случае программа будет искать файлы рядом с собой.

дополню ваш ответ
можно сделать тоже самое еще таким способом

fileName:=extractFilePath(paramStr(0))+'my.mp3';