[tcp_ip_es]

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;