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