HTML-Link erstellen unter Delphi

[B5MTS]

Hallo,

wie kann ich unter Delphi einen HTML-Link mit einbinden, so daß ich ihn beim Mausklick im Web-Browser öffnen kann.
Ich konnte nichts dazu finden, währe euch sehr dankbar für die Hilfe

Viele Grüße
B5MTS

[Stanlay Hanks]

Hi. Du kannst dazu ShellExecute aus der Unit ShellAPI benutzen. Als Dateiname kannst du einfach die Internetadresse angeben. Dann wird der Link mit dem Standardbrowser geöffnet. Zu Shellexecute findest du sehr viele Beispiele in der DP.

Man liest sich, Stanlay :hi:

[nailor]

dplinklabel

[Spasskeks]

Moin.

Das ist gar net so schwer. Du nimmst z.B. ein Label und in die On-Click Procedure schreibste folgendes rein:

Delphi-Quellcode:

ShellExecute(Application.Handle, 'open', PChar('http://deinlink.de'), nil, nil, SW_ShowNormal);

und bei Uses noch kurz

Delphi-Quellcode:

Shellapi

hinzufügen und schon wird die URL im Standartbrowser angezeigt.

MFG Henrik 8)

[Cuchulainn]

Kann man das auch so machen, dass die Seite automatisch in einem neuen Fenster geöffnet wird und nicht in einem schon bestehenden?
Ich habe mir zum Beispiel ein Programm geschrieben, dass auf Knopfdruck Google öffnet. Jetzt habe ich zum Beispiel die Seite Delphipraxis im Internet Explorer geöffnet. Wenn ich auf die Schaltfläche klicke, wird Google wzar geöffnet, aber in demselben Fenster, in dem auch Delphipraxis ist. Die Seite will ich aber weiterhin behalten. Google soll in einem neuen Fenster geöffnet werden.

[Spasskeks]

Hm, das ist ne gute Frage :?: Wüsste da im Moment aber leider auch keine Antwort drauf... Würd mich aber auch brennend interessieren :spin2:

[Chewie]

Wenn der IE der Standardbrowser ist, dann hilft es, opennew anstelle von open bei ShellExecute anzugeben. Inwiefern dies aber andere Browser unterstützen, weiß ich nicht.

[moritz]

Hallo,
OpenNew geht nur mit dem IE, nicht mit Mozilla, Opera & Co.

Gruß, Onz

[Markus K.]

Hallo,
ich weiß nicht ob es euch etwas hilft, aber mit folgender Funktion wird eine Seite bei mir immer in einem neuen Fenster geöffnet.

Delphi-Quellcode:

ShellExecute(0, 'Open',PChar('IEXPLORE.EXE'),'http://web.de', nil, SW_ShowNormal);

Hatte dies aber bisher nur mit dem Internet Explorer versucht. Web.de ist dabei nur ein Beispiel für eine Seite.

Tschüß Markus

[raven_22]

Hallo Leute !

Ich wolle mal mit Delphi einen Ordner öffnen, hatte es aber nie hinbekommen. :roll:
Doch dank des Postings hier, geht es nun endlich. :thuimb:
Vielen Dank ! :hello:


Gruß raven 8)

Delphi-Quellcode:

...
{$R *.dfm}
uses Shellapi;
...

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0, 'Open',PChar('EXPLORER.EXE'),'C:\WINDOWS\Cursors', nil, SW_ShowNormal);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(0, 'Open',PChar('C:\Programme\WinTV\WinTV2K.EXE'),'-nc', nil, SW_ShowNormal);
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
ShellExecute(0, 'Open',PChar('C:\Programme\opera75\opera.exe'),'www.giga.de', nil, SW_ShowNormal);
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
ShellExecute(0, 'Open',PChar('IEXPLORE.EXE'),'www.microsoft.com/germany', nil, SW_ShowNormal);
end;