Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#11

Re: Mit F1 PDF-Datei aufrufen

  Alt 29. Jun 2008, 14:02
Zitat von juergen:
müsste man diesen Hotkey nicht regitrieren?
Der gezeigte Code-Schnipsel ist unschön.
Die Fehlermeldung kommt wahrscheinlich daher, dass die VCL versucht die PDF-Datei als Hilfe-Datei zu laden.
Und da PDF <> HLP gibt es die Fehlermeldung obwohl mit dem ShellExecute die PDF-Datei wahrscheinlich angezeigt wird.

Besser ist es, das Event Application.OnHelp zu benützen.
Delphi-Quellcode:
// ungetestet
function TForm1.HelpHandler(Command: Word; Data: Longint; var CallHelp: Boolean): Boolean;
begin
  Result := ShellExecute(Application.handle, 'open', PChar(Application.HelpFile), nil, nil, sw_ShowNormal) < 32;
  CallHelp := False; // VCL sagen, dass Aufruf der Hilfedatei nicht mehr nötig ist
end;

procedure TForm1.FormCreate(..);
begin
  Application.OnHelp := HelpHandler; // Hilfe umbiegen
end;
  Mit Zitat antworten Zitat