Når jeg bruger min Goforward funktion på min TWebbrowser og der intet er at forwarde til crasher den ... se dette er der jo engentligt ikke noget underligt i men hvordan kan der laves en spæringt i delphi så det ikke sker ....
i VB Ville jeg nok have laver noget i stil mend
On Error Goto A
Webbrowser.GoForward;
A:
Hvordan laves en sådan sikring i delphi :?
Mvh Skov
www.xcc.dk
skov@xcc.dk
Msn : xcc2@hotmail.com
Du burde kunne gøre sådan her:
procedure TForm1.WebBrowser1CommandStateChange(Sender: TObject;
Command: Integer; Enable: WordBool);
begin
case Command of
CSC_NAVIGATEBACK: ButtonGoBack.Enabled := Enable;
CSC_NAVIGATEFORWARD: ButtonGoForward.Enabled := Enable;
end;
end;
Altså hvor ButtonGoForward og ButtonGoBack er navnet på dine frem og tilbage knapper (og husk at sætte begge til enabled = false fra starten af).
Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------