Res: [delphi-br] Currency para string

2008-01-25 Por tôpico Leonardo Freitag
ou edit1.text := FormatCurr('###,###,##0.00', cur); - Mensagem original De: Apoio <[EMAIL PROTECTED]> Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 15 de Janeiro de 2008 15:57:27 Assunto: Re: [delphi-br] Currency para string bem eu fiz aqui : procedure TFo

Re: [delphi-br] Currency para string

2008-01-16 Por tôpico Apoio
Casagrande To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 16, 2008 9:42 AM Subject: Re: [delphi-br] Currency para string >> 0123,45 >> >> e não >> >> 343.434.123.204,54 >> > > Utilize a sua própria rotina sem o S

RES: [delphi-br] Currency para string

2008-01-16 Por tôpico Davi Eduardo Borges Wall
Por quê você não altera o DecimalSeparator para o que você quer usar? De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Paulo Casagrande Enviada em: quarta-feira, 16 de janeiro de 2008 09:42 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Currency para string

Re: [delphi-br] Currency para string

2008-01-16 Por tôpico Paulo Casagrande
>> 0123,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 StringRepla

Re: [delphi-br] Currency para string

2008-01-16 Por tôpico Joao Morais
com.br > Sent: Tuesday, January 15, 2008 11:26 AM > Subject: [delphi-br] Currency para string > > > Bom dia a todos... > > A seguinte função recebe um currency e > retorna uma string conforme o tamanho indicado > e duas casas decimais separadas por vír

Re: [delphi-br] Currency para string

2008-01-16 Por tôpico Joao Morais
Paulo Casagrande wrote: > Obrigado pela ajuda, mas preciso que o retorno seja: > > 0123,45 > > e não > > 343.434.123.204,54 Utilize a sua própria rotina sem o StringReplace. -- Joao Morais > Obrigado! > >> bem eu fiz aqui : >> >> procedure TForm1.Button1Click(Sender: TObject); >>

Re: [delphi-br] Currency para string

2008-01-16 Por tôpico Paulo Casagrande
Bom dia a todos... Obrigado pela ajuda, mas preciso que o retorno seja: 0123,45 e não 343.434.123.204,54 Obrigado! > bem eu fiz aqui : > > procedure TForm1.Button1Click(Sender: TObject); > var cur : currency; > > begin > cur:= 343434123204.54; > edit1.Text:=FormatFloat('###,##0.

Re: [delphi-br] Currency para string

2008-01-15 Por tôpico Apoio
ormatfloat() - Original Message - From: Paulo Casagrande To: delphi-br@yahoogrupos.com.br Sent: Tuesday, January 15, 2008 11:26 AM Subject: [delphi-br] Currency para string Bom dia a todos... A seguinte função recebe um currency e retorna uma string conforme o tamanho indicad

[delphi-br] Currency para string

2008-01-15 Por tôpico Paulo Casagrande
Bom dia a todos... A seguinte função recebe um currency e retorna uma string conforme o tamanho indicado e duas casas decimais separadas por vírgula function FormatarCurr2D( Value: Currency; MaxLength: integer): string; begin Result := FormatCurr(StringOfChar('0', MaxLength - 4) + '0.00', Value