mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-01 23:29:34 +01:00
* ugly workaround to avoid range check warnings. (4811, 4723)
git-svn-id: trunk@2888 -
This commit is contained in:
parent
744c7a4acc
commit
548872e61c
@ -658,7 +658,7 @@
|
||||
TAPE_SETMARKS = 0;
|
||||
TAPE_SHORT_FILEMARKS = $2;
|
||||
{ CreateWindow }
|
||||
CW_USEDEFAULT = $80000000;
|
||||
CW_USEDEFAULT = longint($80000000);
|
||||
WS_BORDER = $800000;
|
||||
WS_CAPTION = $c00000;
|
||||
WS_CHILD = $40000000;
|
||||
|
||||
Loading…
Reference in New Issue
Block a user