Re: [delphi-br] Valor por extenso

; end; function Ext3(Parte: string): string; var Base: string; digito: integer; begin Base := ''; digito := StrToInt(Parte[1]); if digito = 0 then Base := '' else Base := Centenas[digito]; if (digito = 1) and (Parte > '100&#

Re: [delphi-br] Valor por extenso

No pacote ACBr existe um componente para gerar extenso. acesse http://acbr.sf.net - Original Message - From: "Fernando Luiz Bortolanzza" <[EMAIL PROTECTED]> To: Sent: Thursday, July 06, 2006 1:59 PM Subject: RES: [delphi-br] Valor por extenso Peguei o pacotinho e ta

RES: [delphi-br] Valor por extenso

@yahoogrupos.com.br Assunto: Re: [delphi-br] Valor por extenso procure nessa página por TExtenso http://www.revolution.com.br/delphistop/comps.htm - Original Message - From: "Fernando Luiz Bortolanzza" <[EMAIL PROTECTED]> To: Sent: Thursday, July 06, 2006 1:30 PM Subject: [delp

Re: [delphi-br] Valor por extenso

procure nessa página por TExtenso http://www.revolution.com.br/delphistop/comps.htm - Original Message - From: "Fernando Luiz Bortolanzza" <[EMAIL PROTECTED]> To: Sent: Thursday, July 06, 2006 1:30 PM Subject: [delphi-br] Valor por extenso Alguem ai tem uma função q

[delphi-br] Valor por extenso

Alguem ai tem uma função que passa o valor em real e retorna o texto do valor por extenso? Atenciosamente, - Fernando Luiz Bortolanzza Analista de desenvolvimento de sistemas CoreSinPR – http://www.corepr.org.br