| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
Fabianoluizdb
Membro Junior
Registrado: Segunda-Feira, 17 de Agosto de 2009
Mensagens: 396
|
 Enviada: Qui Dez 23, 2010 10:06 pm Assunto: ACBR Aliquotas |
 |
|
Pessoa
Estou fazendo um teste e gostaria de jogar todas a aliquotas da impressora num Grid alguem poderia me ajudar como fazer isso nos componentes da ACBR, deui uma olhada e não encontrei nada pareceido.
Valeu |
|
| Voltar ao Topo |
|
 |
rafmattos
Colaborador
Registrado: Quinta-Feira, 11 de Fevereiro de 2010
Mensagens: 3416
Localização: Campo Grande/MS
|
| Enviada: Dom Dez 26, 2010 10:55 pm Assunto: |
|
|
| na pasta DEMO do ACBR, tem um DEMO de como listar |
|
| Voltar ao Topo |
|
|
shawdown
Profissional
Registrado: Segunda-Feira, 1 de Outubro de 2007
Mensagens: 546
Localização: Goiania-GO
|
| Enviada: Sáb Jan 29, 2011 3:15 pm Assunto: Re: ACBR Aliquotas |
|
|
| Código: | procedure TForm1.AliquotasICMS1Click(Sender: TObject);
var A : Integer ;
begin
ACBrECF1.CarregaAliquotas ;
for A := 0 to ACBrECF1.Aliquotas.Count -1 do
begin
mResp.Lines.Add( 'Aliquota: '+IntToStrZero( ACBrECF1.Aliquotas[A].Sequencia,2)+
' Indice: '+ACBrECF1.Aliquotas[A].Indice +' -> '+
FloatToStr( ACBrECF1.Aliquotas[A].Aliquota ) + ' Tipo: '+
ACBrECF1.Aliquotas[A].Tipo );
end ;
mResp.Lines.Add('---------------------------------');
end; |
| Fabianoluizdb escreveu: | Pessoa
Estou fazendo um teste e gostaria de jogar todas a aliquotas da impressora num Grid alguem poderia me ajudar como fazer isso nos componentes da ACBR, deui uma olhada e não encontrei nada pareceido.
Valeu |
|
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
