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