object Form1: TForm1 Left = 648 Height = 621 Top = 164 Width = 1097 ActiveControl = sWorksheetGrid1 Caption = 'demo_ctrls' ClientHeight = 601 ClientWidth = 1097 Menu = MainMenu1 ShowHint = True LCLVersion = '2.1.0.0' object sWorkbookTabControl1: TsWorkbookTabControl Left = 0 Height = 552 Top = 49 Width = 1097 TabPosition = tpBottom TabIndex = 0 Tabs.Strings = ( 'Sheet1' ) Align = alClient TabOrder = 0 WorkbookSource = sWorkbookSource1 object sWorksheetGrid1: TsWorksheetGrid Left = 2 Height = 527 Top = 2 Width = 1093 AutoCalc = True FixedColWidth = 57 FrozenCols = 0 FrozenRows = 0 PageBreakPen.Color = clBlue PageBreakPen.Style = psDash ReadFormulas = True TextOverflow = True WorkbookSource = sWorkbookSource1 Align = alClient AutoAdvance = aaDown DefaultColWidth = 64 DefaultRowHeight = 22 Font.Color = clBlack Font.Height = -13 Font.Name = 'Arial' MouseWheelOption = mwGrid Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSizing, goColSizing, goEditing, goThumbTracking, goDblClickAutoSize, goCellHints] ParentFont = False TabOrder = 1 end end object ToolBar1: TToolBar Left = 0 Height = 26 Top = 0 Width = 1097 AutoSize = True ButtonHeight = 26 ButtonWidth = 24 Caption = 'ToolBar1' EdgeBorders = [] Images = ImageList1 TabOrder = 1 object ToolButton6: TToolButton Left = 352 Top = 0 Action = sFontStyleAction1 end object ToolButton7: TToolButton Left = 376 Top = 0 Action = sFontStyleAction2 end object ToolButton8: TToolButton Left = 400 Top = 0 Action = sFontStyleAction3 end object FontNameCombo: TsCellCombobox Left = 54 Height = 23 Hint = 'Cell font name' Top = 0 Width = 130 WorkbookSource = sWorkbookSource1 DropDownCount = 24 ItemIndex = 69 TabOrder = 0 Text = 'Arial' end object FontSizeCombo: TsCellCombobox Left = 184 Height = 23 Hint = 'Cell font size' Top = 0 Width = 48 CellFormatItem = cfiFontSize WorkbookSource = sWorkbookSource1 DropDownCount = 24 ItemIndex = 2 TabOrder = 1 Text = '10' end object FontColorCombobox: TsCellCombobox Left = 232 Height = 24 Hint = 'Font color' Top = 0 Width = 120 CellFormatItem = cfiFontColor ColorRectOffset = 3 ColorRectWidth = 12 WorkbookSource = sWorkbookSource1 DropDownCount = 24 ItemIndex = 0 TabOrder = 2 Text = 'black' end object ToolButton1: TToolButton Left = 1 Top = 0 Action = FileOpen1 end object ToolButton2: TToolButton Left = 25 Top = 0 Action = FileSaveAs1 end object ToolButton3: TToolButton Left = 49 Height = 26 Top = 0 Caption = 'ToolButton3' Style = tbsDivider end end object Panel1: TPanel Left = 4 Height = 23 Top = 26 Width = 1089 Align = alTop AutoSize = True BorderSpacing.Left = 4 BorderSpacing.Right = 4 BevelOuter = bvNone ClientHeight = 23 ClientWidth = 1089 TabOrder = 2 object sWorksheetIndicator1: TsWorksheetIndicator AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = Panel1 AnchorSideRight.Control = Splitter1 Left = 0 Height = 23 Top = 0 Width = 103 WorkbookSource = sWorkbookSource1 Anchors = [akTop, akLeft, akRight] ItemIndex = 0 TabOrder = 0 Text = 'Sheet1' end object Splitter1: TSplitter AnchorSideTop.Control = Panel1 AnchorSideBottom.Control = sWorksheetIndicator1 AnchorSideBottom.Side = asrBottom Left = 103 Height = 23 Top = 0 Width = 5 Align = alNone Anchors = [akTop, akBottom] end object sCellIndicator1: TsCellIndicator AnchorSideLeft.Control = Splitter1 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Panel1 AnchorSideRight.Control = Splitter2 Left = 108 Height = 23 Top = 0 Width = 98 WorkbookSource = sWorkbookSource1 Anchors = [akTop, akLeft, akRight] TabOrder = 2 Text = 'A1' end object Splitter2: TSplitter AnchorSideTop.Control = Panel1 AnchorSideBottom.Control = sWorksheetIndicator1 AnchorSideBottom.Side = asrBottom Left = 206 Height = 23 Top = 0 Width = 5 Align = alNone Anchors = [akTop, akBottom] end object sCellEdit1: TsCellEdit AnchorSideLeft.Control = Splitter2 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Panel1 AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 211 Height = 23 Top = 0 Width = 878 Anchors = [akTop, akLeft, akRight] TabOrder = 4 WorkbookSource = sWorkbookSource1 end end object sWorkbookSource1: TsWorkbookSource AutoDetectFormat = False FileFormat = sfUser Options = [boAutoCalc, boCalcBeforeSaving, boReadFormulas] left = 176 top = 160 end object ActionList1: TActionList Images = ImageList1 left = 176 top = 248 object FileOpen1: TFileOpen Category = 'File' Caption = '&Open ...' Dialog.Filter = 'All spreadsheet files|*.xls;*.xlsx;*.ods;*.csv|All Excel files (*.xls, *.xlsx)|*.xls;*.xlsx|Excel XML spreadsheets (*.xlsx)|*.xlsx|Excel XP/2003 XML spreadsheets (*.xml)|*.xml|Excel 97-2003 spreadsheets (*.xls)|*.xls|Excel 5 spreadsheets (*.xls)|*.xls|Excel 2.1 spreadsheets (*.xls)|*.xls|LibreOffice/OpenOffice spreadsheets (*.ods)|*.ods|HTML files (*.html; *.htm)|*.html;*.htm|Comma-separated text files (*.csv; *.txt)|*.csv;*.txt' Dialog.Options = [ofExtensionDifferent, ofFileMustExist, ofEnableSizing, ofViewDetail] Hint = 'Open spreadsheet file' ImageIndex = 0 ShortCut = 16463 OnAccept = FileOpen1Accept end object FileSaveAs1: TFileSaveAs Category = 'File' Caption = 'Save &as ...' Dialog.Title = 'AcSaveFileAs' Dialog.Filter = 'Excel XML spreadsheet (*.xlsx)|*.xlsx|Excel 97-2003 spreadsheets (*.xls)|*.xls|Excel 5 spreadsheet (*.xls)|*.xls|Excel 2.1 spreadsheets (*.xls)|*.xls|LibreOffice/OpenOffice spreadsheet (*.ods)|*.ods|Comma-delimited files (*.csv)|*.csv|WikiTable (WikiMedia-Format, *.wikitable_wikimedia)|*.wikitable_wikimedia' Hint = 'Save spreadsheet' ImageIndex = 1 OnAccept = FileSaveAs1Accept end object FileExit1: TFileExit Category = 'File' Caption = 'E&xit' Hint = 'Exit' ImageIndex = 2 ShortCut = 32856 end object sFontStyleAction1: TsFontStyleAction Category = 'FPSpreadsheet' WorkbookSource = sWorkbookSource1 Caption = 'Bold' Hint = 'Bold' ImageIndex = 3 FontStyle = fssBold end object sFontStyleAction2: TsFontStyleAction Category = 'FPSpreadsheet' WorkbookSource = sWorkbookSource1 Caption = 'Italic' Hint = 'Italic' ImageIndex = 4 FontStyle = fssItalic end object sFontStyleAction3: TsFontStyleAction Category = 'FPSpreadsheet' WorkbookSource = sWorkbookSource1 Caption = 'Underlined' Hint = 'Underlined' ImageIndex = 5 FontStyle = fssUnderline end end object ImageList1: TImageList left = 176 top = 312 Bitmap = { 4C7A0600000010000000100000004E0900000000000078DAED967B544DDB1EC7 E7182E0E87A381C1F0B89E5D271C54DB0EC72BF77A3FF3BA38C84EA287087985 B33987139136228922A112F2886EAF1D874B2CCA496E548ABCA2DA95DE8FFDBD BF39D1B0AE47F1C719F79E71FFF88CB56AFF3E6BFE7E73CDDF9C0B0003C1364B 56C4865A62C55C6F08EF2DCCF5FACF9B530BA18ACDC21CED0BAC4F2CC4FECC2A F83F858CA32F28986209B9BFE9DAA6907CE0B84E8FDD8F4AB1282E072303EF61 6FAA5EC6A127144CB184DCDF78C53528B70A0159958260BAFFEBA1DBF04AA992 E197A9078F25E4FE4F97DC8EBEACC4A1A715027E3FE0403CF6DCAF94E1FBA80A 3C9690FB6AADFBE1E71538905926E0F74ACF2BF04C2E97E1935E091ECBD43172 7F5DA4C6F74919F6A6170BF8BDA926163BEF96CAF04E2B078F2514327F4DB8A7 CFC31278A6140AF8BDB17B1434778A6578A59441AFA71A285EE6AF3AE7E5F580 62920B04FCBEC7960BF0482C92B1FB5E298A8A72C1E365FE8A509F9DF70BB1F5 4E9E80DF77DF7416EEB75FC9D8F5AF62BC7C99061E2FF39785F86EBF5B00D784 1C01BF37FAE914B6C6E7CBD89154047DDC10F07899BFF858805B621E7EBAF952 C0EFBBFC781C6EB7F26478D0BA2C3CDF133C5EE6CFF73EE37A5B07F5F52C816B 820E5DD605BD97BFE64E11782C5BE03348E65BBA6F57EE88CEB70B4F2BDF7023 1B1B6FD11CCDDAAA63B3B7C5BC07C5D233E4EF7FF636C66CBC2DD83C2FEFB62E 41B1938EDCCC6033B75C24D87BF0D80FF9F3BC189BBB8B72D96ECC666D5BCB66 B8EE243EE94739982D21348444E412E5910E667A0291F6AF895AD80FD18BFA23 D2F17B443AF4D5453A0DBA71DE4E39E58DEF539C711B2584BEA2942841555931 2A8BF2509EF702150539E2EFAAF21254E4BF446956BA3E3B21BA226E8B657698 9DD29AFCE4E2F4DBC80A5E0F7D398F2BC6B56DF350F12A97E25FA0B2B8403CB7 B2381F65D98F50FA2C05B90911A06780F228253FAF383D01CF037F14311CEE97 E767A1A230578CCBC72FCF7B8ED2E76928799A8287875DA04BFA1517EC947A5E 6F519A8467E4F3184E9CFB7CBA66A1AAF415E5446317EA5096958E121ABBE4C9 3D64F8AFC2B34B41386FAB049FABC2D4383C3BB68EF27BF89A9C4C72DE8C5DF2 0AE5394FAADDE227C9787070251EC704E0DC82DEDC47E1BDAB787A749DC83BCE DD0671DB17E0C6CE858423AE6BECE8FF36E2B7B7DCDFEF8C87117E383BBFB778 3F05C9579019B00699545766800B1ED1FDA3C36BA84EC27F35D269BC077E2B90 E6EB8C94FD4B917AC0196961FB70DAE68D9F74E9B54B704F10F0DACD38B44AE4 FBC077B9F0EEFB2CC33DE27EE86E9C9AA7107EDE6F31E4B8081EBE79061F5BB8 7E2B91466373F79ECF52247B2FC15D6F27241DDF8E13D60A4490AF4B88C4237F 9737EBA76612F738E2B7636E383ED794AF47E86E858B5CF534DF7363377F12BE 16E277D9E3D6E18D08B6227F615FE44AE7C97711BE36F5D227E1FE4D8D2D24DF 0D08243FC2A18F3EE7FA595A132EB51EFF3A7FC73E6B714C65A28FB0573E78F9 CF137871E544ADEBBFB66F2DAEEE5DCDFD1C9A3FF60F3B6558B89D32F702ADC7 3082AFAB33B436426D143849EF28C4DA14C1345741946FA0CA448C7B5465921F 686572990DA6FDA21A4F43C28D0DDA2531F3DD35E14DB16F5DF276B97D33667F E2E015B1D9B33577A0B009C2C1830711141424080E0E464848084E9E3C89D0D0 5088310609D7ED9BD1FB13072DD7664F71BD0133BB13E8FCF77D50581F155E54 5414A2A3A3A1D56A71F1E2455CBE7C1957AF5E051BA09108C606EE90F8784ADB 1018CDF443EB713B30746524145601C2FF901B171707F6BDBB4430D67FBB347D 6BBCF0FEB62202A69437BF2AE61C1239BFEB9E3E7D1A919191902409ACCF1689 60ACDF5669EA6609DFFEE08B21CEE130991728AE8AD9BEA2DE77C70D0C0C14C4 C4C480F5DE24118C996D9626FF721D5D671DC4E0A5E7616C7D4C5C153FEC1373 C59F71E4C8916AAAAAAAC4B5692FD56E83AE13197F8EC5CF57F1670B4F917B0F 5500063A9D8362BA9798677F7F7F141414BC47EBD6ADE713AD99C90669ACFA57 5157A789DBF0DD9CC3E8BFE80C145377E1ECD9B3620EF87B7CCBE3C78FC5B56E BB71BBBFEE309CB19EEBA4516B63D140B1181D2D34E86EE98F7E0B43A198A441 58589898AB848404242626E2C08103023EA7EC5B678960ACFB6A69844B8C18B7 8FFD49E1F3ABC2621BC2C3C3ABDDA4A424910B9FBBD4D45430C3C512C198D172 89BF6FEEF335C0FD9E5647A018E32A6A7AEB26272723252545B86969F4FDD1DE 562218FBCB1289BF2FEEF3B9E36B4FCCDF90D562AC0FB9C26F3A5D2218EBE428 F1F7D569AAB798B7EF26EEC96ED85695C8EA8F0A60F5464A1FA5FE686FF6D518 C6DACC13E377B3F0CC6ED8DA32917D35DA8D7E3764F54630F6A7611FA7DE4826 7C83A98C7D3D819E37CA8DD51D6EC8EA8E78FD5B2DFD77BF21FED759B972A58A 8877767686939393CEC1C1416D6363734AA552E966CC98E13779F264839A9EB1 6CD932B59D9D1DECEDEDB56FFF377DFA74BF2953A660F4E8D1F135F98E8E8E7C 4C585B5B57FB13264C508F1F3F1E43860C414DFE82050BD473E6CCC1CC993385 3F6EDC3883E1C387A713E8DBB7AF5F4D3ED5AAA65A41B5A68F1D3B563D6CD8B0 F8A14387C2CCCC4C5B9B39A45AD5E4F25AABE37BF7EEED4763A34B972EF1EDDB B7FFE41CF25A29675E6BB5DFBD7B770372D1A3470FB46CD9D2E9533ED5A97E53 AB2CDFB66DDBA26BD7AE303030507FCA1F3870A0DADCDC1CBD7AF5AA7E576DDA B4713234344493264D740D1B36ECF03177C080012AAAF514E5A9A57CB554AB47 AB56AD3C9A356BA66DDCB8B14783060D3AFC91FAE58F0EF5FF7AEAC53CEA0950 4FE4D1BA8EFDDC67585A5A66F07E9A3871A2EA73DD59B366194F9B360DD41379 5F923FED399A49932681FAE1E097F8D4FF19A3468D02F584C5E7BAD4FFC6B477 807AE28B72A7FED7F07DC7D4D4F48B72A7FECFE07B4EB76EDD3E3B77DAEBCC95 4A258C8C8CF0B92EF5FF7AEAFF58EAFF58EAFF58EAFFD0FFF7D2EF7A7EEB082C 5FBEDCE3DDDFACACAC4ED19908EA09A71A9EA1E5E7FF7FFE9F7AD880FA3FBE16 E7BF76D1A245F8484F686B71FE6B6D6D6DF1919ED0D6E2FCD752ADF8484F686B 71FE6BF97EF5A1DFE84CD4D6E2FCD7D25EF7419F9F8935F9B4D7798C1933869F FFB2BEA5F3D7BC5DBB761E35F9B4D775183C78B08E6A8D37313111E76DE7CE9D CDE9FC8F6FD1A245875AF67F07AAD58FFA5FDBB163472D9DFF1ECD9B3737FE3D D6307DEB807F6B50ADFC5B074D9B3645A3468D50BF7E7DD4A95307FF6D3DF76F B475E861 } end object MainMenu1: TMainMenu Images = ImageList1 left = 176 top = 376 object MnuFile: TMenuItem Caption = 'File' object MnuFileOpen: TMenuItem Action = FileOpen1 end object MnuFileSaveAs: TMenuItem Action = FileSaveAs1 end object MnuFileSeparator: TMenuItem Caption = '-' end object MnuFileExit: TMenuItem Action = FileExit1 end end object MnuFormat: TMenuItem Caption = 'Format' object MnuFormatBold: TMenuItem Action = sFontStyleAction1 AutoCheck = True end object MnuFormatItalic: TMenuItem Action = sFontStyleAction2 AutoCheck = True end object MnuFormatUnderline: TMenuItem Action = sFontStyleAction3 AutoCheck = True end end end end