Тип данных Variant

В среде Delphi определен стандартный тип данных Variant, с помощью которого объявляются переменные с непостоянным типом значений. Такие переменные могут принимать значения разных типов данных в зависимости от типа выражения, в котором используются. Следующий пример хорошо демонстрирует мощь переменных с непостоянным типом значений:

program Console;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  V1, V2, V3, V4: Variant;

begin
  V1 := 5;             // целое число
  V2 := 0.8;           // вещественное число
  V3 := '10';          // строка
  V4 := V1 + V2 + V3;  // вещественное число 15.8
  Writeln(V4);         // 15.8
  Writeln('Press Enter to exit...');
  Readln;
end.