Olá, tenho uma dúvida em uma aplicação... eu tenho uma tela de escrituração de notas, na qual eu importo os XML's que quiser... agora estou fazendo uma auxiliar que permite que o usuário selecione vários XML de uma vez e importe, assim, eu chamo a tela original de escrituração oculta e vou dando insert a cada arquivo lido no loop. O problema é que quando existem items na qual utilizo Case.. não consigo fazer, segue exemplo:
case Frm_Escrituracao_Notas.AcBrNFe.NotasFiscais.Items[0].NFe.Ide.indPag of
TpcnIndicadorPagamento(0) : Frm_Escrituracao_Notas.CDS_CADASTROIDE_INDPAG.AsString := '0'; // VISTA
TpcnIndicadorPagamento(1) : Frm_Escrituracao_Notas.CDS_CADASTROIDE_INDPAG.AsString := '1'; // PRAZO
TpcnIndicadorPagamento(2) : Frm_Escrituracao_Notas.CDS_CADASTROIDE_INDPAG.AsString := '2'; // OUTROS
end;
Não consigo compilar pq não acha os TpcnIndicadorPagamento dentro do case na tela secundária...
Alguém pode me ajudar?