ShellExecute

[Christian18]

Abend,

ich habe ein Label auf meiner Form, wenn auf diesen geklickt wird, dann soll der Standard Browser sich öffnen und eine bestimmte Web Site aufgerufen werden. Das funktioniert aber leider nicht. Hier mein Code:

Delphi-Quellcode:

  ShellExecute(Application.Handle, 'Open', 'http://www.google.de', nil, nil, SW_SHOWNORMAL);

MFG Christian18

[CG2003]

Probier's mal so:

Delphi-Quellcode:

ShellExecute(Handle, 'open', 'http://www.google.de', nil, nil, SW_SHOW);

Bei mir funktioniert das hervorragend!

[jfheins]

Zitat:

Das funktioniert aber leider nicht.

Und jetzt bitte nochmal: WAS genau funktioniert nicht? / WIE äußert sich das?

Das wäre noch wichtig ;)

[Christian18]

Hi,

hatte ich auch schon probiert. Funktioniert aber leider auch nicht. Hat es was damit zu tun, das ich das ausführen will, wenn ich auf einen Label klicke??? Geht das nur wenn man einen Button Klickt??? Aber eigentlich sollte es egal sein.

MFG Christian18

[ichbins]

bei mir funzt dein Code super.

probier einfach mal aus ob der Code überhaupt ausgeführt wird, indem du ein

Delphi-Quellcode:

[...]
showmessage('code wird ausgeführt.');
[...]

einfügst.

[Christian18]

Zitat:

Zitat von jfheins

Zitat:

Das funktioniert aber leider nicht.

Und jetzt bitte nochmal: WAS genau funktioniert nicht? / WIE äußert sich das?

Das wäre noch wichtig ;)

es passiert nichts. keine fehlermeldung nichts.

[CG2003]

Zitat:

Zitat von Christian18

Hi,

hatte ich auch schon probiert. Funktioniert aber leider auch nicht. Hat es was damit zu tun, das ich das ausführen will, wenn ich auf einen Label klicke??? Geht das nur wenn man einen Button Klickt??? Aber eigentlich sollte es egal sein.

MFG Christian18

Von welchem Control her Du das aufrufst, ist relativ egal. Ich habe Deinen geposteten Aufrug soeben in meinem Delphi getestet. Und es funktioniert einwandfrei. Kann es sein, das das mit Deinen Browser-Einstellungen zusammen hängt?
Was heißt "geht nicht"? Wie äußert sich das Ganze?

[Matze]

Zitat:

Zitat von Christian18

hatte ich auch schon probiert. Funktioniert aber leider auch nicht. Hat es was damit zu tun, das ich das ausführen will, wenn ich auf einen Label klicke??? Geht das nur wenn man einen Button Klickt??? Aber eigentlich sollte es egal sein.

Das spielt keine Rolle.

Führe nach der Abfrage einmal

Delphi-Quellcode:

ShowMessage(SysErrorMessage(GetLastError));

aus, um den letzten Fehler anzeigen zu lassen. Evtl. bringt dies Aufschluss.

[Christian18]

Zitat:

Zitat von ichbins

bei mir funzt dein Code super.

probier einfach mal aus ob der Code überhaupt ausgeführt wird, indem du ein

Delphi-Quellcode:

[...]
showmessage('code wird ausgeführt.');
[...]

einfügst.

ja code wird ausgeführt

[CG2003]

Zitat:

Zitat von Christian18

ja code wird ausgeführt

Bitte mehr Input (Browser, Windows-Version, etc.). Eventuell ein bisschen Quellcode wäre nicht schlecht.