object Form1: TForm1 Left = 265 Height = 414 Top = 182 Width = 892 Caption = 'TChartListbox demo' ClientHeight = 414 ClientWidth = 892 OnCreate = FormCreate LCLVersion = '2.3.0.0' object Chart: TChart Left = 292 Height = 414 Top = 0 Width = 457 AxisList = < item Grid.Color = clSilver Grid.Style = psSolid Intervals.MaxLength = 100 Marks.LabelBrush.Style = bsClear Minors = < item Grid.Color = clSilver Intervals.MinLength = 5 Intervals.Options = [aipUseCount, aipUseMinLength] Marks.LabelBrush.Style = bsClear end> Title.LabelFont.Orientation = 900 Title.LabelFont.Style = [fsBold] Title.Visible = True Title.Caption = 'y axis' Title.LabelBrush.Style = bsClear end item Grid.Color = clSilver Grid.Style = psSolid Intervals.MaxLength = 100 Alignment = calBottom Marks.LabelBrush.Style = bsClear Minors = < item Grid.Color = clSilver Intervals.MinLength = 5 Intervals.Options = [aipUseCount, aipUseMinLength] Marks.LabelBrush.Style = bsClear end> Title.LabelFont.Style = [fsBold] Title.Visible = True Title.Caption = 'x axis' Title.LabelBrush.Style = bsClear end> BackColor = clWhite Foot.Brush.Color = clBtnFace Foot.Font.Color = clBlue Legend.Alignment = laBottomCenter Legend.ColumnCount = 4 Legend.Visible = True Title.Brush.Color = clBtnFace Title.Font.Color = clBlue Title.Text.Strings = ( 'TAChart' ) Align = alClient DoubleBuffered = True object SinSeries: TLineSeries Title = 'sin(x)' LinePen.Color = clRed end object CosSeries: TLineSeries Title = 'cos(x)' LinePen.Color = clBlue end object ExpSeries: TLineSeries Title = 'exp(-x)' LinePen.Color = clGreen end object GaussSeries: TLineSeries Title = 'gaussian(x)' LinePen.Color = clFuchsia end end object ListboxPanel: TPanel Left = 754 Height = 414 Top = 0 Width = 138 Align = alRight BevelOuter = bvNone ClientHeight = 414 ClientWidth = 138 TabOrder = 1 object ChartListbox: TChartListbox AnchorSideBottom.Control = Panel2 Left = 6 Height = 374 Hint = 'Move up' Top = 6 Width = 126 Chart = Chart OnAddSeries = ChartListboxAddSeries OnCheckboxClick = ChartListboxCheckboxClick OnItemClick = ChartListboxItemClick OnPopulate = ChartListboxPopulate OnSeriesIconDblClick = ChartListboxSeriesIconDblClick Anchors = [akTop, akLeft, akBottom] BorderSpacing.Around = 6 ItemHeight = 20 TabOrder = 0 end object Panel2: TPanel Left = 0 Height = 22 Top = 386 Width = 138 Align = alBottom AutoSize = True BorderSpacing.Bottom = 6 BevelOuter = bvNone ClientHeight = 22 ClientWidth = 138 TabOrder = 1 object BtnUp: TSpeedButton AnchorSideRight.Control = BtnDown AnchorSideBottom.Control = Panel2 AnchorSideBottom.Side = asrBottom Left = 31 Height = 22 Top = 0 Width = 23 Anchors = [akRight, akBottom] BorderSpacing.Right = 4 Images = ImageList ImageIndex = 1 OnClick = BtnUpClick end object BtnDown: TSpeedButton AnchorSideLeft.Control = Panel2 AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = BtnUp Left = 58 Height = 22 Hint = 'Move down' Top = 0 Width = 23 Images = ImageList ImageIndex = 0 OnClick = BtnDownClick end object BtnSort: TSpeedButton AnchorSideLeft.Control = BtnDown AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = BtnUp Left = 85 Height = 22 Hint = 'Sort by title' Top = 0 Width = 23 BorderSpacing.Left = 4 Images = ImageList ImageIndex = 2 OnClick = BtnSortClick end end end object Splitter: TSplitter Left = 749 Height = 414 Top = 0 Width = 5 Align = alRight ResizeAnchor = akRight end object Panel1: TPanel Left = 0 Height = 414 Top = 0 Width = 292 Align = alLeft AutoSize = True BevelInner = bvRaised BevelOuter = bvLowered ClientHeight = 414 ClientWidth = 292 TabOrder = 3 object BtnAddSeries: TButton AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = Panel1 AnchorSideRight.Control = BtnDeleteSeries AnchorSideRight.Side = asrBottom Left = 8 Height = 25 Top = 8 Width = 91 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Top = 6 Caption = 'Add series' OnClick = BtnAddSeriesClick TabOrder = 0 end object BtnToggleCOS: TButton AnchorSideLeft.Control = BtnDeleteSeries AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = BtnDeleteSeries AnchorSideRight.Control = BtnToggleSIN AnchorSideRight.Side = asrBottom Left = 105 Height = 25 Top = 39 Width = 94 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Left = 6 Caption = 'Toggle cos(x)' OnClick = BtnToggleCOSClick TabOrder = 1 end object BtnToggleChart: TButton AnchorSideLeft.Control = BtnAddSeries AnchorSideTop.Control = Memo AnchorSideTop.Side = asrBottom AnchorSideBottom.Control = CbShowCheckboxes Left = 8 Height = 25 Top = 265 Width = 164 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Bottom = 16 Caption = 'Toggle ChartListbox.Chart' OnClick = BtnToggleChartClick TabOrder = 2 end object BtnToggleSIN: TButton AnchorSideLeft.Control = BtnAddSeries AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = BtnAddSeries Left = 105 Height = 25 Top = 8 Width = 94 AutoSize = True BorderSpacing.Left = 6 Caption = 'Toggle sin(x)' OnClick = BtnToggleSINClick TabOrder = 3 end object CbShowCheckboxes: TCheckBox AnchorSideLeft.Control = Panel1 AnchorSideBottom.Control = CbCheckStyle Left = 8 Height = 19 Top = 306 Width = 114 Anchors = [akLeft, akBottom] BorderSpacing.Left = 6 BorderSpacing.Bottom = 8 Caption = 'Show checkboxes' Checked = True OnChange = CbShowCheckboxesChange State = cbChecked TabOrder = 4 end object CbShowSeriesIcon: TCheckBox AnchorSideLeft.Control = CbShowCheckboxes AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = CbShowCheckboxes Left = 146 Height = 19 Top = 306 Width = 112 BorderSpacing.Left = 24 BorderSpacing.Right = 6 Caption = 'Show series icons' Checked = True OnChange = CbShowSeriesIconChange State = cbChecked TabOrder = 5 end object CbCheckStyle: TCheckBox AnchorSideLeft.Control = Panel1 AnchorSideBottom.Control = CbInverted Left = 8 Height = 19 Top = 333 Width = 91 Anchors = [akLeft, akBottom] BorderSpacing.Left = 6 BorderSpacing.Bottom = 8 Caption = 'Radiobuttons' OnChange = CbCheckStyleChange TabOrder = 6 end object Memo: TMemo AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = Label1 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = BtnToggleChart Left = 8 Height = 156 Top = 103 Width = 276 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Left = 6 BorderSpacing.Top = 2 BorderSpacing.Right = 6 BorderSpacing.Bottom = 6 ScrollBars = ssAutoVertical TabOrder = 7 end object Label1: TLabel AnchorSideLeft.Control = BtnAddSeries AnchorSideTop.Control = Bevel1 AnchorSideTop.Side = asrBottom Left = 8 Height = 15 Top = 86 Width = 63 BorderSpacing.Top = 6 Caption = 'Click viewer' end object EdColumns: TSpinEdit AnchorSideLeft.Control = Label2 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Label2 AnchorSideTop.Side = asrCenter Left = 201 Height = 23 Top = 331 Width = 60 Alignment = taRightJustify BorderSpacing.Left = 4 BorderSpacing.Right = 6 MinValue = 1 OnChange = EdColumnsChange TabOrder = 8 Value = 1 end object Label2: TLabel AnchorSideLeft.Control = CbShowSeriesIcon AnchorSideTop.Control = CbCheckStyle AnchorSideTop.Side = asrCenter Left = 146 Height = 15 Top = 335 Width = 51 Caption = 'Columns:' end object BtnDeleteSeries: TButton AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = BtnAddSeries AnchorSideTop.Side = asrBottom Left = 8 Height = 25 Top = 39 Width = 91 AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Top = 6 Caption = 'Delete series' OnClick = BtnDeleteSeriesClick TabOrder = 9 end object CbKeepSeriesOut: TCheckBox AnchorSideLeft.Control = Panel1 AnchorSideBottom.Control = Panel1 AnchorSideBottom.Side = asrBottom Left = 8 Height = 19 Top = 387 Width = 245 Anchors = [akLeft, akBottom] BorderSpacing.Left = 6 BorderSpacing.Right = 6 BorderSpacing.Bottom = 6 Caption = 'Keep sin and cos series out of ChartListBox' OnChange = CbKeepSeriesOutChange TabOrder = 10 end object Bevel1: TBevel AnchorSideLeft.Control = Panel1 AnchorSideTop.Control = BtnDeleteSeries AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Panel1 AnchorSideRight.Side = asrBottom Left = 8 Height = 4 Top = 76 Width = 276 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 6 BorderSpacing.Top = 12 BorderSpacing.Right = 6 Shape = bsBottomLine end object BtnAddPoint: TButton AnchorSideLeft.Control = BtnToggleSIN AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = BtnAddSeries Left = 205 Height = 25 Top = 8 Width = 79 AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Right = 6 Caption = 'Add point' OnClick = BtnAddPointClick TabOrder = 11 end object CbInverted: TCheckBox AnchorSideLeft.Control = CbKeepSeriesOut AnchorSideBottom.Control = CbKeepSeriesOut Left = 8 Height = 19 Top = 360 Width = 63 Anchors = [akLeft, akBottom] BorderSpacing.Bottom = 8 Caption = 'Inverted' OnChange = CbInvertedChange TabOrder = 12 end end object RandomChartSource: TRandomChartSource PointsNumber = 10 RandSeed = 1603921857 XMax = 10 YMax = 1 YMin = -1 Left = 496 Top = 80 end object ColorDialog: TColorDialog Color = clBlack CustomColors.Strings = ( 'ColorA=000000' 'ColorB=000080' 'ColorC=008000' 'ColorD=008080' 'ColorE=800000' 'ColorF=800080' 'ColorG=808000' 'ColorH=808080' 'ColorI=C0C0C0' 'ColorJ=0000FF' 'ColorK=00FF00' 'ColorL=00FFFF' 'ColorM=FF0000' 'ColorN=FF00FF' 'ColorO=FFFF00' 'ColorP=FFFFFF' 'ColorQ=C0DCC0' 'ColorR=F0CAA6' 'ColorS=F0FBFF' 'ColorT=A4A0A0' ) Left = 496 Top = 152 end object ImageList: TImageList Left = 808 Top = 320 Bitmap = { 4C7A0300000010000000100000002D0200000000000078DA6360189C607FB5FB E77D55AEFF4118C426553F48DFFF33ABC018C41E69FA7757B8C0F583D8A4EADF 52E208D70F6213AB6F7D81FDB375F976FF37153BFF86E907B14162203942FA97 E7DA7AAF2974FAF679DF2CB8FD5FF6CFFDBFB6D0F9DBF23CFB4062DCB024D336 634DB1FB971F4717FDFF796CF1FFB5251E5F16E7D8E493E2FFF9E9B6FDEB2B02 3E6FA8F0FF3A3FC36E02A9E1070C30C659A936EB4118C4661805740D3F4AE28F 92F44369FADD50E800C93F2548F9A704927F4072B4CEBFD42A3F467AF94B69FD 3550E0749DD88D3375E24F5685323093AAF74CADB8F9E93AF19F207CAA4EDC19 234F1FC8FE0FC238EDAE179F7CAA567C33089FAE9358842EFF7347E27F10C61A DE0D0C2C407B5F9CAE158B3B5527160D647F395226C28BACE6D386F0FF208C4D FFC906711FA09EFF40BF5F05D25740EC53B51209C86ADEACF0F90FC2D8C34D7C 05101F3B5D2B9E06C5FB411859CDB3054EFF41185DEF8906213EA0DEAFC0F08B 828901C3CF1728F6EF7483B8124CECC10C8BFF204C6EDCDE9CA0F71F84B1CB5E DDC2C070E53F2ABEBA0E59C5E50E95FF208C43BF0A03C3256308BED20CC47F81 3A8290559C6D90FC0FC2F85D79CD02A8F72B502FBCBC3D5AC137FF5805FF7F64 0C12C3E2066DA0DE7740DC8B2CBAB38481FB4021EBD50305ACFFC118C80689A1 EABD2803D4F708885701532A13467990CDA0BD3787E10B0883D868F6F200F55D 87E0AB5AC0305082E0CBB2C8AAF6E632248030F6B0430F7B30BE46EBFC0E00D9 C2FB81 } BitmapAdv = { 4C69020000004C7A030000001800000018000000D50300000000000078DAED98 5B481451188027BA3C280459BA5B419650041A3D1404B96A79290DED06EB4318 D8CD5A2F99B66A29AE07BAA02FF9509482B1DECA34DD954D22235DB29BB94B17 5BBB503D0419095D30772A8B3CFDFFECA4EBEECEECAAB3E1C31EF8F0E7CC3F9F 33FF9C33FF28C3F8C65406659819C6A2CD439D8571D41E9CC36352F8D1474D8D 949A9B6C40CCCDF9FC3EFF34F0DF2C8871F2737312F9AFE7453BF9B93989FC86 DC0D4E7E6E6E0A7EFD91A87E5D7624450C47637E3BF961EEDF71CC9DA8BF314B 11ABCB8D61BFDE3C3FE67560F0D605AACF8DFE7E35333C6132F7D09019B9AB25 2796B51AAB9CDC6CD745AACB8D63AFA8147BA652FF7A55445673CE26F6C79DEA 51F7CFBBB554A78E672F6744E549F18EAE51294A9BD509D6E17B75F4D7837AAA CF4FB4D6A9224BA5EC03DAB4F06A43E176ABA168075B7D505123759F69522A67 56A5851B108C7D9DD737A6D3F0F6FAB4EDAF9D5ED95FB5871465BAFCC4217C37 FCEEBE445B8F250DD5A6479449E1F6E6FBCD93F773438662EF64DC9EF5970AE8 2FB16CE3E1C82D13F5B7E66CF830DA1FD52EFAA37AAC3F62EE74EBEFFFF3FBC4 DBDF57BEEF5B9F7F3AFBBDF9F7B56FB81E3D2430DEAC91179834B26DDEF89F09 78DF02B447231B30A731B305738DE90A7A3BA38003624FFC6612A840F73FE077 2409E5FE31A69311A38A22187BE20767057ACD25415ADBEF90370BE50EB7EF27 BFDAF751046377EE3E123A079C9F806FDD24602EFCFC020C3F3CBE78BEAB7CF6 5A0AF9DE9642118CDDF91F6A8276F0D75CCBD58ABF07B32648E52A7F509F4C06 F54A6A23D9ADDF542C6FE16A5E2C4F37115908D4FE00FF1CBA5DE57F6EDC4A00 CA23EAEF3DB6641E787EDA3F5B7BCC64D14AC77306EAE2C940FD66CA01B1F8B5 CBD2F8DA3C3295C82A47816BB7D54876DAF19C7E6D34E9D76EA436A245FD3D9A A02EAE36B0B7C6ADD762D93ADEFFBE49C98CFB767E57B99E009447D0FFA86861 30384670BDE01A725EB3F257DCBD1159ACFDFCEBB36BC99B736B2882B1D47BFD 45791879591E46118CDDAC7E25C3582A8579BEDDF18C67652B88A56C39453016 F75BCE005498BE538E673C3EB1943C39194C118CDDDC2DECD1DE90F13CCBE3FD 5FC11FEAF45C889C984BE414C17862D5ED8D02EF0F6018DC31A3EBAC2020F4C1 F17956800A60C51C37EE55E0FD028CC03DEC763CDA95E79F7A47ED475D81C7C4 DD4F9781F7035F977CA12C63F64C2D401DD08ABB5F2D805ABCE4DD956299ED6A C6BF2393E903284F1FCE8974163F70DFE7D74A1B5CE12C774FA833830905AF15 C158C40D3DD07283BF6E13D4C8DFD355D091C5A4226EF6D63ABBB5FE1178EB82 86C9EF74CB6A01A7447EEF8CBF26FFB5334C7A0300000020000000200000005F 0400000000000078DAED996B4814411CC0B7A430A23E48DD9E2154147DF14BF5 21A2EB32EB2C2CC2A82CFA5004D9434F8DD3F322E5AEA50F6112512151625DF6 B0BABCF42A04CB175657E4258477D1038AA2300A7AD05E5656FF6674BB1BCFDD BB59F56E0B77E087EBBC7EB333B3B3337B0CA30635D0056098512D25CBBF3417 A78118380DE789969FE3B8D1D8F3BBDD01E0E90F8EC369388FEA57FDAA5FF547 C3DFB8C720E9C769D1F637EC5E2AE9C769D1F6D7172D91F4E3B468FBAF15A64A FA71DA70FA5D85A96FEA4C294072BDC8D003ED9706F8711C4E0BCD8FEB18ACFF 72BE7EA9ABC0E0FFD8503ED017814F378F81CB6CF0D7E6A6A40FA50F6A7217AF AE3519FC9F1B8F53BBBF3457405D419ABF267FD1FAE118870BC6944D574C697E BEB532A2DBDF7A126A91FBA2519F359C73AF3A5B9FE744F57E6DB34BBABB6F9D 06A779395F6D4C298AC6FC3F93B3B0D051B08CFF8A3CA1EE6FB7ABA006B9CFE6 E8ADD1DC0356EDD0955D36A7F3DFEE9C0DB87FB8CF81D3B292AFCAD697C5621F 6ADFAE2B775A56F13D77CF43CFBD6AA8DB93C1DB772CAC8CE53EB8326BC14557 F11ADE55B2C67F729BEE5234F7BD62C191991957B155578FC1D7EAE9440D6A50 C348587F945E7F957CFF28F9FE5572FFA1E4FE4BC9FDA792FB6FA5CF1F2EF392 81E72F4B98F39745E4FC85EAF85FCF9FFFE2F95BE9EF0F4A7F7F51BFBFA97ED5 AFFA95F02BFDFB9B1A465E68B7B1A508E8652F7B22A6E73C8E198DBCAF027E1B FBC96D4A1A172BBFC7A64D25DCBDDCB7B11BA8DADE6A049241F67DA5E07D8BE8 EABBD6D4D394FDD5BC1348E4BA5BB869F1C8F7517096A3BF4785B6FCF4144F4A 8C54FEC78DAD4022D77FDFAA5D1FE8732E7151BB55A30BFC6FD5982395EFAEDF 0C24B2FBDECABA045F97239389C3EBAAC7C6BE10E2BC91CAF3573702891CB79B 4B4A408EEFBDF7BA973D129C0F9AB2BF7DE0E1A6CC0D57C7E72BEB804466DFE7 04E6BC95AD15D6008C23300644BBC4C207470690C89CF7EED0E74E84779EEDCC 18A93ADE57AF00125AF7036EF24C54F76FC1F112E109E139D1860CA97ABACEA4 0109FDBD6BB940FD9C765E687A4749E2D440FBAC5AA7543DAF4F2D061219FE27 7FEF5D6A2F418CCF77340F2789E57959A10312BABE67E707DF359A0361DA680C 8E81D62896E7F9B1794012EBF7E6B3A3B38124D6FEC787928184BE646736C378 8192CD52B5F8CA660149ACFD0FF74F071219FE19A8F599E2784B09F7FBBEBCE2 A1635F12900C7D44B1CBFB567077237411D6D07EEBE5D0DC1D9391EFA9E0FE85 581B9AE35E71821D0194D8653C4913D1BD3F08F67BE72EB15C0D6676BC7BF704 DF1DCB040807CE83F3D2B97D63113708F7C170B96F9BC626B715C4F3089080C7 792877BFE81CE97510F3CDD1171761DF9617B7A5253F0E444169F4FDEE3B4CB8 DB18E6453C6DC92623636FCA65A01F288EDEEDB512EE47A82D0972666B839919 8F9C3EC2EFC37194EE6D41B7EF1D62E6609E986623938CBC3C065F53F6F91CC4 4FE2DE4BA5D7224CE782B0E390C76CC1C818F374196B2FC639BC6F2DA5FD232F FC015D5569FF } end object ApplicationProperties: TApplicationProperties OnIdle = ApplicationPropertiesIdle Left = 496 Top = 240 end end