如何返回一个表达式的数据类型？
例如：var abc:String;
如何得知abc的类型就是String？


[解决办法]

Delphi(Pascal) code

function GetVarType(const v: Variant): string;begin  case VarType(v) of    varEmpty    : Result := 'Empty';    varNull     : Result := 'Null';    varSmallint : Result := 'Smallint';    varInteger  : Result := 'Integer';    varSingle   : Result := 'Single';    varDouble   : Result := 'Double';    varCurrency : Result := 'Currency';    varDate     : Result := 'Date';    varOleStr   : Result := 'OleStr';    varDispatch : Result := 'Dispatch';    varError    : Result := 'Error';    varBoolean  : Result := 'Boolean';    varVariant  : Result := 'Variant';    varUnknown  : Result := 'Unknown';    varShortInt : Result := 'ShortInt';    varByte     : Result := 'Byte';    varWord     : Result := 'Word';    varLongWord : Result := 'LongWord';    varInt64    : Result := 'Int64';    varStrArg   : Result := 'StrArg';    varString   : Result := 'String';    varAny      : Result := 'Any';    varTypeMask : Result := 'TypeMask';    varArray    : Result := 'Array';    varByRef    : Result := 'ByRef';  end;end;procedure TForm1.Button1Click(Sender: TObject);var s:string;begins := 'xx';ShowMessage(GetVarType(s));end;