mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-01 12:52:33 +02:00
TAChart: convert axis demo to FPC resources
Add logarithmic axis to the demo git-svn-id: trunk@23448 -
This commit is contained in:
parent
99706575d2
commit
fc3a9430bd
1
.gitattributes
vendored
1
.gitattributes
vendored
@ -2064,7 +2064,6 @@ components/tachart/demo/3d/zdemo.lpr svneol=native#text/plain
|
||||
components/tachart/demo/axis/axisdemo.lpi svneol=native#text/plain
|
||||
components/tachart/demo/axis/axisdemo.lpr svneol=native#text/pascal
|
||||
components/tachart/demo/axis/main.lfm svneol=native#text/plain
|
||||
components/tachart/demo/axis/main.lrs svneol=native#text/plain
|
||||
components/tachart/demo/axis/main.pas svneol=native#text/pascal
|
||||
components/tachart/demo/basic/demo.lpi svneol=native#text/plain
|
||||
components/tachart/demo/basic/demo.lpr svneol=native#text/plain
|
||||
|
@ -6,12 +6,13 @@
|
||||
<General>
|
||||
<Flags>
|
||||
<SaveClosedFiles Value="False"/>
|
||||
<LRSInOutputDirectory Value="False"/>
|
||||
</Flags>
|
||||
<SessionStorage Value="InProjectDir"/>
|
||||
<MainUnit Value="0"/>
|
||||
<TargetFileExt Value=".exe"/>
|
||||
<Title Value="TAChart axis demo"/>
|
||||
<UseXPManifest Value="True"/>
|
||||
<ResourceType Value="res"/>
|
||||
</General>
|
||||
<VersionInfo>
|
||||
<ProjectVersion Value=""/>
|
||||
|
@ -16,44 +16,45 @@ object Form1: TForm1
|
||||
AxisList = <
|
||||
item
|
||||
Alignment = calLeft
|
||||
Offset = 0
|
||||
Scale = 1
|
||||
TickColor = clRed
|
||||
Title.Caption = 'Left'
|
||||
Title.Font.Orientation = 900
|
||||
Title.Visible = True
|
||||
Transformation.Logarithmic = True
|
||||
Transformation.Offset = 0
|
||||
Transformation.Scale = 1
|
||||
end
|
||||
item
|
||||
Alignment = calRight
|
||||
Offset = 1
|
||||
Scale = 2
|
||||
Title.Caption = 'Right 1'
|
||||
Title.Font.Orientation = 900
|
||||
Title.Visible = True
|
||||
Transformation.Offset = 0
|
||||
Transformation.Scale = 1
|
||||
end
|
||||
item
|
||||
Alignment = calBottom
|
||||
Offset = 0
|
||||
Scale = 1
|
||||
Title.Caption = 'Bottom'
|
||||
Title.Distance = 0
|
||||
Title.Visible = True
|
||||
Transformation.Offset = 0
|
||||
Transformation.Scale = 1
|
||||
end
|
||||
item
|
||||
Alignment = calRight
|
||||
Grid.Visible = False
|
||||
Offset = 0
|
||||
Scale = -1
|
||||
TickColor = clAqua
|
||||
Title.Caption = 'Right 2'
|
||||
Title.Visible = True
|
||||
Transformation.Offset = 0
|
||||
Transformation.Scale = 1
|
||||
end
|
||||
item
|
||||
Alignment = calTop
|
||||
Inverted = True
|
||||
Offset = 0
|
||||
Scale = 1
|
||||
Title.Caption = 'Top'
|
||||
Transformation.Offset = 0
|
||||
Transformation.Scale = 1
|
||||
end>
|
||||
Foot.Brush.Color = clBtnFace
|
||||
Foot.Font.Color = clBlue
|
||||
@ -65,6 +66,7 @@ object Form1: TForm1
|
||||
Align = alClient
|
||||
ParentColor = False
|
||||
object Chart1LineSeries1: TLineSeries
|
||||
AxisIndexY = 0
|
||||
SeriesColor = clBlack
|
||||
Source = RandomChartSource1
|
||||
end
|
||||
@ -74,7 +76,7 @@ object Form1: TForm1
|
||||
RandSeed = 99566593
|
||||
XMax = 20
|
||||
XMin = 10
|
||||
YMax = 2
|
||||
YMax = 20
|
||||
YMin = 1
|
||||
left = 216
|
||||
top = 108
|
||||
|
@ -1,28 +0,0 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TForm1','FORMDATA',[
|
||||
'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'X'#1#6'Height'#3'0'#1#3'Top'#3#182#0#5'Wi'
|
||||
+'dth'#3#21#2#7'Caption'#6#5'Form1'#12'ClientHeight'#3'0'#1#11'ClientWidth'#3
|
||||
+#21#2#8'Position'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.29'#0#6'TChart'
|
||||
+#6'Chart1'#4'Left'#2#0#6'Height'#3'0'#1#3'Top'#2#0#5'Width'#3#21#2#8'AxisLis'
|
||||
+'t'#14#1#9'Alignment'#7#7'calLeft'#6'Offset'#5#0#0#0#0#0#0#0#0#0#0#5'Scale'#5
|
||||
+#0#0#0#0#0#0#0#128#255'?'#9'TickColor'#7#5'clRed'#13'Title.Caption'#6#4'Left'
|
||||
+#22'Title.Font.Orientation'#3#132#3#13'Title.Visible'#9#0#1#9'Alignment'#7#8
|
||||
+'calRight'#6'Offset'#5#0#0#0#0#0#0#0#128#255'?'#5'Scale'#5#0#0#0#0#0#0#0#128
|
||||
+#0'@'#13'Title.Caption'#6#7'Right 1'#22'Title.Font.Orientation'#3#132#3#13'T'
|
||||
+'itle.Visible'#9#0#1#9'Alignment'#7#9'calBottom'#6'Offset'#5#0#0#0#0#0#0#0#0
|
||||
+#0#0#5'Scale'#5#0#0#0#0#0#0#0#128#255'?'#13'Title.Caption'#6#6'Bottom'#14'Ti'
|
||||
+'tle.Distance'#2#0#13'Title.Visible'#9#0#1#9'Alignment'#7#8'calRight'#12'Gri'
|
||||
+'d.Visible'#8#6'Offset'#5#0#0#0#0#0#0#0#0#0#0#5'Scale'#5#0#0#0#0#0#0#0#128
|
||||
+#255#191#9'TickColor'#7#6'clAqua'#13'Title.Caption'#6#7'Right 2'#13'Title.Vi'
|
||||
+'sible'#9#0#1#9'Alignment'#7#6'calTop'#8'Inverted'#9#6'Offset'#5#0#0#0#0#0#0
|
||||
+#0#0#0#0#5'Scale'#5#0#0#0#0#0#0#0#128#255'?'#13'Title.Caption'#6#3'Top'#0#0
|
||||
+#16'Foot.Brush.Color'#7#9'clBtnFace'#15'Foot.Font.Color'#7#6'clBlue'#17'Titl'
|
||||
+'e.Brush.Color'#7#9'clBtnFace'#16'Title.Font.Color'#7#6'clBlue'#18'Title.Tex'
|
||||
+'t.Strings'#1#6#7'TAChart'#0#5'Align'#7#8'alClient'#11'ParentColor'#8#0#11'T'
|
||||
+'LineSeries'#17'Chart1LineSeries1'#11'SeriesColor'#7#7'clBlack'#6'Source'#7
|
||||
+#18'RandomChartSource1'#0#0#0#18'TRandomChartSource'#18'RandomChartSource1'
|
||||
+#12'PointsNumber'#2#30#8'RandSeed'#4#1'D'#239#5#4'XMax'#5#0#0#0#0#0#0#0#160#3
|
||||
+'@'#4'XMin'#5#0#0#0#0#0#0#0#160#2'@'#4'YMax'#5#0#0#0#0#0#0#0#128#0'@'#4'YMin'
|
||||
+#5#0#0#0#0#0#0#0#128#255'?'#4'left'#3#216#0#3'top'#2'l'#0#0#0
|
||||
]);
|
@ -5,8 +5,7 @@ unit Main;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
|
||||
TAGraph, TASeries, TASources;
|
||||
Forms, TAGraph, TASeries, TASources;
|
||||
|
||||
type
|
||||
|
||||
@ -24,6 +23,8 @@ var
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.lfm}
|
||||
|
||||
{ TForm1 }
|
||||
|
||||
procedure TForm1.TChartAxisList1MarkToText(var AText: String; AMark: Double);
|
||||
@ -32,8 +33,5 @@ begin
|
||||
AText := '*' + AText + '*';
|
||||
end;
|
||||
|
||||
initialization
|
||||
{$I main.lrs}
|
||||
|
||||
end.
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user