266 lines
5.8 KiB
Plaintext
266 lines
5.8 KiB
Plaintext
object fResize: TfResize
|
|
Left = 121
|
|
Top = 143
|
|
ActiveControl = UpDown1
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsDialog
|
|
Caption = 'Resize'
|
|
ClientHeight = 334
|
|
ClientWidth = 642
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
OldCreateOrder = True
|
|
Position = poMainFormCenter
|
|
OnActivate = FormActivate
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object Label4: TLabel
|
|
Left = 16
|
|
Top = 12
|
|
Width = 36
|
|
Height = 13
|
|
Caption = 'Original'
|
|
end
|
|
object Label5: TLabel
|
|
Left = 290
|
|
Top = 10
|
|
Width = 30
|
|
Height = 13
|
|
Caption = 'Result'
|
|
end
|
|
object SpeedButtonLockPreview: TSpeedButton
|
|
Left = 562
|
|
Top = 118
|
|
Width = 23
|
|
Height = 22
|
|
Hint = 'Lock Preview'
|
|
AllowAllUp = True
|
|
GroupIndex = 1
|
|
Glyph.Data = {
|
|
76010000424D7601000000000000760000002800000020000000100000000100
|
|
0400000000000001000000000000000000001000000010000000000000000000
|
|
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
|
|
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000003
|
|
333333333F777773FF333333008888800333333377333F3773F3333077870787
|
|
7033333733337F33373F3308888707888803337F33337F33337F330777880887
|
|
7703337F33337FF3337F3308888000888803337F333777F3337F330777700077
|
|
7703337F33377733337FB3088888888888033373FFFFFFFFFF733B3000000000
|
|
0033333777777777773333BBBB3333080333333333F3337F7F33BBBB707BB308
|
|
03333333373F337F7F3333BB08033308033333337F7F337F7F333B3B08033308
|
|
033333337F73FF737F33B33B778000877333333373F777337333333B30888880
|
|
33333333373FFFF73333333B3300000333333333337777733333}
|
|
NumGlyphs = 2
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object Button1: TButton
|
|
Left = 562
|
|
Top = 28
|
|
Width = 69
|
|
Height = 25
|
|
Caption = 'OK'
|
|
Default = True
|
|
ModalResult = 1
|
|
TabOrder = 0
|
|
end
|
|
object Button2: TButton
|
|
Left = 562
|
|
Top = 58
|
|
Width = 69
|
|
Height = 25
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
ModalResult = 2
|
|
TabOrder = 1
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
Left = 288
|
|
Top = 232
|
|
Width = 165
|
|
Height = 67
|
|
Caption = 'Filter'
|
|
TabOrder = 2
|
|
object Label3: TLabel
|
|
Left = 10
|
|
Top = 19
|
|
Width = 24
|
|
Height = 13
|
|
Caption = 'Filter'
|
|
end
|
|
object ComboBox1: TComboBox
|
|
Left = 9
|
|
Top = 33
|
|
Width = 146
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
TabOrder = 0
|
|
OnChange = ComboBox1Change
|
|
Items.Strings = (
|
|
'None'
|
|
'Triangle'
|
|
'Hermite'
|
|
'Bell'
|
|
'BSpline'
|
|
'Lanczos3'
|
|
'Mitchell')
|
|
end
|
|
end
|
|
object GroupBox3: TGroupBox
|
|
Left = 14
|
|
Top = 232
|
|
Width = 265
|
|
Height = 89
|
|
Caption = 'Size'
|
|
TabOrder = 3
|
|
object Label1: TLabel
|
|
Left = 12
|
|
Top = 20
|
|
Width = 66
|
|
Height = 13
|
|
Caption = 'Width (pixels)'
|
|
end
|
|
object Label2: TLabel
|
|
Left = 12
|
|
Top = 46
|
|
Width = 69
|
|
Height = 13
|
|
Caption = 'Height (pixels)'
|
|
end
|
|
object Edit1: TEdit
|
|
Left = 94
|
|
Top = 16
|
|
Width = 63
|
|
Height = 21
|
|
TabOrder = 0
|
|
Text = '1'
|
|
OnChange = Edit1Change
|
|
end
|
|
object Edit2: TEdit
|
|
Left = 94
|
|
Top = 42
|
|
Width = 63
|
|
Height = 21
|
|
TabOrder = 1
|
|
Text = '1'
|
|
OnChange = Edit2Change
|
|
end
|
|
object UpDown1: TUpDown
|
|
Left = 157
|
|
Top = 16
|
|
Width = 15
|
|
Height = 22
|
|
Associate = Edit1
|
|
Min = 1
|
|
Max = 32767
|
|
Increment = 10
|
|
Position = 1
|
|
TabOrder = 2
|
|
OnMouseUp = UpDown1MouseUp
|
|
end
|
|
object UpDown2: TUpDown
|
|
Left = 157
|
|
Top = 42
|
|
Width = 15
|
|
Height = 22
|
|
Associate = Edit2
|
|
Min = 1
|
|
Max = 32767
|
|
Increment = 10
|
|
Position = 1
|
|
TabOrder = 3
|
|
OnMouseUp = UpDown2MouseUp
|
|
end
|
|
object ResetBtn: TButton
|
|
Left = 184
|
|
Top = 14
|
|
Width = 65
|
|
Height = 25
|
|
Caption = 'Reset'
|
|
TabOrder = 4
|
|
OnClick = ResetBtnClick
|
|
end
|
|
object CheckBox1: TCheckBox
|
|
Left = 10
|
|
Top = 69
|
|
Width = 145
|
|
Height = 17
|
|
Caption = 'Maintain aspect ratio'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
object ImageEnView1: TImageEnView
|
|
Left = 14
|
|
Top = 28
|
|
Width = 263
|
|
Height = 200
|
|
Background = clWhite
|
|
ParentCtl3D = False
|
|
ScrollBars = ssNone
|
|
AutoFit = True
|
|
BackgroundStyle = iebsChessboard
|
|
OnZoomIn = ImageEnView1ZoomIn
|
|
OnZoomOut = ImageEnView1ZoomOut
|
|
ImageEnVersion = '4.0.0'
|
|
EnableInteractionHints = True
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 4
|
|
OnMouseDown = ImageEnView1MouseDown
|
|
OnMouseMove = ImageEnView1MouseMove
|
|
end
|
|
object ImageEnView2: TImageEnView
|
|
Left = 290
|
|
Top = 28
|
|
Width = 263
|
|
Height = 200
|
|
Background = clWhite
|
|
ParentCtl3D = False
|
|
ScrollBars = ssNone
|
|
AutoFit = True
|
|
BackgroundStyle = iebsChessboard
|
|
OnZoomIn = ImageEnView2ZoomIn
|
|
OnZoomOut = ImageEnView2ZoomOut
|
|
ImageEnVersion = '4.0.0'
|
|
EnableInteractionHints = True
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 5
|
|
OnMouseDown = ImageEnView2MouseDown
|
|
OnMouseMove = ImageEnView2MouseMove
|
|
end
|
|
object PeviewButton: TButton
|
|
Left = 562
|
|
Top = 88
|
|
Width = 69
|
|
Height = 25
|
|
Caption = 'Preview'
|
|
TabOrder = 6
|
|
OnClick = PeviewButtonClick
|
|
end
|
|
object ViewRadioGroup: TRadioGroup
|
|
Left = 462
|
|
Top = 233
|
|
Width = 141
|
|
Height = 53
|
|
Hint = 'View'
|
|
Caption = 'View'
|
|
ItemIndex = 1
|
|
Items.Strings = (
|
|
'Zoom'
|
|
'Auto Fit')
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 7
|
|
OnClick = ViewRadioGroupClick
|
|
end
|
|
end
|