113 lines
2.2 KiB
Plaintext
113 lines
2.2 KiB
Plaintext
object Form1: TForm1
|
|
Left = 200
|
|
Top = 124
|
|
Caption = 'MagicWand to Polygon Demo - www.ImageEn.com'
|
|
ClientHeight = 617
|
|
ClientWidth = 936
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Panel1: TPanel
|
|
Left = 751
|
|
Top = 0
|
|
Width = 185
|
|
Height = 617
|
|
Align = alRight
|
|
BevelOuter = bvNone
|
|
TabOrder = 0
|
|
object Label1: TLabel
|
|
Left = 16
|
|
Top = 61
|
|
Width = 98
|
|
Height = 13
|
|
Caption = 'Click on the image...'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 16
|
|
Top = 101
|
|
Width = 62
|
|
Height = 13
|
|
Caption = 'Coordinates:'
|
|
end
|
|
object Label3: TLabel
|
|
Left = 16
|
|
Top = 389
|
|
Width = 38
|
|
Height = 13
|
|
Caption = 'Utilities:'
|
|
end
|
|
object Memo1: TMemo
|
|
Left = 16
|
|
Top = 117
|
|
Width = 153
|
|
Height = 257
|
|
ScrollBars = ssBoth
|
|
TabOrder = 0
|
|
end
|
|
object Button1: TButton
|
|
Left = 15
|
|
Top = 411
|
|
Width = 98
|
|
Height = 25
|
|
Caption = 'Reduce Points To:'
|
|
TabOrder = 1
|
|
OnClick = Button1Click
|
|
end
|
|
object Edit1: TEdit
|
|
Left = 120
|
|
Top = 413
|
|
Width = 41
|
|
Height = 21
|
|
TabOrder = 2
|
|
Text = '100'
|
|
end
|
|
object UpDown1: TUpDown
|
|
Left = 161
|
|
Top = 413
|
|
Width = 16
|
|
Height = 21
|
|
Associate = Edit1
|
|
Min = 3
|
|
Max = 10000
|
|
Position = 100
|
|
TabOrder = 3
|
|
end
|
|
object Button2: TButton
|
|
Left = 16
|
|
Top = 453
|
|
Width = 161
|
|
Height = 25
|
|
Caption = 'Remove Jagged Edges'
|
|
TabOrder = 4
|
|
OnClick = Button2Click
|
|
end
|
|
object Button3: TButton
|
|
Left = 16
|
|
Top = 9
|
|
Width = 161
|
|
Height = 25
|
|
Caption = 'Load Image'
|
|
TabOrder = 5
|
|
OnClick = Button3Click
|
|
end
|
|
end
|
|
object ImageEnVect1: TImageEnVect
|
|
Left = 0
|
|
Top = 0
|
|
Width = 751
|
|
Height = 617
|
|
Background = clBtnFace
|
|
EnableInteractionHints = True
|
|
Align = alClient
|
|
TabOrder = 1
|
|
OnMouseDown = ImageEnVect1MouseDown
|
|
end
|
|
end
|