Plain HTML-Help in Delphi-App als Hilfe einbinden

[Delphi.Narium]

TApplicationEvent

OnHelp-Ereignis eine Routine zuweisen.

Dort CallHelp auf false setzen.

Entsprechend der Werte aus Command und/oder Data in der Routine die benötigte HTML-Seite auswählen und zur Anzeige bringen.

Grob sowas in der (ungetesteten) Art:

Delphi-Quellcode:

function TForm1.ApplicationEvents1Help(Command: Word; Data: Integer; var CallHelp: Boolean): Boolean;
var
  sHTMLFile : String;
begin
  CallHelp  := false;
  // Irgendeine Auswahl der erforderlichen Datei.
  // Z. B. über den, der aufrufenden Komponente zugewiesenen, HelpContext.
  sHTMLFile := Format('.\help\HelpContext_%.3d.html',[Data]);
  // Anzeige per ShellExecute
  // oder in 'nem anderen Werkzeug, das mit HTML umgehen kann.
  // TWebBrowser ...
  if FileExists(sHTMLFile) then 
    ShellExecute(0,Nil,'open',PChar(sHTMLFile),Nil,SW_Normal);
  if FileExists(sHTMLFile) then
    WebBrowser.Navigate(sHTLMFile);
end;