con los variant el "cast" es automático no necesitas cambiar nada....e incluso puedes mostrar un variant en un showmessage...
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
p:variant;
begin
p:=323;
s:=p;
showmessage(s);
showmessage(p)
end;