FormatFloat (formato, numero)
Convierte un valor numérico en cadena de texto y, además, formatea la salida. Permite, por ejemplo, mostrar separadores de miles y un número determinado de decimales.
Ejemplo de uso:
importemes := totalMes(1);
total := importemes + total;
totalRetenciones := totalretenciones + totalRet;
totalBruto := totalBruto + totalBru;
totalHoras := totalHoras + totalHor;
txtenero.caption := formatfloat('###,###,###,##0.00;-###,###,###,##0.00;0',
importemes) + ' ' + vTMonedaEmpresa;
txtb1.caption := formatfloat('###,###,###,##0.00;-###,###,###,##0.00;0',
totalBru) + ' ' + vTMonedaEmpresa;
txti1.caption := formatfloat('###,###,###,##0.00;-###,###,###,##0.00;0',
totalRet) + ' ' + vTMonedaEmpresa;
txth1.caption := formatfloat('###,###,###,##0.0;-###,###,###,##0.0;0',
totalHor);
Funciones Delphi |