Delphi EmbeddedWB soll offline bleiben

Thema durchsuchen

Ansicht

Themen-Optionen

EmbeddedWB soll offline bleiben

Ein Thema von vergessen · begonnen am 21. Sep 2010 · letzter Beitrag vom 22. Sep 2010

Vorheriger Beitrag

Nächster Beitrag

vergessen

Registriert seit: 29. Jun 2010
85 Beiträge

Delphi 5 Professional

AW: EmbeddedWB soll offline bleiben

22. Sep 2010, 17:57

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TFormBrowser.BrowserBeforeNavigate2(Sender: TObject;

  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,

  Headers: OleVariant; var Cancel: WordBool);

begin

if pos('http://',URL) <> 0 then

   begin

   Cancel := true;

   URL := '';

   TargetFrameName := '';

   MessageBox(Handle,'Mist','Mist',mb_Ok or mb_DefButton1);

   end;

end;