Скачать: CL | DM;

Задание справочного файла для приложения   Найти похожие ветки 

← →
SPeller ©   (2002-06-23 08:35) [0]

Всем добро времени суток! Чем Дельфи не нравится такой код:

st:=Extractfilepath(Application.Exename)+"MyHelp.hlp";
application.HelpFile:=st;

Кнопка запуска запуска приложения вообще гаснет и F9 не работает. Хотя если проект скомпилить на Ctrl+F9 то программа отлично работает. Чем можно дать понять Дельфям что всё хорошо работает?

---

← →
Юрий Зотов ©   (2002-06-23 09:02) [1]

Код вполне нормальный (правда, переменная St явно лишняя, но это не так важно). Похоже, программа все же запускается (поэтому и кнопка Run гаснет, и F9 не работает - ведь программа уже запущена).

Попробуйте убрать этот код совсем и просто прописать файл хелпа в опциях проекта.

---

← →
SPeller ©   (2002-06-23 09:23) [2]

Да, если прописать явно, например

application.HelpFile:="C:\MyHelp.hlp";

то всё будет нормально. А если заранее неизвестно где будет лежать файл справки или их надо будет менять, или ещё чего?

---

← →
Юрий Зотов ©   (2002-06-23 11:14) [3]

Пропишите без пути, просто имя файла. И кладите его в каталог самого Exe. Там WinHelp его и найдет.

---

← →
SPeller ©   (2002-06-23 14:09) [4]

Вот же блин Дельфя вредная... :)

---

← →
Роман Василенко ©   (2002-06-24 09:46) [5]

2SPeller: Не знаю, будешь ли смотреть этот форум...
На всякий случай, продублирую письмом.

Фишка вот в чем:

Например у тебя проект живет в каталоге:
c:\delphi5\projects\myprj\

Когда ты делаешь:

st:=Extractfilepath(Application.Exename)+"MyHelp.hlp";
application.HelpFile:=st;

у тебя получается c:\delphi5\projects\myprjMyHelp.hlp

Так что делай:
st:=Extractfilepath(Application.Exename)+"\MyHelp.hlp";

---

← →
SPeller ©   (2002-06-24 11:54) [6]

2 Роман Василенко © (24.06.02 09:46)
Так что делай:
st:=Extractfilepath(Application.Exename)+"\MyHelp.hlp";

И получится C:\Delphi5\Projects\MyPrj\\MyHelp.hlp

Extractfilepath(Application.Exename) вернёт C:\Delphi5\Projects\MyPrj \. В конце будет слэш!

---

← →
Роман Василенко ©   (2002-06-27 13:26) [7]

Ну, могу посоветовать еще вариант. Беспроигрышный.


st:=includetrailingbackslash(extractfilepath(application.exename))+"myhelp.hlp";


---

← →
Роман Василенко ©   (2002-06-27 13:29) [8]

Хотя, кажется в Д6 includetrailingbackslash заменено на что-то другое...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.008 c