Código Delphi [-]function mostrar(valor : string):string; var dato : Double; begin dato := StrToFloat(valor); result := FormatFloat('######,###',dato); end;
function mostrar(valor : string):string; var dato : Double; begin dato := StrToFloat(valor); result := FormatFloat('######,###',dato); end;