Ein neuer Beitrag, wo es doch offensichtlich immer noch mit dem WebBrowser und dem TabSheet zu tun hat?
Zitat von
jAcK oRsEn:
ok, habs jetzt...aber wie genau kann ich es jetzt schaffen das er mir oben im tabsheet die
url anzeigt....
Ich habe ein altes Projekt von mir gefunden (zumindest die
PAS-Datei ist noch da), in dem ich beim WebBrowser auf das Ereignis "OnBeforeNav" reagiere. Und dort wird der
URL dann angezeigt:
Delphi-Quellcode:
procedure TXplorForm.BeforeNav(Sender: TObject;
const pDisp: IDispatch;
var URL: OleVariant;
var Flags: OleVariant;
var TargetFrameName: OleVariant;
var PostData: OleVariant;
var Headers: OleVariant;
var Cancel: WordBool);
begin
PageControl1.ActivePage.Caption :=
URL;
end;
Ach so: Dieses Delphi-Projekt hatte die gleiche Aufgabe wie deine Frage - neue Seiten in einem eigenen TabSheet öffnen.
Zitat:
und wie mache ich das mit der Enter Taste, das es für alle Webbrowser wirkt...und z.B. auch mit der Tab taste!
Was willst du mit Enter und Tab machen?