101 lines
2.0 KiB
Plaintext
101 lines
2.0 KiB
Plaintext
object Form1: TForm1
|
|
Left = 0
|
|
Top = 0
|
|
Caption = 'TAdvInputTaskDialog demo'
|
|
ClientHeight = 225
|
|
ClientWidth = 406
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = False
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Label1: TLabel
|
|
Left = 264
|
|
Top = 22
|
|
Width = 91
|
|
Height = 13
|
|
Caption = 'Preset input value:'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 264
|
|
Top = 103
|
|
Width = 34
|
|
Height = 13
|
|
Caption = 'Result:'
|
|
end
|
|
object RadioGroup1: TRadioGroup
|
|
Left = 16
|
|
Top = 16
|
|
Width = 233
|
|
Height = 161
|
|
Caption = 'Select input control'
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Edit'
|
|
'Combo editor'
|
|
'Combo list'
|
|
'Memo'
|
|
'Date picker'
|
|
'Custom control (spin editor)')
|
|
TabOrder = 0
|
|
end
|
|
object Button1: TButton
|
|
Left = 264
|
|
Top = 72
|
|
Width = 121
|
|
Height = 25
|
|
Caption = 'Show inputdialog'
|
|
TabOrder = 1
|
|
OnClick = Button1Click
|
|
end
|
|
object Edit1: TEdit
|
|
Left = 264
|
|
Top = 45
|
|
Width = 121
|
|
Height = 21
|
|
TabOrder = 2
|
|
Text = 'preset'
|
|
end
|
|
object Edit2: TEdit
|
|
Left = 264
|
|
Top = 122
|
|
Width = 121
|
|
Height = 21
|
|
TabOrder = 3
|
|
end
|
|
object SpinEdit1: TSpinEdit
|
|
Left = 16
|
|
Top = 195
|
|
Width = 121
|
|
Height = 22
|
|
MaxValue = 0
|
|
MinValue = 0
|
|
TabOrder = 4
|
|
Value = 0
|
|
Visible = False
|
|
end
|
|
object AdvInputTaskDialog1: TAdvInputTaskDialog
|
|
CommonButtons = []
|
|
DefaultButton = 0
|
|
Icon = tiInformation
|
|
InputType = itEdit
|
|
InputItems.Strings = (
|
|
'BMW'
|
|
'Audi'
|
|
'Mercedes'
|
|
'Porsche'
|
|
'VW'
|
|
'Ferrari')
|
|
Title = 'Windows Vista Input dialog'
|
|
Content = 'Enter value here'
|
|
OnDialogInputSetText = AdvInputTaskDialog1DialogInputSetText
|
|
OnDialogInputGetText = AdvInputTaskDialog1DialogInputGetText
|
|
Left = 352
|
|
Top = 152
|
|
end
|
|
end
|