paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-10 03:48:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart. Fix typos in new DateTimeStepFormat and in axis demo

Browse Source 
git-svn-id: trunk@52781 -
This commit is contained in:
wp 2016-08-03 20:44:16 +00:00
parent b722e49778
commit fddf4ea109
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
components/tachart/demo/axis/main.pas
View File

@ -149,11 +149,11 @@ procedure TForm1.CbAlternateFormatChange(Sender: TObject);
begin
with DateTimeIntervalChartSource1.DateTimeStepFormat do
if CbAlternateFormat.Checked then begin
WeekFormat := 'dd.mmm.';
DayFormat := 'dd.mm.';
HourFormat := 'dd. hh:nn';
SecondFormat := 'hh.nn';
MillisecondFormat := 'ss.zzz';
WeekFormat := 'dd"."mmm"."';
DayFormat := 'dd"."mm"."';
HourFormat := 'dd". "hh:nn';
SecondFormat := 'nn"."ss';
MillisecondFormat := 'ss"."zzz';
end else begin
WeekFormat := DEFAULT_WEEK_FORMAT;
DayFormat := DEFAULT_DAY_FORMAT;

2
components/tachart/taintervalsources.pas
View File

@ -145,7 +145,7 @@ const
DEFAULT_DAY_FORMAT = 'dd/mm';
DEFAULT_HOUR_FORMAT = 'dd hh:00';
DEFAULT_MINUTE_FORMAT = 'hh:nn';
DEFAULT_SECOND_FORMAT = 'hh:ss';
DEFAULT_SECOND_FORMAT = 'nn:ss';
DEFAULT_MILLISECOND_FORMAT = 'szzz"ms"';
procedure Register;