Цитата:
|
Сообщение от Nikkore
Так я же привел код в самом первом посте:
Код:
Application.HelpCommand(HELP_FINDER, 0); |
Попробуй не HELP_FINDER, а HELP_CONTENTS.
Хотя у меня с таким кодом проблем, вроде, небыло:
Код:
procedure TMainForm.Help1Click(Sender: TObject);
begin
Application.HelpFile := ChangeFileExt(Application.ExeName,'.hlp');
Application.HelpCommand(HELP_FINDER,0);
end;