Eliminar una coma de un valor obtenido

[maxzama]

Hola...

Si me puede decir, que me hace falta en el código que le voy a mostrar. Para eliminar la coma de un resultado ej: 456,78...

Quiero que elimine la (coma) a través de una búsqueda. Y no que, yo le indique donde se encuentra la coma por ej: Delete(Eliminar,4,1);

Este es mi codigo:

Código Delphi [-]
var

Texto: String;
Z:Real;

Pos:integer;

Begin

      Z:=(Sdt-R);
      Str (Z,texto);
      Str (Z:5:2,texto);
      texto:=texto;

                                    //Y:= delete(pos('.',texto));
     Pos:=pos('.',texto);
     Delete(texto,pos,1);
                                  //Delete(Eliminar,7,1);

      Edit32.Text:=(texto);

Espero su respuesta. Pr fvr y grcs...

Disculpe por la ortografía...