Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  


Основы Delphi
PExtended
Тип
Указатель на значение Extended с плавающей запятой System unit
  type PExtended = ^Extended;
Описание
Тип PExtended - указатель на Extended значение.

Арифметические операции над указателями, такие как Inc, Dec могут использоваться с ним, например чтобы управлять блоком Extended значений, как показано в примере.
Похожие команды
Dec  Декремент порядковой переменной

Extended  Тип с плавающей запятой обладающий самой высокой точностью и вместимостью

Inc  Увеличивает порядковую переменную

 
Пример кода : Сохранение 3-х значений Extended в памяти и перемещение по ним
var
  extPtr : PExtended;

begin
  // Ассигнование памяти для трёх extended переменных
  GetMem(extPtr, 3 * SizeOf(Extended));

  // Заполнение этих переменных значениями
  extPtr^ := 123.45;
  Inc(extPtr);
  extPtr^ := 2.9;
  Inc(extPtr);
  extPtr^ := 87654321;

  // Показ этих значений
  Dec(extPtr, 2);
  ShowMessageFmt('Значение 1 = %f',[extPtr^]);
  Inc(extPtr);
  ShowMessageFmt('Значение 2 = %f',[extPtr^]);
  Inc(extPtr);
  ShowMessageFmt('Значение 3 = %f',[extPtr^]);
end;
Значение 1 = 123.45
Значение 2 = 2.90
Значение 3 = 87654321.00
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия