Hi.

I found, that this code does not work like in Delphii (-Sd).

var
  v: variant;
begin
  v := 'hi';
  writeln(VarType(v));
  writeln(varEmpty);
  writeln(varNull);
  if VarType(v) in [varEmpty, varNull] then
    writeln('NULL')
  else
    writeln(v);
end.

FPC output:
256
0
1
NULL

DCC output:
256
0
1
hi

I think that compiler makes set [varEmpty, varNull] only 8-bit. Is't any switch here to increase Delphi compatibility?

Petr