Hallo Ihr, habe Problem mit Remotedesktop

[Lord_Mont]

Hier zu meinem Problem:

Wollte nen Programm schreiben, mit dem ich eine Remotedesktopverbindung öffnen kann.
Mit shellexecute funktioniert es ja nicht.

Hier mein Delphicode:

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
      shellexecute(Handle,'open','Remotedesktop.rdp',nil,nil,SW_SHOWNORMAL);
end;

Hat jemand ne Lösung, bin noch blutiger Anfänger

Mfg

[edit=MrSpock]Hallo Lord_Mont. Herzlich willkommen im Delphi-PRAXiS Forum. Für Delphi Code kannst du besser die Delphi-Code Tags benutzen. Habe ich hier schon mal eingefügt. Mfg, MrSpock[/edit]

[SirThornberry]

welchen Wert gibt ShellExecute zurück? liegt die "Remotedesktop.rdp" auch im Arbeitsverzeichnis?

[Die Muhkuh]

Ich hab das Gefühl, du hast die Unit ShellApi nicht eingebunden :)

[Lord_Mont]

Also danke erstmal für eure Hilfe,
die Unit ShellAPI hab ich schon mit eingebunden und ich bekomme keinen Wert, also funktionier überhaupt nicht, da Klick ich auf den Button und nichts passiert. Und die Verknüpfung lieg mit im Arbeitsverzeichnis.

Habe das Problem soeben gelöst mit:

Delphi-Quellcode:

  shellexecute(Handle, 'open','mstsc.exe','/v:servername.de',nil,SW_SHOWNORMAL);

[mirage228]

Hi,

Schreib Doch mal:

Delphi-Quellcode:

  if shellexecute(Handle,'open','Remotedesktop.rdp',nil,nil,SW_SHOWNORMAL) <= 32 then
    RaiseLastOsError;

Dann gibt Delphi Dir den Fehler aus, der aufgetreten ist.

mfG
mirage228