152 lines
3.3 KiB
Plaintext
152 lines
3.3 KiB
Plaintext
object Form1: TForm1
|
|
Left = 133
|
|
Top = 140
|
|
Caption = 'Undo/Redo Demo - www.ImageEn.com'
|
|
ClientHeight = 818
|
|
ClientWidth = 1041
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Tahoma'
|
|
Font.Style = []
|
|
Menu = MainMenu1
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object ImageEnView1: TImageEnView
|
|
Left = 0
|
|
Top = 0
|
|
Width = 856
|
|
Height = 818
|
|
Background = clBtnFace
|
|
LegacyBitmap = False
|
|
ZoomFilter = rfFastLinear
|
|
OnImageChange = ImageEnView1ImageChange
|
|
MouseInteract = [miZoom, miSelect]
|
|
EnableInteractionHints = True
|
|
Align = alClient
|
|
TabOrder = 0
|
|
end
|
|
object pnlRight: TPanel
|
|
Left = 856
|
|
Top = 0
|
|
Width = 185
|
|
Height = 818
|
|
Align = alRight
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object lblUndoList: TLabel
|
|
Left = 8
|
|
Top = 4
|
|
Width = 48
|
|
Height = 13
|
|
Caption = 'Undo List:'
|
|
end
|
|
object lblRedoList: TLabel
|
|
Left = 8
|
|
Top = 404
|
|
Width = 48
|
|
Height = 13
|
|
Caption = 'Redo List:'
|
|
end
|
|
object lbxUndo: TListBox
|
|
Left = 8
|
|
Top = 23
|
|
Width = 167
|
|
Height = 354
|
|
ItemHeight = 13
|
|
TabOrder = 0
|
|
OnDblClick = lbxUndoDblClick
|
|
end
|
|
object lbxRedo: TListBox
|
|
Left = 8
|
|
Top = 423
|
|
Width = 167
|
|
Height = 354
|
|
ItemHeight = 13
|
|
TabOrder = 1
|
|
OnDblClick = lbxRedoDblClick
|
|
end
|
|
end
|
|
object MainMenu1: TMainMenu
|
|
Left = 66
|
|
Top = 50
|
|
object File1: TMenuItem
|
|
Caption = 'File'
|
|
object Open1: TMenuItem
|
|
Caption = 'Open...'
|
|
OnClick = Open1Click
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Exit1: TMenuItem
|
|
Caption = 'Exit'
|
|
OnClick = Exit1Click
|
|
end
|
|
end
|
|
object Edit1: TMenuItem
|
|
Caption = 'Edit'
|
|
object Undo1: TMenuItem
|
|
Caption = 'Undo'
|
|
OnClick = Undo1Click
|
|
end
|
|
object Redo1: TMenuItem
|
|
Caption = 'Redo'
|
|
OnClick = Redo1Click
|
|
end
|
|
end
|
|
object Effects1: TMenuItem
|
|
Caption = 'Effects'
|
|
object Negative1: TMenuItem
|
|
Caption = 'Negative'
|
|
OnClick = Negative1Click
|
|
end
|
|
object ConverttoGray1: TMenuItem
|
|
Caption = 'Convert to Gray'
|
|
OnClick = ConverttoGray1Click
|
|
end
|
|
object Equalize1: TMenuItem
|
|
Caption = 'Equalize'
|
|
OnClick = Equalize1Click
|
|
end
|
|
object ColorsandEffects1: TMenuItem
|
|
Caption = 'Colors and Effects...'
|
|
OnClick = ColorsandEffects1Click
|
|
end
|
|
object N2: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object Rotate901: TMenuItem
|
|
Tag = 270
|
|
Caption = 'Rotate 90'
|
|
OnClick = Rotate2701Click
|
|
end
|
|
object Rotate1801: TMenuItem
|
|
Tag = 180
|
|
Caption = 'Rotate 180'
|
|
OnClick = Rotate2701Click
|
|
end
|
|
object Rotate2701: TMenuItem
|
|
Tag = 90
|
|
Caption = 'Rotate 270'
|
|
OnClick = Rotate2701Click
|
|
end
|
|
object N3: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object FlipHorizontal1: TMenuItem
|
|
Caption = 'Flip Horizontal'
|
|
OnClick = FlipHorizontal1Click
|
|
end
|
|
object FlipVertical1: TMenuItem
|
|
Caption = 'Flip Vertical'
|
|
OnClick = FlipVertical1Click
|
|
end
|
|
end
|
|
end
|
|
end
|