Форум: "Потрепаться";
Текущий архив: 2002.07.25;
Скачать: [xml.tar.bz2];
ВнизЗадание справочного файла для приложения Найти похожие ветки
← →
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 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.07.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c