home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 9 Archive
/
09-Archive.zip
/
lxlt121s.zip
/
lxLite_src
/
common
/
Use32.pas
< prev
Wrap
Pascal/Delphi Source File
|
1996-09-04
|
609b
|
32 lines
unit Use32;
interface
type
SmallWord = System.Word;
SmallInt = System.Integer;
Word16 = System.Word;
Integer16 = System.Integer;
Integer32 = System.Longint;
Word32 = System.Longint;
{$IFDEF USE32}
Integer = System.Longint;
Word = System.Longint;
const
MaxInt = MaxLongint;
{$ENDIF}
type
pByte = ^Byte;
pWord = ^Word;
pLongint = ^Longint;
pSmallInt = ^SmallInt;
pSmallWord = ^SmallWord;
pWord16 = ^Word16;
pInteger16 = ^Integer16;
pWord32 = ^Word32;
pInteger32 = ^Integer32;
implementation
end.