mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-14 13:19:20 +02:00
TDateTimePicker - correction of drawing speed button arrow - asYetAnotherShape
git-svn-id: trunk@52593 -
This commit is contained in:
parent
620c7bc25f
commit
7c8840606e
@ -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;
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user