Remotedesktop

[SaFu]

Achso was ganz wichtig ist aber das hatte ich ja schon bereits geschrieben das ich die Remoteverbindung mit UltraVNC herstelle. Also nochmal kann ich den Prozzes nicht einfach beenden.

müsste hier das beendenden des UltraVNC Prozesses beenden. (Client)

Delphi-Quellcode:

rocedure TForm2.Button5Click(Sender: TObject);
var pt: TPoint;
begin
  if MessageDlgPos('Wollen sie sich wirklich Abmelden? ',mtInformation,[mbYes,mbNo],0,300,200) = mrYes then
    begin
      Form1.Show;
      Form2.Close;
       begin
          pt := Point( Width + 300, Top + 100);
          Mouse.CursorPos := ClientToScreen(pt)
        end;
     end;
 //Form8.Show;
end;