Webbrowser GoBack

[taktaky]

Hallo

ich suche eine Möglichkeit den Code zu ändern, damit es keinen Error erscheint
Ich verwende diesen Code :

Delphi-Quellcode:

begin
  try
    WebBrowser1.GoBack;
  except
  end;
end;

Gibt es was besseres ?
Der Code soll die vorherige Seite aufrufen aber wenn keine Seite aufzurufen gibt,
dann soll gar nicht machen und nicht eine Meldung zeigen.

[mkinzler]

Delphi-Quellcode:

WebBrowser1.Silent := True;

[toms]

Zitat:

Zitat von mkinzler

Delphi-Quellcode:

WebBrowser1.Silent := True;

Silent wird so nicht wirken. Es wird trotzdem einen Fehler geben, wenn
try..except weggelassen wird.

Anstatt try..except kannst du auch im OnCommandStateChange die Zurück / Vorwärts Buttons
enablen / disablen, je nach Status

Delphi-Quellcode:

procedure TForm1.WebBrowserCommandStateChange(Sender: TObject; Command: Integer; Enable: WordBool); 
begin 
  case Command of 
    CSC_NAVIGATEFORWARD : btnForward.Enabled := Enable; 
    CSC_NAVIGATEBACK : btnBack.Enabled := Enable; 
  end; 
end;