lasarus_compotents/RXLib/demos/RxMDI/unit1.lfm

object Form1: TForm1
  Left = 527
  Height = 435
  Top = 222
  Width = 613
  Caption = 'MainForm'
  ClientHeight = 407
  ClientWidth = 613
  Menu = MainMenu1
  OnCreate = FormCreate
  Position = poScreenCenter
  LCLVersion = '1.9.0.0'
  WindowState = wsMaximized
  object ToolPanel1: TToolPanel
    Left = 0
    Height = 31
    Top = 0
    Width = 613
    Items = <>
    Options = []
    CustomizeShortCut = False
    Align = alTop
    BorderWidth = 4
    ClientHeight = 31
    ClientWidth = 613
    TabOrder = 0
    object RxMDICloseButton1: TRxMDICloseButton
      AnchorSideTop.Control = ToolPanel1
      AnchorSideTop.Side = asrCenter
      AnchorSideRight.Control = ToolPanel1
      AnchorSideRight.Side = asrBottom
      Left = 585
      Height = 22
      Top = 4
      Width = 23
      Anchors = [akTop, akRight]
      Glyph.Data = {
        1A020000424D1A0200000000000036000000280000000B0000000B0000000100
        200000000000E401000064000000640000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000FF0000
        00FF00000000000000000000000000000000000000FF000000FF000000000000
        00000000000000000000000000FF000000FF0000000000000000000000FF0000
        00FF000000000000000000000000000000000000000000000000000000FF0000
        00FF000000FF000000FF00000000000000000000000000000000000000000000
        00000000000000000000000000FF000000FF0000000000000000000000000000
        000000000000000000000000000000000000000000FF000000FF000000FF0000
        00FF000000000000000000000000000000000000000000000000000000FF0000
        00FF0000000000000000000000FF000000FF0000000000000000000000000000
        0000000000FF000000FF00000000000000000000000000000000000000FF0000
        00FF000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        000000000000000000000000000000000000000000000000000000000000
      }
      ShowInfoLabel = False
    end
  end
  object RxMDITasks1: TRxMDITasks
    Left = 0
    Height = 25
    Top = 360
    Width = 613
    Align = alBottom
    FlatButton = True
    Options = [rxtoMidleClickClose]
  end
  object StatusBar1: TStatusBar
    Left = 0
    Height = 22
    Top = 385
    Width = 613
    Panels = <    
      item
        Width = 100
      end    
      item
        Width = 150
      end>
    SimplePanel = False
  end
  object RxMDIPanel1: TRxMDIPanel
    Left = 0
    Height = 329
    Top = 31
    Width = 613
    CloseButton = RxMDICloseButton1
    TaskPanel = RxMDITasks1
    Align = alClient
    BevelOuter = bvLowered
    HideCloseButton = False
    OnChangeCurrentChild = RxMDIPanel1ChangeCurrentChild
  end
  object ActionList1: TActionList
    Left = 440
    Top = 72
    object sysClose: TAction
      Category = 'System'
      Caption = 'Close'
      OnExecute = sysCloseExecute
    end
    object Action1: TAction
      Category = 'MDI forms'
      Caption = 'Form # 1'
      OnExecute = Action1Execute
    end
    object Action2: TAction
      Category = 'MDI forms'
      Caption = 'Form # 2'
      OnExecute = Action2Execute
    end
    object Action3: TAction
      Category = 'MDI forms'
      Caption = 'New single MDI form'
      OnExecute = Action3Execute
    end
    object optShowInfoLabel: TAction
      Category = 'Options'
      Caption = 'Show info label'
      Checked = True
      OnExecute = optShowInfoLabelExecute
    end
    object optMidleMouseClickClose: TAction
      Category = 'Options'
      Caption = 'Midle mouse button close form'
      Checked = True
      OnExecute = optMidleMouseClickCloseExecute
    end
    object optHideCloseButton: TAction
      Category = 'Options'
      Caption = 'Hide close button'
      Checked = True
      OnExecute = optHideCloseButtonExecute
    end
  end
  object MainMenu1: TMainMenu
    Left = 408
    Top = 72
    object MenuItem1: TMenuItem
      Caption = 'System'
      object MenuItem2: TMenuItem
        Action = sysClose
      end
    end
    object MenuItem8: TMenuItem
      Caption = 'Options'
      object MenuItem9: TMenuItem
        Action = optShowInfoLabel
      end
      object MenuItem10: TMenuItem
        Action = optMidleMouseClickClose
      end
      object MenuItem11: TMenuItem
        Action = optHideCloseButton
      end
    end
    object MenuItem3: TMenuItem
      Caption = 'MDI forms'
      object MenuItem4: TMenuItem
        Action = Action1
      end
      object MenuItem5: TMenuItem
        Action = Action2
      end
      object MenuItem7: TMenuItem
        Caption = '-'
      end
      object MenuItem6: TMenuItem
        Action = Action3
      end
    end
  end
  object Timer1: TTimer
    Interval = 500
    OnTimer = Timer1Timer
    Left = 451
    Top = 117
  end
end