Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
17. Jun 2007
Hallo,
mir scheint, dass Garfield die Variable href an einer Stelle (global) deklariert hat, auf die er auch außerhalb seines event handlers noch zugreifen kann.
Grüße vom marabu
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
7. Apr 2006
Ich ging davon aus, dass Garfield mit der Maus auf einen Link zeigen möchte und diesen über ein eigenes Kontextmenü "In neuem Fenster öffnen" will.
marabu
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
7. Apr 2006
Aus meinem Testcode:
function TDemoForm.WebBrowserShowContextMenu(const dwID: Cardinal;
const ppt: PPoint; const pcmdtReserved: IInterface;
const pdispReserved: IDispatch): HRESULT;
var
e: IHTMLElement;
href: String;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
6. Apr 2006
Ein möglicher Ansatz wäre:
uses
Variants,
StrUtils,
MSHTML;
function ExtractLink(e: IHTMLElement): String;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by marabu,
5. Apr 2006
Herzlich willkommen in der Delphi-PRAXiS, Garfield.
Dein Wunsch lässt sich besonders leicht umsetzen, wenn du statt des WebBrowsers die erweiterte Komponente EmbeddedWebBrowser verwendest. Diese kennt bereits das Ereignis OnShowContextMenu() als published property. Der event handler bekommt das Interface IDispatch des Elements unter der Maus als letzten Parameter übergeben. Etwas aufwendiger...