100分:变体类型怎么转换成STRING?

Question

VAR
 v:vraint;
 t:string; 
 BEGIN
   v:=0;
  t:=t+v;
  v:='yt';
  t:=t+v;
end;
运行时出现类型转换错误.怎么解决?

Answer 1

function VarToStr(const V: Variant): string;

Answer 2

t:=t+v;?????????t没有初始化吧。

Answer 3

VAR
 v:Variant;
 t:string;
BEGIN
  v:=0;
  t:=t+String(v);
  v:='yt';
  t:=t+v;
  showmessage(t);
end;显示'0yt'

Answer 4

VAR
 v:variant;
 t:string; 
 BEGIN
   v:=0;
  v := vartostr(v);
  t:=t+v;
  v:='yt';
  t:=t+v;
end;

Answer 5

还有：
你的
VAR
 v:vraint;
写错了
应该为：
v:variant;