24 lines
675 B
ObjectPascal
24 lines
675 B
ObjectPascal
{In Delphi you can have variables of a range of sizes}
|
|
var B: Byte; {8-bit, unsigned}
|
|
var C: char; {ASCII character}
|
|
var SI: shortint; {8-bit, signed}
|
|
var SM: Smallint; {16-bit signed}
|
|
var LI: Longint; {32-bit signed}
|
|
var W: word; {16-bit unsigned}
|
|
var LW: Longword; {32-bit unsigned}
|
|
var II: Int64; {64-bit signed}
|
|
var SR: Real48; {6-byte real}
|
|
var SN: single; {4-byte real}
|
|
var DB: double; {8-byte real}
|
|
var EX: Extended; {10-byte real}
|
|
var CM: Comp; {8-byte fixed point}
|
|
var CR: Currency; {8-byte fixed point}
|
|
|
|
{You can also custom define the size range of variable}
|
|
|
|
type TNumRange = -128..127;
|
|
var NM: TNumRange;
|
|
|
|
type TUpperCase = 'A'..'Z';
|
|
var UP: TUpperCase;
|