| Description |
The MaxLongInt constant gives the largest allowed value for a LongInt.
The value is (2^31) -1 = 2,147,483,647
It is often used when the size of something, such as an array, is unknown.
|
|
| Related commands |
| LongInt |
|
An Integer whose size is guaranteed to be 32 bits |
| MaxInt |
|
The maximum value an Integer can have |
|
|
|
| Example code : Copying the trailing characters of a string |
// Full Unit code.
// -----------------------------------------------------------
// You must store this code in a unit called Unit1 with a form
// called Form1 that has an OnCreate event called FormCreate.
unit Unit1;
interface
uses
// The System unit does not need to be defined
Forms, Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm} // Include form definitions
procedure TForm1.FormCreate(Sender: TObject);
var
Source, Target : string;
begin
Source := 'Assume that we do not know how long this string is';
// Copy all characters from the 8th onwards
Target := Copy(Source, 8, MaxLongInt);
ShowMessage('Source : '+Source);
ShowMessage('Target : '+Target);
end;
end.
|
| Hide full unit code |
Source : Assume that we do not know how long this string is
Target : that we do not know how long this string is
|
|