一个字符串怎么转换为VARIANT类型，不是将字符串包在VARIANT类型中，而是将一个字符串硬转成VARIANT。

[AlexXXX]

[zljzyj]

难道这样不可以吗？
var
Str:String;
Str1:Variant;
begin
Str:='ddd';
Str1:=Str;