type PInt64 = ^Int64;
Тип PInt64 - указатель на значение Int64. Арифметические операции над указателями, такие как Inc, Dec могут использоваться с ним, например чтобы управлять блоком Int64 значений, как показано в примере.
|
var int64Ptr : PInt64; a : TDateTime; begin // Ассигнование памяти для трёх Int64 переменных GetMem(int64Ptr, 3 * SizeOf(Int64)); // Заполнение этих переменных значениями int64Ptr^ := 1; Inc(int64Ptr); int64Ptr^ := 22; Inc(int64Ptr); int64Ptr^ := 333; // Показ этих значений Dec(int64Ptr, 2); ShowMessageFmt('Значение 1 = %d',[int64Ptr^]); Inc(int64Ptr); ShowMessageFmt('Значение 2 = %d',[int64Ptr^]); Inc(int64Ptr); ShowMessageFmt('Значение 3 = %d',[int64Ptr^]); end;
|