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

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

Текущий каталог, ярлык и справка. [D5, WinXP]

zsv ©   (2005-10-26 09:04:00) 

У меня такая ситуация: моя программа инсталлируется на компьютер и создается ярлык на Рабочем столе.
При запуске программы ярлыком, не находится файл справки (он ищется в текущем каталоге), т.к. текущим для ярлыка является Рабочий стол.
Прописывать конкретный путь к файлу справки в программе тоже не хочется, т.к. придется устанавливать программу тольк в определенную папку.
Как сдалать, чтобы программу можно было устанавливать в любое место файловой системы и чтобы она находила файл справки?

---

zsv   (2005-11-02 08:46:00) [1]

Ребята, я уже все сделал с помощью ExtractFilePath в приложении.
Кстати, написано об этом в справке Inno Setup.

Большое спасибо всем, особенно КиТаЯц.

---

КиТаЯц   (2005-10-27 12:06:00) [2]

> zsv   (26.10.05 16:00) [5]


Name: "{group}\Program ZSVReg OnTheWeb"; Filename: "{app}\ZSVReg.url"
Name: "{group}\UninstallProgram ZSVReg"; Filename: "{uninstallexe}"
Name: "{userdesktop}\ZSVReg"; Filename: "{app}\ZSVReg.exe"; Tasks: desktopicon

[INI]
Filename: "{app}\ZSVReg.url";Section: "InternetShortcut"; Key: "URL"; String: " http://www.ZSVReg.ru";

[Tasks]
Name: "desktopicon"; Description: "Иконка на рабочем столе"; GroupDescription: "Дополнительные иконки:"; MinVersion: 4,4


Ps/ Если опять не получится - кидай скрипт на мыло. Будет время - подправлю.

---

SpellCaster   (2005-10-27 11:46:00) [3]

ExtractFilePath(Application.ExeName)
получает директорию экзешника вне зависимости от того, запущен он через ярлык или непосредственно.

---

zsv   (2005-10-26 16:00:00) [4]

Работает, если я убираю строки:

Name: "{group}\{cm:ProgramOnTheWeb,ZSVReg}"; Filename: "{app}\ZSVReg.url"
Name: "{group}\{cm:UninstallProgram,ZSVReg}"; Filename: "{uninstallexe}"
Name: "{userdesktop}\ZSVReg"; Filename: "{app}\ZSVReg.exe"; Tasks: desktopicon

Как их оставить?

---

КиТаЯц   (2005-10-26 15:39:00) [5]

> zsv   (26.10.05 15:35) [3]

Кусочек скрипта для InnoSetup:
[Components]
Name: "main";    Description: "Файлы программы «Супер-пупер»";                          Types: full compact custom; Flags: fixed
Name: "help";    Description: "Файл справки"; Types: full custom;


---

zsv   (2005-10-26 15:35:00) [6]

Скрипт не работает. Inno 5.1.5 ругается на слово "Components".

---

КиТаЯц   (2005-10-26 10:06:00) [7]

Кусочек скрипта для InnoSetup: [Icons]
Name: "{group}\Супер-пуперская прога"; Filename: "{app}\MyProg.exe";   WorkingDir: "{app}";Comment:"Супер-пуперская прога которая может все"; Components: main;
Name: "{group}\Справка по программе";  Filename: "{app}\Help.chm"; WorkingDir: "{app}"; Comment:"Справка в формате *.CHM";             Components: help;


---

stone   (2005-10-26 09:42:00) [8]

В инсталяторе при установке свойств ярлыка указывай также рабочую папку [INSTALLDIR] или как там ее твой инсталлятор обзывает.

---

Наверх