object FormMain: TFormMain Left = 534 Height = 993 Top = 223 Width = 1491 AllowDropFiles = True Caption = 'vCard Studio' ClientHeight = 959 ClientWidth = 1491 DesignTimePPI = 144 Menu = MainMenu1 OnActivate = FormActivate OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnDropFiles = FormDropFiles OnResize = FormResize OnShow = FormShow LCLVersion = '2.2.6.0' object CoolBar1: TCoolBar Left = 0 Height = 43 Top = 0 Width = 1491 AutoSize = True Bands = < item Break = False Control = ToolBarFile Width = 164 end item Break = False Control = ToolBarOther MinWidth = 64 Width = 64 end> ParentFont = False object ToolBarFile: TToolBar AnchorSideLeft.Control = CoolBar1 AnchorSideTop.Control = CoolBar1 Left = 24 Height = 33 Top = 5 Width = 159 Align = alNone AutoSize = True BorderSpacing.Left = 22 BorderSpacing.Top = 3 EdgeInner = esNone EdgeOuter = esNone Images = Core.ImageList1 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 Transparent = True object ToolButton1: TToolButton Left = 1 Top = 0 Action = Core.AFileNew end object ToolButton2: TToolButton Left = 36 Top = 0 Action = Core.AFileOpen DropdownMenu = PopupMenuOpenRecent Style = tbsDropDown end object ToolButton3: TToolButton Left = 89 Top = 0 Action = Core.AFileSave end object ToolButton4: TToolButton Left = 124 Top = 0 Action = Core.AFileClose end end object ToolBarOther: TToolBar AnchorSideLeft.Control = CoolBar1 AnchorSideTop.Control = CoolBar1 Left = 188 Height = 33 Top = 5 Width = 141 Align = alNone AutoSize = True BorderSpacing.Left = 186 BorderSpacing.Top = 3 EdgeInner = esNone EdgeOuter = esNone Images = Core.ImageList1 ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 1 Transparent = True object ToolButton5: TToolButton Left = 106 Top = 0 Action = Core.ASettings end object ToolButton6: TToolButton Left = 36 Top = 0 Action = Core.AFindDuplicate end object ToolButton7: TToolButton Left = 1 Top = 0 Action = Core.AFind end object ToolButton8: TToolButton Left = 71 Top = 0 Action = Core.AFileCompare end end end object MainMenu1: TMainMenu Images = Core.ImageList1 Left = 192 Top = 120 object MenuItemFile: TMenuItem Caption = 'File' object MenuItemFileNew: TMenuItem Action = Core.AFileNew end object MenuItemFileOpen: TMenuItem Action = Core.AFileOpen end object MenuItemFileOpenRecent: TMenuItem Caption = 'Open recent' end object MenuItemFileSave: TMenuItem Action = Core.AFileSave end object MenuItemFileSaveAs: TMenuItem Action = Core.AFileSaveAs end object MenuItemFileClose: TMenuItem Action = Core.AFileClose end object MenuItem1: TMenuItem Caption = '-' end object MenuItem12: TMenuItem Action = Core.AFileCompare end object Separator1: TMenuItem Caption = '-' end object MenuItem3: TMenuItem Action = Core.AFileCombine end object MenuItem6: TMenuItem Action = Core.AFileSplit end object Separator2: TMenuItem Caption = '-' end object MenuItem16: TMenuItem Action = Core.AFileImport end object MenuItem15: TMenuItem Action = Core.AFileExport end object MenuItem2: TMenuItem Caption = '-' end object MenuItemExit: TMenuItem Action = Core.AExit end end object MenuItem7: TMenuItem Caption = 'Find' object MenuItem8: TMenuItem Action = Core.AFind end object MenuItem9: TMenuItem Action = Core.AFindDuplicate end end object MenuItemView: TMenuItem Caption = 'View' object MenuItemToolbar: TMenuItem AutoCheck = True Caption = 'Main toolbar' OnClick = MenuItemToolbarClick end object MenuItemColumns: TMenuItem Caption = 'Columns' OnClick = MenuItemColumnsClick end end object MenuItemTools: TMenuItem Caption = 'Tools' object MenuItemSettings: TMenuItem Action = Core.ASettings end object MenuItem10: TMenuItem Caption = '-' end object MenuItem14: TMenuItem Action = Core.ANormalize end object MenuItem13: TMenuItem Action = Core.ARemoveExactDuplicates end object MenuItem5: TMenuItem Action = Core.AGenerate end object MenuItem4: TMenuItem Action = Core.ATest end object MenuItem11: TMenuItem Action = Core.AViewSource end end object MenuItemHelp: TMenuItem Caption = 'Help' object MenuItemHomePage: TMenuItem Action = Core.AHomePage end object MenuItemAbout: TMenuItem Action = Core.AAbout end end end object PopupMenuOpenRecent: TPopupMenu Left = 420 Top = 120 end end