Как правильно организовать работу в Delphi с протоколом RDP. Саму библиотеку предварительно установил и в работе использую компонент MSRdpClient21 - ниже его имя rdp. Вот мой код:
procedure TForm1.Button1Click(Sender: TObject);
begin
rdp.Server:=edit1.Text;
rdp.UserName:=edit2.Text;
rdp.AdvancedSettings3.ClearTextPassword:=edit3.Text; //в этой строке ошибка
rdp.DesktopHeight:= 600;
rdp.DesktopWidth:= 800;
rdp.Connect;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
rdp.Disconnect;
end;
Программа запускается, но при нажатии на кнопку Соединиться, выскакивает ошибка (см. выше)
Этот же вопрос задавал на других форумах, но так и не получил ответа. Может тут найдутся добрые люди.
h34r:
procedure TForm1.Button1Click(Sender: TObject);
begin
rdp.Server:=edit1.Text;
rdp.UserName:=edit2.Text;
rdp.AdvancedSettings3.ClearTextPassword:=edit3.Text; //в этой строке ошибка
rdp.DesktopHeight:= 600;
rdp.DesktopWidth:= 800;
rdp.Connect;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
rdp.Disconnect;
end;
Программа запускается, но при нажатии на кнопку Соединиться, выскакивает ошибка (см. выше)
Этот же вопрос задавал на других форумах, но так и не получил ответа. Может тут найдутся добрые люди.
h34r:
