195 lines
3.9 KiB
Plaintext
195 lines
3.9 KiB
Plaintext
|
|
object Form1: TForm1
|
||
|
|
Left = 386
|
||
|
|
Top = 230
|
||
|
|
Width = 398
|
||
|
|
Height = 370
|
||
|
|
Caption = 'CreateProcAsUser Demo'
|
||
|
|
Color = clBtnFace
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = []
|
||
|
|
OldCreateOrder = False
|
||
|
|
PixelsPerInch = 96
|
||
|
|
TextHeight = 13
|
||
|
|
object Label1: TLabel
|
||
|
|
Left = 8
|
||
|
|
Top = 8
|
||
|
|
Width = 47
|
||
|
|
Height = 13
|
||
|
|
Caption = 'Domain:'
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label2: TLabel
|
||
|
|
Left = 136
|
||
|
|
Top = 8
|
||
|
|
Width = 61
|
||
|
|
Height = 13
|
||
|
|
Caption = 'Username:'
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label3: TLabel
|
||
|
|
Left = 264
|
||
|
|
Top = 8
|
||
|
|
Width = 59
|
||
|
|
Height = 13
|
||
|
|
Caption = 'Password:'
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label4: TLabel
|
||
|
|
Left = 8
|
||
|
|
Top = 52
|
||
|
|
Width = 83
|
||
|
|
Height = 13
|
||
|
|
Caption = 'Command line:'
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object Label5: TLabel
|
||
|
|
Left = 8
|
||
|
|
Top = 104
|
||
|
|
Width = 75
|
||
|
|
Height = 13
|
||
|
|
Caption = 'Environment:'
|
||
|
|
Font.Charset = DEFAULT_CHARSET
|
||
|
|
Font.Color = clWindowText
|
||
|
|
Font.Height = -11
|
||
|
|
Font.Name = 'MS Sans Serif'
|
||
|
|
Font.Style = [fsBold]
|
||
|
|
ParentFont = False
|
||
|
|
end
|
||
|
|
object edtDomain: TEdit
|
||
|
|
Left = 8
|
||
|
|
Top = 24
|
||
|
|
Width = 121
|
||
|
|
Height = 21
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object edtUserName: TEdit
|
||
|
|
Left = 136
|
||
|
|
Top = 24
|
||
|
|
Width = 121
|
||
|
|
Height = 21
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
object edtPassword: TEdit
|
||
|
|
Left = 264
|
||
|
|
Top = 24
|
||
|
|
Width = 121
|
||
|
|
Height = 21
|
||
|
|
TabOrder = 2
|
||
|
|
end
|
||
|
|
object edtCommandLine: TEdit
|
||
|
|
Left = 8
|
||
|
|
Top = 68
|
||
|
|
Width = 377
|
||
|
|
Height = 21
|
||
|
|
TabOrder = 3
|
||
|
|
end
|
||
|
|
object btnCreateProcAsUser: TButton
|
||
|
|
Left = 8
|
||
|
|
Top = 312
|
||
|
|
Width = 129
|
||
|
|
Height = 25
|
||
|
|
Caption = 'Create Process As User'
|
||
|
|
Default = True
|
||
|
|
TabOrder = 4
|
||
|
|
OnClick = btnCreateProcAsUserClick
|
||
|
|
end
|
||
|
|
object btnCreateProcAsUserEx: TButton
|
||
|
|
Left = 148
|
||
|
|
Top = 312
|
||
|
|
Width = 145
|
||
|
|
Height = 25
|
||
|
|
Caption = 'Create Process As User Ex'
|
||
|
|
TabOrder = 5
|
||
|
|
OnClick = btnCreateProcAsUserExClick
|
||
|
|
end
|
||
|
|
object lbEnvironment: TListBox
|
||
|
|
Left = 8
|
||
|
|
Top = 120
|
||
|
|
Width = 193
|
||
|
|
Height = 141
|
||
|
|
ItemHeight = 13
|
||
|
|
TabOrder = 6
|
||
|
|
end
|
||
|
|
object edtEnvString: TEdit
|
||
|
|
Left = 216
|
||
|
|
Top = 120
|
||
|
|
Width = 165
|
||
|
|
Height = 21
|
||
|
|
TabOrder = 7
|
||
|
|
end
|
||
|
|
object btnAddEnvString: TButton
|
||
|
|
Left = 216
|
||
|
|
Top = 148
|
||
|
|
Width = 75
|
||
|
|
Height = 25
|
||
|
|
Caption = 'Add'
|
||
|
|
TabOrder = 8
|
||
|
|
OnClick = btnAddEnvStringClick
|
||
|
|
end
|
||
|
|
object btnRemoveEnvString: TButton
|
||
|
|
Left = 216
|
||
|
|
Top = 176
|
||
|
|
Width = 75
|
||
|
|
Height = 25
|
||
|
|
Caption = 'Remove'
|
||
|
|
TabOrder = 9
|
||
|
|
OnClick = btnRemoveEnvStringClick
|
||
|
|
end
|
||
|
|
object btnClearEnvStrings: TButton
|
||
|
|
Left = 216
|
||
|
|
Top = 204
|
||
|
|
Width = 75
|
||
|
|
Height = 25
|
||
|
|
Caption = 'Clear'
|
||
|
|
TabOrder = 10
|
||
|
|
OnClick = btnClearEnvStringsClick
|
||
|
|
end
|
||
|
|
object chkEnvAdditional: TCheckBox
|
||
|
|
Left = 216
|
||
|
|
Top = 236
|
||
|
|
Width = 97
|
||
|
|
Height = 17
|
||
|
|
Caption = 'Additional'
|
||
|
|
TabOrder = 11
|
||
|
|
end
|
||
|
|
object chkEnvCurrentUser: TCheckBox
|
||
|
|
Left = 216
|
||
|
|
Top = 256
|
||
|
|
Width = 97
|
||
|
|
Height = 17
|
||
|
|
Caption = 'Current User'
|
||
|
|
TabOrder = 12
|
||
|
|
end
|
||
|
|
object chkEnvLocalMachine: TCheckBox
|
||
|
|
Left = 216
|
||
|
|
Top = 276
|
||
|
|
Width = 97
|
||
|
|
Height = 17
|
||
|
|
Caption = 'Local Machine'
|
||
|
|
TabOrder = 13
|
||
|
|
end
|
||
|
|
end
|