paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 21:33:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

fix TAnchorKind definition

Browse Source
This commit is contained in:
Ondrej Pokorny 2022-12-18 11:56:03 +01:00 committed by Marco Van de Voort
parent 72fd08df03
commit d9f05d341d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/rtl-objpas/src/inc/system.uitypes.pp
View File

@ -257,7 +257,7 @@ type
TDragMessage = (dmDragEnter, dmDragLeave, dmDragMove, dmDragDrop, TDragMessage = (dmDragEnter, dmDragLeave, dmDragMove, dmDragDrop,
dmDragCancel,dmFindTarget); dmDragCancel,dmFindTarget);
TAnchorKind = (akLeft, akTop, akRight, akBottom); TAnchorKind = (akTop, akLeft, akRight, akBottom);
TAnchors = set of TAnchorKind; TAnchors = set of TAnchorKind;
TAnchorSideReference = (asrTop, asrBottom, asrCenter); TAnchorSideReference = (asrTop, asrBottom, asrCenter);