Eu uso essa função
const
Centenas: array[1..9] of string[12] = ('CEM', 'DUZENTOS', 'TREZENTOS',
'QUATROCENTOS',
'QUINHENTOS', 'SEISCENTOS', 'SETECENTOS',
'OITOCENTOS', 'NOVECENTOS');
Dezenas: array[2..9] of string[10] = ('VINTE', 'TRINTA', 'QUARENTA',
'CINQUENTA',
'SESSENTA', 'SE
l, mas dentro do zip não tem nenhum .pas, como fiz no
leime para fazer a instalação :(
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Campus
Enviada em: quinta-feira, 6 de julho de 2006 13:50
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delp
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 que passa o valor e
3 matches
Mail list logo