paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 19:59:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Fix icon of Apply button in ChartEditor demo.

Browse Source 
git-svn-id: trunk@65073 -
This commit is contained in:
wp 2021-04-30 15:37:10 +00:00
parent 246e2a5ac2
commit cec9469511
5 changed files with 84 additions and 68 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

51
components/tachart/demo/charteditor/ceaxisframe.lfm
View File

@ -1,9 +1,9 @@
object ChartAxisFrame: TChartAxisFrame
Left = 0
Height = 431
Height = 471
Top = 0
Width = 646
ClientHeight = 431
ClientHeight = 471
ClientWidth = 646
TabOrder = 0
DesignLeft = 581
@ -37,12 +37,12 @@ object ChartAxisFrame: TChartAxisFrame
object PageControl: TPageControl
AnchorSideTop.Side = asrBottom
Left = 0
Height = 406
Height = 446
Top = 25
Width = 646
ActivePage = pgTitle
ActivePage = pgLabels
Align = alClient
TabIndex = 0
TabIndex = 1
TabOrder = 1
object pgTitle: TTabSheet
Caption = 'Title'
@ -220,8 +220,8 @@ object ChartAxisFrame: TChartAxisFrame
end
object pgLabels: TTabSheet
Caption = 'Labels'
ClientHeight = 378
ClientWidth = 513
ClientHeight = 418
ClientWidth = 638
object gbAxisRange: TGroupBox
AnchorSideLeft.Control = pgLabels
AnchorSideTop.Control = pgLabels
@ -229,14 +229,14 @@ object ChartAxisFrame: TChartAxisFrame
Left = 8
Height = 150
Top = 8
Width = 240
Width = 303
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Top = 8
Caption = 'Axis limits'
ClientHeight = 130
ClientWidth = 236
ClientWidth = 299
TabOrder = 0
object lblAutomatic: TLabel
AnchorSideLeft.Control = gbAxisRange
@ -287,7 +287,7 @@ object ChartAxisFrame: TChartAxisFrame
Left = 128
Height = 23
Top = 29
Width = 84
Width = 147
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
@ -305,7 +305,7 @@ object ChartAxisFrame: TChartAxisFrame
Left = 128
Height = 23
Top = 60
Width = 84
Width = 147
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
@ -343,10 +343,10 @@ object ChartAxisFrame: TChartAxisFrame
AnchorSideTop.Control = gbAxisRange
AnchorSideRight.Control = pgLabels
AnchorSideRight.Side = asrBottom
Left = 264
Left = 327
Height = 104
Top = 8
Width = 241
Width = 303
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = 'gbLabelFont'
@ -359,12 +359,13 @@ object ChartAxisFrame: TChartAxisFrame
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbLabelFont
AnchorSideRight.Side = asrBottom
Left = 264
Left = 327
Height = 266
Top = 128
Width = 241
Width = 303
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 16
BorderSpacing.Bottom = 8
Caption = 'gbShapeFillBorder'
TabOrder = 4
end
@ -376,13 +377,13 @@ object ChartAxisFrame: TChartAxisFrame
Left = 8
Height = 113
Top = 168
Width = 240
Width = 303
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 10
Caption = 'Labels'
ClientHeight = 93
ClientWidth = 236
ClientWidth = 299
TabOrder = 1
object cbLabelsVisible: TCheckBox
AnchorSideLeft.Control = gbLabels
@ -407,7 +408,7 @@ object ChartAxisFrame: TChartAxisFrame
Left = 96
Height = 23
Top = 27
Width = 124
Width = 187
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 35
BorderSpacing.Top = 6
@ -435,7 +436,7 @@ object ChartAxisFrame: TChartAxisFrame
Left = 96
Height = 23
Top = 58
Width = 67
Width = 130
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Bottom = 12
@ -458,7 +459,7 @@ object ChartAxisFrame: TChartAxisFrame
object Bevel2: TBevel
AnchorSideLeft.Control = pgLabels
AnchorSideLeft.Side = asrCenter
Left = 248
Left = 311
Height = 50
Top = 280
Width = 16
@ -474,14 +475,14 @@ object ChartAxisFrame: TChartAxisFrame
Left = 8
Height = 88
Top = 291
Width = 240
Width = 303
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 10
BorderSpacing.Bottom = 8
Caption = 'Ticks'
ClientHeight = 68
ClientWidth = 236
ClientWidth = 299
TabOrder = 2
object seTickLength: TSpinEdit
AnchorSideLeft.Control = lblTickLength
@ -490,7 +491,7 @@ object ChartAxisFrame: TChartAxisFrame
Left = 99
Height = 23
Top = 2
Width = 67
Width = 130
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 16
@ -505,7 +506,7 @@ object ChartAxisFrame: TChartAxisFrame
Left = 99
Height = 23
Top = 33
Width = 67
Width = 130
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
@ -539,7 +540,7 @@ object ChartAxisFrame: TChartAxisFrame
object cbTickColor: TColorButton
AnchorSideTop.Side = asrCenter
AnchorSideRight.Side = asrBottom
Left = 184
Left = 247
Height = 25
Top = 20
Width = 32

5
components/tachart/demo/charteditor/ceaxisframe.pas
View File

@ -239,7 +239,10 @@ begin
TitleMemoPanel.BorderSpacing.Around * 2;
PreferredHeight :=
gbTicks.Top + gbTicks.Height + gbTicks.BorderSpacing.Bottom +
Max(
gbTicks.Top + gbTicks.Height + gbTicks.BorderSpacing.Bottom,
gbShapeFillBorder.Top + gbShapeFillBorder.Height + gbShapeFillBorder.BorderSpacing.Bottom
) +
PageControl.Height - PageControl.ClientHeight +
PanelTop.Height;
end;

1
components/tachart/demo/charteditor/cecharteditor.pas
View File

@ -292,6 +292,7 @@ end;
procedure TChartEditorForm.FormCreate(Sender: TObject);
begin
ceImages.ChartImagesDM.ChartImages.GetBitmap(7, ButtonPanel.CloseButton.Glyph);
Tree.Items.BeginUpdate;
try
Tree.Items.Clear;

94
components/tachart/demo/charteditor/ceimages.lfm
View File

@ -8,48 +8,58 @@ object ChartImagesDM: TChartImagesDM
Left = 128
Top = 32
Bitmap = {
4C7A0700000010000000100000002A0500000000000078DAED984B4C1B571486
3171058828C40147952221924516C9260BBAA91AB26015296CC8020950050836
B0804D8046516584A01405E882053B17D7049080A2F028CFF08A0B1410221106
63504885DF06FCC0F6D89EB9D37B8C87D8C61ECF98366A2BAEF46B66ECFB8DEF
EB3FE7C87171814D62E0A6484D62502A1D149BB8F077EF7E4B871357FE22BF7F
B1F9C7D6868686BE191919D91F1B1B537111F40526905F5D5DDD72BBDDDA7072
B95C41CFD0970FDFDADAEA282C2CA42412894BAD561BD9788220B472B9DC6636
9BF5F0BCB8B8785854544402373E3E7EACC78D8D9F9A9A3ACACFCFA7E0F70606
062CC0C23BB88C1FE6595656E65D5A5A3ADCDCDC345556567A5A5A5A1CA1F389
C4F7F7F75B9E3F7F4E30FD602E76BB5DC795DFDFDF37ECEEEE1A23AD231B3F3A
3ABA373D3DADE422E81BC8CFCCCC0827272753F80898CBF37B797EFF5FE7F732
7FF19D3F4DD302BE6B0F924AA589C0CB64B264BC971ABCA71F78E84FCCBC6078
1C0F3EB29DB750FFAB542AEDF0F0F0F75CF9B6B63627F623AAAFAF27565656CC
6CBC46A331ACAFAF9B9967E88F3D8CB02FD0C4C4844BA954B2F238D638737373
69EC5BE7C1C181A1B4B4945428142E8FC7A38F36FEBDBD3D63414101C21CDDD1
D181F07B5053539333743E91F8868606577777377AF2A48B4C4B6BA644A21FA8
1B379AA8D4D41F83049F2726D69FC05960789BCDA6ABAEAEF658AD56E3E3C772
FC1E355A5E76D26FDE3869B8E2B377A6CD4DDF1505F281E363F8EC6C92CEC840
345C150A2D5D5D2DF3E9D933193C9FF1A1E72733F327475797CACF533EFEED5B
8D8F63C4F0E1CEAF505837DCD5B543AC4DE9A8DF5F6D5370E5E725C9AFC09F7C
9D8DBCE22F69B8CECE7EA4F0EF2210DC7F0E5EB5ACA5D4935B145CF98E9F5F2C
A00558F762CDFFE9E98E9CA424EF0E3E930FB90AC7EFEB0C7FED9A7B352989A4
7A7B9777E7E7E7B7A329B87EA08557AEA06388645555A43D5AEE02C13B02F8A7
0201A280CFCC44EE70FD218FB2F0BFC5C7D32EE0535311A552790DA1FCE0E0A0
A5A4A4846C6F6F3F813A228417DFBA65EF03FEFD7BAFC1E1706B2D168B2E30F6
410D81E77CDCD9D969DBD8D83005F3717177EE58A5C0BB5CA74C7979B9A7B7B7
D70AF7B89FA5B6B696883CFE607E6D6DCD8C6396B7A2A2C203B107C60D9F71E5
81E9E9E9B142DDD1D8D8E8ACA9A921D8D7FF136F3098F479797994C9643A8B95
46A351CF959F9F5F386C6E6E76F2DBFFF3EB172B3F3BBBB0353737175510E302
F99414EF77090994666060F4512CFEF9E71B9D83F50A2B33CC77D79393BDCDB7
6F5B7F8E24ECEF15581F8180F60885D4515A9A73EAC103EB577E3E03BEE32391
8820FDEFF4D520FDFD235978EDB761FFC2A9AE8EB2DEBC89A8AC2C44BC7C495A
C6C7153BA1F52BEC69A4FDD66A09BD4EF7297F87EE7F349EDDFFE779BEFE0FE5
F9FA3F908FC5FF817C2CFE6778F07D2CFE67F88585D8FC1F6DFFB8F0E0692EDE
0FE77FF0329FDCF9F9FD7FCEF3F74E6B86D8C68F73BD3A3D9DC809FDFF804BEE
EFEB5BDE855AE1D4FFFCF7AFAA8AB2430CF1D70C422E7C60FE871AC11FCBA066
78CAC7FF757532874844FA6A0D7FCD30CAC7FF52E92FB6D7AFB78E80F7D70C62
BEFE877808FC69CEE2EFFF687C34FFB3F15CFCCFC673F17FB4F14753249EABFF
A14608E5F9F8076A04A815A06688FB97B48BC62F3EFE3F5FFFFF3DF19BABFF2F
F3FF7F33FFBF7BE73146E20707871FB2D58F20B11851F7EF234F7131E990CBFF
08FAFFF2EA55F73A9FFA352181448989E4077CFF08785CCF56B0D5CFA0F87804
790BE1BC654F4EF66C89C5AE62FCFC058F9C8D730D5DC4D4CC4CFB0B48C2044D
4C7A0800000010000000100000004E0600000000000078DAED995F4C53571CC7
DBD25BE8302242CD1217A226DB83BEF8802FCBD4643E9968B2E803899A0589BE
C883BC88CE2C4B09D331A238272875D9D00E5412614C81898020C8900121EAF8
530145630B6D11DA7BFBE7B6BDF7DC9D5F69B12DEDED3D7533DBC249BEB9BDF4
7C6ECFF99DF33DBF5F2E325968D39AA52956D39A47469CBC98A4F01F7DF4B910
4D52F9B7F9FDB79B7F62EDF6EDDB9F3435354DDDB973C72045D01798507E6060
60D4E3F198A2C9ED7687DD435F12BEACACCC79E0C0015EABD5BAC7C7C72D623C
CBB2A6EAEA6A7A76767606EE7B7B7B5FE7E6E672C0B5B4B4CCCFE026C6B7B5B5
CDEDDBB78F87DFABAFAFB7010BCF90327E98E7E1C3877D0F1F3E7C3D3C3C6C3D
7AF4A8F7ECD9B3CEC8F9C4E2EBEAEA6C274F9E6483FD602E0CC34C4BE5A7A6A6
CC13131396587114E39B9B9B27DBDBDB47A408FA86F21D1D1DCAD6D6D6341201
B3BC7F97F7EFFF6BFF2EE72FD2F90B8220278D3DA8AAAA2A0578BD5E9F8AD7D2
88D7F439815E62E6CB208FCF831762FB2DD2FF0683C1D4D8D8F89554FEDCB973
2EEC47545C5CCCF6F7F7CF8AF146A3D13C3434341BBC87FED8C308FB02DDBD7B
D73D323222CAE3B3C6B567CF1E01FBD6F5EAD52BF3A14387B89E9E1EB7D7EB9D
8937FEC9C949CBFEFDFB11E684CACA4A849F834A4A4A5C91F389C59F3A75CA7D
FDFA75B46B570D979959CAA7A77FC3AF5E5DC267647C1B26F87B4A4AB103F642
90A7697ABAB0B0D06BB7DB2D3B7756E3E78CA3BE3E9770EF9E4B802BDE7B8B1A
1EF65F51281F3ABE20BF630727AC5B8704B8F6F49884C242BD5FC78EE9E17E91
8FDC3FD9D9DF396B6A0C019EF7F30F1E18FD5C50413EDAFE552A8B1A6B6A9EB2
836DD3FCEFD7C678B8927949FB0BF08E8F77209FE67D01AE9D9D2F78FCBB0804
9FDF056FE833F1E3ADA33C5C49C74F76160872AC8D89E6FFAC2CE76EB5DAF714
EFC9AD5285CFEF55417EE54ACF805ACDF1B5B57D135D5D5D63F1145E3F08CAA4
24340F27594101C7C4CB5D20784608BF572E473CF0D9D9C813AD3FE45111FE37
854270039F91817883C1678EE41B1A1A6C7979795C7979B903EA88085EB3762D
7313F8274F7C66A7D363B2D96CD3A1671FD41078CEF357AF5EA51F3D7A640DE7
65B20D1BEC55C0BBDD0BCC912347BCB5B5B576F88CFBD94E9C38C1C61E7F383F
3838388BCF2C5F7E7EBE17CE1E1837FC4D2A0FCC8D1B37EC50779C3E7DDA75FC
F871563CFE6F78B3D93A939393C35BADD6C5B3D262B1CC48E5BBBABA5F979696
BAC8D67F69FC12E53B3BBB47EFDFBF1F5770C685F26969BE2F929379637D7DF3
F644FCF3CF376137D635ACEC28DFAD4A4DF595AE5F6FBF124BD8DFFD101FB95C
F02A95FC5C66A6AB6DF366FB9600BF0EBE23517A3ACB059EE9AF41EAEA9AB6E1
D88FC1FA455351116F5FB306F1DBB621F6CC19CED6D2D2F334B27E85358DB5DE
26133B333DFD267F47AE7F3C5EDCFF4B7952FF47F2A4FE0FE513F17F289F88FF
833CF83E11FF07F9EEEEC4FC1F6FFDA4F0E06929DE8FE67FF03249EE7CF7FE5F
E2F98D0B354362E3C7B97E3C2B8BDD1DF9FE404AEEBF79B36F026A8505FF93AF
5F4101CFC01912A8199452F8D0FC0F3542E02C839A612F89FF8B8AF4CEF474CE
5F6B046A866612FF5755FD4CDFBA353A077CA066D090FA1FCE43E0177216B9FF
E3F1F1FC2FC64BF1BF182FC5FFF1C61F4FB178A9FE871A219227F10FD408502B
40CD20FB97B4B73DBF48FCBFB4FEFF7BCE6FA9FE5FCEFFFFCDFCFFF8B1D7128B
6F6868DC2A563F82341AC46FDA84BC070F72CEEAEA3FC2DE5FAE58E11922A95F
9393399492C23DC79FB7038FEBD97CB1FA19A45020C85B08E72D2635D53BAAD1
B80FE27B8A2067E35C23E4066BE677D154154C8EAA8246AA725A0853056D8CC7
A65C603EA5748C536EE5057849E97F5169E4044A473BE03B3196AAB06F51E17E
D09F944D3E6FFF10F79B574CF98859F5F7AE0FA84AC6AC18F5F2A4AC4C4767AA
74CCCBA4210F176441D415876F49FC02A2CAE9BC05D6F49EEA32F338A997F584
B2D124772081AA713A707CF4321DDE3F5A41455D66BA94ED6E575C16AF05F5A3
C3A9BA64FF7A31D6780CB1C6A7F8D3BBC82A9EF910C4417591FE2CEEC62913D4
AA4A9A91DB17D61E624255D273D4055BB6947D4755D0B9CA06172D4398ED60DD
78AECFD4E7E7B224EFDB1F9831C5B84F50FEEA72E2D83C90E9E6D2A4B2FEBD77
89F1517A1C271DFD138E2FD1FFD9F03AD6FAE317126322FE223D2129C681F617
A04339F5
}
end
end

1
components/tachart/demo/charteditor/charteditordemo.lpi
View File

@ -166,6 +166,7 @@
<Filename Value="ceimages.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="ChartImagesDM"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="DataModule"/>
<UnitName Value="ceImages"/>
</Unit>