HtmlHelp

← →
AlexTregubov (2003-06-20 16:08) [0]

//Обработчик Application.OnHelp

function TForm1.AppHelp(Command: Word; Data: Integer;
var CallHelp: Boolean): Boolean;
var
popup: THHPopUp;
begin
if Command=HELP_CONTEXTPOPUP then begin
with popup do begin
cbStruct:=SizeOf(popup);
hinst:=HInstance;
idString:=Data;
pszText:=PChar("");
pt:=Point(200,200);
clrForeground:=RGB(0,0,0);
clrBackground:=-1;
rcMargins:=Bounds(0,0,100,20);
pszFont:=PChar("Times New Roman, 10, , BOLD");
end;
HtmlHelp(GetDesktopWindow(),PChar("help.chm"),
HH_DISPLAY_TEXT_POPUP,Integer(@popup));

end;
CallHelp:=false;
end;

Почему-то контекстная справка (F1 на компоненте) не показывает мои топики. Вместо этого пишет, что справка по элементу отсутствует.
.chm создавал в HTML Help Workshop.
И еще, как сделать чтобы панелька с топиком показывалась рядом с элементом, а не в одном и том же месте.

← →
stone (2003-06-20 16:15) [1]

> Почему-то контекстная справка (F1 на компоненте) не показывает
> мои топики. Вместо этого пишет, что справка по элементу
> отсутствует.
> .chm создавал в HTML Help Workshop.

А ты контент-файл (содержание справки) создавал? А у элементов соответствющие HelpContext указывал?

← →
AlexTregubov (2003-06-20 16:24) [2]

Сделал все, как указано в справке по HTML Help Workshop.
.topic IDH_BUTTON1
Это первая кнопка, она мне очень нравится.

.topic IDH_CHECKBOX
Для этого чекбокса есть справка.

.topic IDH_LISTBOX
Это крутейший листбокс.

и

#define IDH_BUTTON1 1001
#define IDH_BUTTON2 1002
#define IDH_CHECKBOX 1003

все нормально скомпилировалось.
Контент есть, более того, справка из программы вызывается, только не работают топики (панелька появляется в одном и том же месте и текст всегда один)

← →
stone (2003-06-20 16:51) [3]

А BUTTON1.HelpType=htContext?

← →
AlexTregubov (2003-06-20 18:58) [4]

Немного не понял этой строчки.
Извините за тупость, но не могли бы объяснить.

HtmlHelp Найти похожие ветки