RemoteApp starten, RDPSession

[DelTurbo]

Erst mal danke für die Antwort. Aber ich möchte ja nicht das Desktop sehen, sondern eine RemoteApp Starten.

Musst man da noch irgendwas erstellen damit RemoteProgram2 nicht Nil ist? Ich habe dazu leider nix gefunden.

[TiGü]

Ersetze mal TMsRdpClient7 mit der Klasse TMsRdpClient7NotSafeForScripting.
Da ist die Instanz der Property RemoteProgramm2 gültig.

Siehe auch: http://stackoverflow.com/a/17136171

[DelTurbo]

Vielen dank. "Unbekannter Fehler" kommt nun nicht mehr. Allerdings ist das Panel schwarz. Er startet das Programm nicht. Lasse ich die Zuweisung auf das Panel weg, passiert auch nichts.

Hier mein Code:

Delphi-Quellcode:

    rdp:=TMsRdpClient7NotSafeForScripting.Create(Self);
    rdp.Parent:=Panel1;
    rdp.SetBounds(0, 0, Panel1.Width, Panel1.Height);
    rdp.Server:='RAServer';
    rdp.UserName:='user';
    rdp.AdvancedSettings7.ClearTextPassword:='123456';
    rdp.RemoteProgram2.RemoteProgramMode:=True;
    rdp.RemoteProgram2.RemoteApplicationName:='FritzFax';
    rdp.RemoteProgram2.RemoteApplicationProgram:='||FritzFax';
    rdp.Connect;

Irgendwas ist wohl noch falsch. Das ||FritzFax habe ich aus der .rdp. Aber auch wenn ich die || weglasse klappt es leider nicht.
Hast du vielleicht noch eine Idee wie es klappen könnte?

Gruß und danke im Voraus

[himitsu]

Delphi-Quellcode:

rdp.RemoteProgram.RemoteProgramMode := True;
rdp.RemoteProgram2.RemoteApplicationName := 'Calculator';
rdp.RemoteProgram2.RemoteApplicationProgram := 'C:\Windows\System32\Calc.exe';

Das Programm "FritzFax" ist auf dem Remote-PC auch bekannt?
Wenn es nicht läuft/gestartet werden kann, dann kann man dieses Programm natürlich auch nicht sehn -> nichts = schwarz

[DelTurbo]

Ja, FritzFax ist bekannt. Ich habe das ja aus der .rpd Datei. Ich habe deine Änderung nun gerade getestet. Nun sehe ich das Hintergrundbild und sonst passiert nix weiter, leider.

Also eine RDPSession aufbauen scheint einfach zu sein, aber eine RemoteApp zu starten ist wohl nicht so einfach. Zumal die RemoteApp garnicht im Panel laufen soll. Ich denke mal man müsste bei rdp.Parent das Desktop angeben, oder?

[himitsu]

Wenn du die MSTSC.exe startest, dann hat die ihr Fenster und da drin wird der Remote-Desktop angezeigt.

Hier hast du ein Fenster und mußt darin oder in einer Unterkomponente (z.B. Panel) den Remote-Desktop anzeigen.

[DelTurbo]

Das ist im Moment nur zum Testen. Wie ich schon schrieb soll, wenn es mal klappt, die RemotApp "frei" sein.