This commit is contained in:
Jonathan Dionne 2020-06-26 06:30:22 -04:00 committed by GitHub
commit 90f9d592e2
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 3 additions and 2 deletions

View File

@ -17,11 +17,12 @@ object Frm: TFrm
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object RDP: TMsRdpClient2
object RDP: TMsRdpClient2NotSafeForScripting
Left = 0
Top = 0
Width = 640
Height = 480
Align = alClient
TabOrder = 0
OnDisconnected = RDPDisconnected
ControlData = {0003000008000200000000000B0000000B000000}

View File

@ -24,7 +24,7 @@ uses
type
TFrm = class(TForm)
RDP: TMsRdpClient2;
RDP: TMsRdpClient2NotSafeForScripting;
procedure RDPDisconnected(ASender: TObject; discReason: Integer);
procedure FormCreate(Sender: TObject);
private