>> 000000000123,45
>>
>> e não
>>
>> 343.434.123.204,54
>>
>
> Utilize a sua própria rotina sem o StringReplace.
>
Acho que não dá... se não estou enganado o resultado depende do
DecimalSeparator,
assim sendo não tenho nenhuma garantia que DecimalSeparator é igual = ','
sem o StringReplace o resultado pode variar :)
Obrigado.
>>> function FormatarCurr2D( Value: Currency; MaxLength: integer): string;
>>> begin
>>> Result := FormatCurr(StringOfChar('0', MaxLength - 4) + '0.00', Value);
>>> Result := StringReplace(Result, DecimalSeparator, ',', [rfReplaceAll]);
>>> end;
>>>
>>> Ex: FormatarCurr2D( 123.45, 15) > retorna '000000000123,45'
>>>
>>> Tô achando feio esse código! Tem como fazer melhor??
>>>
>>> Obrigado
>>>
