Merge ea376cc43c
into a5c64a4331
This commit is contained in:
commit
90f9d592e2
|
@ -17,11 +17,12 @@ object Frm: TFrm
|
||||||
OnCreate = FormCreate
|
OnCreate = FormCreate
|
||||||
PixelsPerInch = 96
|
PixelsPerInch = 96
|
||||||
TextHeight = 13
|
TextHeight = 13
|
||||||
object RDP: TMsRdpClient2
|
object RDP: TMsRdpClient2NotSafeForScripting
|
||||||
Left = 0
|
Left = 0
|
||||||
Top = 0
|
Top = 0
|
||||||
Width = 640
|
Width = 640
|
||||||
Height = 480
|
Height = 480
|
||||||
|
Align = alClient
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
OnDisconnected = RDPDisconnected
|
OnDisconnected = RDPDisconnected
|
||||||
ControlData = {0003000008000200000000000B0000000B000000}
|
ControlData = {0003000008000200000000000B0000000B000000}
|
||||||
|
|
|
@ -24,7 +24,7 @@ uses
|
||||||
|
|
||||||
type
|
type
|
||||||
TFrm = class(TForm)
|
TFrm = class(TForm)
|
||||||
RDP: TMsRdpClient2;
|
RDP: TMsRdpClient2NotSafeForScripting;
|
||||||
procedure RDPDisconnected(ASender: TObject; discReason: Integer);
|
procedure RDPDisconnected(ASender: TObject; discReason: Integer);
|
||||||
procedure FormCreate(Sender: TObject);
|
procedure FormCreate(Sender: TObject);
|
||||||
private
|
private
|
||||||
|
|
Loading…
Reference in New Issue