uses System.Variants;
var
Number, NullInt: Variant;
PiValue, CharA: Variant;
HasValue, NoValue: Variant;
begin
//Variant with Null is the standard
//"no value" holder
Number := 42;
NullInt := Null;
PiValue := 3.14;
CharA := 'A';
HasValue := True;
NoValue := Null;
WriteLn('number is ', VarToStr(Number));
//VarToStr(Null) is ''
WriteLn('nullInt is ', VarToStr(NullInt));
WriteLn('piValue is ', VarToStr(PiValue));
WriteLn('charA is ', VarToStr(CharA));
WriteLn('hasValue is ', VarToStr(HasValue));
end.