Twebbrowser link nicht öffnen

Eckesachs · Verfasst: Mi 09.07.08 21:12

Hallo,
ich habe eine Twebbrowserkomponente in der ich html-Text anzeige.
Wenn ich jetzt darin auf einen Link klicke ann wird e Seite in der Komponente geladen.
Ich hätte aber gern, dass der Link mit dem Standartbrowser angezeigt wird.
Könnte mir bitte jemand einen Tipp geben wie ich das lösen kann.

MfG
Eckesachs

jakobwenzel · Verfasst: Mi 09.07.08 21:35

So duerfte es funktionieren. Wahrscheinlich musst du aber noch ueberpruefen, ob die zu ladende Seite wirklich eine extern zu oeffnende Seite ist.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

procedure TForm1.HelpBrowserBeforeNavigate2(ASender: TObject;  
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,  
  Headers: OleVariant; var Cancel: WordBool);  
begin  
  cancel:=true;  
  ShellExecute(handle,'open',PChar(String(url)),nil,nil,SW_ShowNormal);  
end;

_________________
I thought what I'd do was, I'd pretend I was one of those deaf-mutes.

Eckesachs

Öffnen funktioniert jetzt schon mit dem Standardbrowser, aber nur wenn ich explizit sage, dass er Links mit dem Standardbrowser öffnen soll. Wie kann ich nun überprüfen ob der Link auf eine Lokales html-Datei oder auf eine Website verweist?

toms · Beiträge: 1099 Erhaltene Danke: 2

Hallo, mit FileExists() kannst du überprüfen, ob die Datei lokal existiert.
(evtl. zuvor Backslashes in Slashes umwandeln etc.)

Eckesachs · Verfasst: Sa 12.07.08 17:14

Vielen Dank, damit ist mein Problem jetzt gelöst.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme