140 lines
2.7 KiB
Plaintext
140 lines
2.7 KiB
Plaintext
object MainForm: TMainForm
|
|
Left = 200
|
|
Top = 116
|
|
Width = 846
|
|
Height = 661
|
|
Caption = 'UserData in TImageEnVect demo'
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object ImageEnVect1: TImageEnVect
|
|
Left = 0
|
|
Top = 0
|
|
Width = 648
|
|
Height = 627
|
|
ParentCtl3D = False
|
|
ImageEnVersion = '4.0.0'
|
|
EnableInteractionHints = True
|
|
Align = alClient
|
|
TabOrder = 0
|
|
OnNewObject = ImageEnVect1NewObject
|
|
OnObjectOver = ImageEnVect1ObjectOver
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 648
|
|
Top = 0
|
|
Width = 190
|
|
Height = 627
|
|
Align = alRight
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object SpeedButton1: TSpeedButton
|
|
Left = 16
|
|
Top = 72
|
|
Width = 49
|
|
Height = 25
|
|
AllowAllUp = True
|
|
GroupIndex = 1
|
|
Caption = 'Add'
|
|
OnClick = SpeedButton1Click
|
|
end
|
|
object GroupBox1: TGroupBox
|
|
Left = 16
|
|
Top = 104
|
|
Width = 161
|
|
Height = 105
|
|
Caption = ' Object info '
|
|
TabOrder = 0
|
|
object Label1: TLabel
|
|
Left = 14
|
|
Top = 45
|
|
Width = 27
|
|
Height = 13
|
|
Caption = 'Text1'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 14
|
|
Top = 75
|
|
Width = 27
|
|
Height = 13
|
|
Caption = 'Text2'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 11
|
|
Top = 20
|
|
Width = 135
|
|
Height = 13
|
|
Caption = 'Save text with added object:'
|
|
end
|
|
object Edit1: TEdit
|
|
Left = 53
|
|
Top = 41
|
|
Width = 100
|
|
Height = 21
|
|
TabOrder = 0
|
|
end
|
|
object Edit2: TEdit
|
|
Left = 53
|
|
Top = 71
|
|
Width = 100
|
|
Height = 21
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object Button1: TButton
|
|
Left = 16
|
|
Top = 16
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Open'
|
|
TabOrder = 1
|
|
OnClick = Button1Click
|
|
end
|
|
object Button2: TButton
|
|
Left = 96
|
|
Top = 16
|
|
Width = 75
|
|
Height = 25
|
|
Caption = 'Save'
|
|
TabOrder = 2
|
|
OnClick = Button2Click
|
|
end
|
|
object ComboBox1: TComboBox
|
|
Left = 72
|
|
Top = 74
|
|
Width = 105
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
TabOrder = 3
|
|
OnChange = SpeedButton1Click
|
|
Items.Strings = (
|
|
'Line'
|
|
'Box'
|
|
'Ellipse'
|
|
'Image'
|
|
'Text'
|
|
'Ruler'
|
|
'Polyline'
|
|
'Angle'
|
|
'Memo')
|
|
end
|
|
end
|
|
object OpenDialog1: TOpenDialog
|
|
Left = 66
|
|
Top = 105
|
|
end
|
|
object SaveDialog1: TSaveDialog
|
|
Left = 106
|
|
Top = 105
|
|
end
|
|
end
|