paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 11:59:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

TDateTimePicker - correction of drawing speed button arrow - asYetAnotherShape

Browse Source 
git-svn-id: trunk@52593 -
This commit is contained in:
zoran 2016-07-01 11:03:51 +00:00
parent 620c7bc25f
commit 7c8840606e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/datetimectrls/datetimepicker.pas
View File

@ -3605,7 +3605,7 @@ begin
asYetAnotherShape: asYetAnotherShape:
{ something in between, not very pretty: } { something in between, not very pretty: }
Canvas.Polygon([Point(X+0, Y+1), Point(X+1, Y+0), Canvas.Polygon([Point(X+0, Y+1), Point(X+1, Y+0),
Point(X+2, Y+1), Point(X+6, Y+1),Point(X+7, Y+0), Point(X+8, 1), Point(X+4, Y+5)]); Point(X+2, Y+1), Point(X+6, Y+1),Point(X+7, Y+0), Point(X+8, Y+1), Point(X+4, Y+5)]);
end; end;
end; end;