paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-24 01:59:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

AROS: Intuition.library structure fixes

Browse Source 
git-svn-id: trunk@41947 -
This commit is contained in:
marcus 2019-04-27 21:46:47 +00:00
parent 3a964d8556
commit b6c095c771
1 changed files with 4 additions and 4 deletions

8
packages/arosunits/src/intuition.pas
View File

@ -1471,7 +1471,7 @@ type
ViewInitX,
ViewInitY: SmallInt; // View initial offset values
EnableCLI: LongBool; // CLI availability switch
EnableCLI: WordBool; // CLI availability switch
// printer configurations
PrinterType: Word; // printer type
@ -1663,11 +1663,11 @@ type
Screens are then maintained in a front to back order using Screen.NextScreen }
Flags: LongWord; // see definitions below
{$ifdef AROS_BINCOMPAT}
MouseX,
MouseY: SmallInt; // mouse position relative to View
{$else}
MouseY,
MouseX: SmallInt; // mouse position relative to View
{$else}
MouseX,
MouseY: SmallInt; // mouse position relative to View
{$endif}
Seconds: LongWord; // timestamp of most current input event