139 lines
3.2 KiB
Plaintext
139 lines
3.2 KiB
Plaintext
object Form1: TForm1
|
|
Left = 240
|
|
Top = 104
|
|
Caption = 'ImageEnView Ruler Demo - www.ImageEn.com'
|
|
ClientHeight = 590
|
|
ClientWidth = 969
|
|
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 = 969
|
|
Height = 571
|
|
Background = clBtnFace
|
|
Ctl3D = False
|
|
ParentCtl3D = False
|
|
LegacyBitmap = False
|
|
OnViewChange = ImageEnView1ViewChange
|
|
MouseInteract = [miZoom]
|
|
EnableInteractionHints = True
|
|
Align = alClient
|
|
TabOrder = 0
|
|
end
|
|
object StatusBar1: TStatusBar
|
|
Left = 0
|
|
Top = 571
|
|
Width = 969
|
|
Height = 19
|
|
Panels = <
|
|
item
|
|
Width = 200
|
|
end>
|
|
end
|
|
object MainMenu1: TMainMenu
|
|
Left = 201
|
|
Top = 201
|
|
object FileMenu: TMenuItem
|
|
Caption = 'File'
|
|
object miOpen: TMenuItem
|
|
Caption = 'Open...'
|
|
OnClick = miOpenClick
|
|
end
|
|
object N1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object miExit: TMenuItem
|
|
Caption = 'Exit'
|
|
OnClick = Exit1Click
|
|
end
|
|
end
|
|
object ViewMenu: TMenuItem
|
|
Caption = 'View'
|
|
OnClick = ViewMenuClick
|
|
object miCenter: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Center Image'
|
|
Checked = True
|
|
OnClick = Center1Click
|
|
end
|
|
object miAlignRuler: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Align Ruler to Image'
|
|
OnClick = miAlignRulerClick
|
|
end
|
|
object miInverted: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Inverted Rulers'
|
|
OnClick = miInvertedClick
|
|
end
|
|
object N3: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object miNextKind: TMenuItem
|
|
Caption = 'Next Grip Style'
|
|
OnClick = miNextKindClick
|
|
end
|
|
end
|
|
object UnitsMenu: TMenuItem
|
|
Caption = 'Units'
|
|
object miPixels: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Pixels'
|
|
Checked = True
|
|
GroupIndex = 9
|
|
RadioItem = True
|
|
OnClick = OnSelectUnits
|
|
end
|
|
object miInches: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Inches'
|
|
GroupIndex = 9
|
|
RadioItem = True
|
|
OnClick = OnSelectUnits
|
|
end
|
|
object miMillimeters: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Millimeters'
|
|
GroupIndex = 9
|
|
RadioItem = True
|
|
OnClick = OnSelectUnits
|
|
end
|
|
object miCentimeters: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Centimeters'
|
|
GroupIndex = 9
|
|
RadioItem = True
|
|
OnClick = OnSelectUnits
|
|
end
|
|
object N2: TMenuItem
|
|
Caption = '-'
|
|
GroupIndex = 9
|
|
end
|
|
object miLockGrips: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Lock Grips to Labels'
|
|
GroupIndex = 9
|
|
OnClick = miLockGripsClick
|
|
end
|
|
end
|
|
object ToolsMenu: TMenuItem
|
|
Caption = 'Tools'
|
|
object miAddGrips: TMenuItem
|
|
Caption = 'Add Grips to Rulers'
|
|
OnClick = miAddGripsClick
|
|
end
|
|
end
|
|
end
|
|
end
|