Hola julyus.
Con los tipo Variant podes hacer lo siguiente:
Código Delphi
[-]
var
va: Variant;
ext: Extended;
str: string;
begin
ext:= 3.141592654;
str:= 'Número PI';
va:= ext;
str:= va;
ShowMessage(str);
end;
¿ En que parte del código te salta el error ?
Saludos.