Twebbrowser URL ändern

[bonanza]

hallo,

ich suche nach einer möglichkeit den Twebbrowser so anzupassen, dass er vor jedem link einen anderen hinzufügt.

z.b.: aus ebay.de => www.123.de\s.php?url=ebay.de

[Balu der Bär]

Moin,

wenn ich das richtig verstehe programmierst du einen Browser. Also musst du ja irgendwo in deinem Code

Delphi-Quellcode:

Webbrowser1.Navigate(url)

aufrufen. Was hindert dich daran einfach deine Weiterleitungsurl davor anzustellen?

Delphi-Quellcode:

Webbrowser1.Navigate('www.123.de\s.php?url=' + url);

Oder hab ich da was falsch verstanden? :gruebel:

[bonanza]

das problem ist ja, dass das immer passieren soll z.b. auch wenn ich in der aufgerufenenen seite wieder nen link öffne.

[marabu]

Hi,

den Vorspann kannst du leicht im event handler für OnBeforeNavigate2() erzeugen.

Grüße vom marabu

[bonanza]

und wie soll ich das da realisieren ?

[inherited]

Delphi-Quellcode:

procedure TForm11.WebBrowser1BeforeNavigate2(ASender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
  url:='www.123.de\s.php?url=' + url;
end;

SO etwa?

[bonanza]

funktioniert leider nicht...

ist es gewollt, dass da 2 mal URL steht, meinst du damit beides mal das selbe?

ich habs mal so ausprobiert aber da kommt ein access violiation error:

Delphi-Quellcode:

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
webbrowser1.Navigate('http://xxx.de/index.php?=' + url);
end;

woran könnte das liegen ?

[inherited]

Ja, das ist gewollt.
Pass auf: Angenommen die aufzurufende URL ist www.delphipraxis.net .
Dann wird, sobald man dort hinnavigieren möchte, die URL (welche www.delphipraxis,net ist) mit hilfe dieser zuweisung auf 'http://www.wasweissich.de/index.php?=' + die URL, also www.delphipraxis.net , gesetzt.

Ich empfehle dir zum besseren Delphiverständnis, ein paar Klasse tutorials, kann ich nur sehr empfehlen: www.dsdt.info

[bonanza]

danke erstmal!, allerdings funktioniert es nicht, die seiten werden weiterhin "normal" geöffnet und nicht an das script gesandt.