diff --git a/lib/common/kernel/msesystypes.pas b/lib/common/kernel/msesystypes.pas index b66637573..1ffabaae2 100644 --- a/lib/common/kernel/msesystypes.pas +++ b/lib/common/kernel/msesystypes.pas @@ -16,7 +16,17 @@ interface {$ifndef FPC} tlibhandle = thandle; {$endif} - threadty = ptruint; + + {$if defined(FPC) and (fpc_fullversion >= 030200)} + {$if defined(cpu64) and defined(mswindows)} + threadty = Longword; + {$else} + threadty = ptruint; + {$endif} + {$else} + threadty = ptruint; + {$endif} + procidty = ptrint; pprocidty = ^procidty; procidarty = array of procidty; //same item size as winidarty!