Ir para conteúdo
  • Cadastre-se

NatanaB

Membros
  • Total de ítens

    54
  • Registro em

  • Última visita

Últimos Visitantes

849 visualizações

NatanaB's Achievements

Contributor

Contributor (5/14)

  • First Post
  • Collaborator Rare
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

6

Reputação

3

Community Answers

  1. Olá! Consegui fazendo o seguinte: Declarei as seguintes variáveis: EmitXML : TEmit; ctxRtti : TRttiContext; typeRtti : TRttiType; propRtti : TRttiProperty; e depois do método LoadFromFile: for J := 0 to ACBrNFeXML.NotasFiscais.Count - 1 do begin with ACBrNFeXML.NotasFiscais.Items[J].NFe.Ide do begin with ACBrNFeXML.NotasFiscais.Items[J].NFe.Emit do begin EmitXML := TEmit.Create; typeRtti := ctxRtti.GetType(EmitXML.ClassType); EmitXML := ACBrNFeXML.NotasFiscais.Items[J].NFe.Emit; for propRtti in typeRtti.GetProperties do ShowMessage(propRtti.GetValue(EmitXML).ToString); end; end; end; Obrigada!
  2. Boa noite! Obrigada Juliomar Vou mostrar aqui pra vocês o método encontrado... procedure TFrmLeituraXML.getPropList(Classe: TClass); var T: TRttiType; P: TRttiProperty; Ctx: TRttiContext; begin Ctx := TRttiContext.Create; Memo1.Lines.Clear; T := Ctx.GetType(Classe); for P in T.GetDeclaredProperties do Memo1.Lines.Add(P.Name); end; Para Chamar a procedure em um botão por exemplo: getPropList(pcnNFe.TIde); Obs: declarar System.RTTI e pcnNFe Agora estou pesquisando como buscar os valores... Encontrei este método: ctxRtti := TRttiContext.Create; typeRtti := ctxRtti.GetType( pcnNFe.TIde. ClassType ); for propRtti in typeRtti.GetProperties do Memo1.Lines.Add(propRtti.Name+':'+ propRtti.PropertyType.ToString +'='+ propRtti.GetValue(pcnNFe.TIde).ToString); ctxRtti.Free; porém acusa o seguinte erro: This form of method call only allowed for class methods or constructor Alguém sabe a causa?
  3. Boa noite pessoal! Estou usando o Acbr para carregar um XML de NFe, e posteriormente, trabalhar com os dados dentro do sistema. Para isso, utilizo o método ACBrNFeXML.NotasFiscais.LoadFromFile, que me permite acessar todos os valores das tags deste xml... Dentro do bloco Ide, por exemplo, obtenho os valores... QryRecebeXML.FieldByName('CUF').AsInteger := cUF; QryRecebeXML.FieldByName('CNF').AsInteger := cNF; QryRecebeXML.FieldByName('NATOP').AsString := natOp; desta maneira, relaciono cada tag e faço a inserção no meu banco de dados... Existe alguma forma de fazer algo dinâmico, por exemplo, algum laço para que pudesse passar por todas as tags de Ide sem ter que relacionar uma a uma? Não sei se consegui expressar corretamente minha dúvida... Desde já agradeço...
  4. Boa tarde Pessoal... também tenho a mesma dúvida do colega Cris... seria ótimo se tivesse uma forma de retornar os eventos...
  5. Bom dia pessoal! Foi feita a reinstalação do Delphi Rio 10.3 no meu computador, e após isso, funcionou tudo normalmente pelo instalador do Acbr! Portanto, havia algo de errado na instalação do Delphi. Agradeço a todos pela ajuda! Excelente semana a todos!
  6. ok, então vou verificar esta questão e depois informo aqui...obrigada.
  7. Esta parte não sei te dizer, pois não fiz a instalação...porém ele está registrado normalmente...
  8. Obrigada Juliomar, porém fiz este teste também de colocar no C:\ Seguem prints...
  9. Olá Daniel! Sempre faço da seguinte maneira: crio uma pasta, e seleciono a opção SVN Checkout...conforme o anexo...
  10. Bom dia Pessoal. Tenho no meu computador duas versões de Delphi, Seattle e Rio 10.3, a instalação no Seattle está ok, porém quando abro o AcbrInstall_Trunk2, não aparece a versão do Rio. Obs: cada versão do delphi tem sua pasta do Acbr, C:\Program Files (x86)\Embarcadero\Studio\20.0\Componentes\Acbr - Rio e C:\Program Files (x86)\Embarcadero\Studio\17.0\Componentes\Acbr - Seattle. Estou executando como administrador, e também me certifiquei que as pastas estão com controle total de permissão. Os arquivos são atuais, baixados hoje. Alguém pode ajudar nesta situação? Desde já agradeço.
  11. Ok Daniel. Realmente BigWings, nos ajustes que eu estava fazendo, alterei a pasta de Schemas para uma pasta local, antes estava um caminho pela rede do cliente. Agradeço a todos pela ajuda.
  12. Olá Daniel. Sim, o QRCode está configurado para 2.0. Vou explicar aqui o que fizemos para funcionar. Primeiro pegamos as dlls da pasta DLLs\OpenSSL\1.1.1.4\x86 e da pasta DLLs\LibXml2\x86 e colamos para as pastas system32 e syswow64 do cliente. Fazendo isso, enviou cupom, porém quando informei dados de cliente, dava Schema inválido. (OS schemas que estavam sendo usados eram os da pasta Exemplos\ACBrDFe\Schemas\NFe). Neste momento estava usando a propriedade SSLXmlSignLib = xsLibXml2. Após, troquei esta propriedade para xsMsXML, então funcionou perfeitamente. O motivo de não funcionar com xsLibXml2 talvez tenha sido referente as dlls? algo que não fiz corretamente? Agradeço a ajuda de todos.
  13. Sim, copiei todas para a pasta SysWow64 do cliente...
  14. Boa tarde pessoal! Estou com o seguinte problema...estou tentando enviar NFCe no meu cliente com OpenSSL...usamos Delphi... Mesmo pelo Demo do ACBR dá o erro Falha na validação dos dados da nota 1824 Element {} qrcode: ...is not a valid value of the local atomic type. (imagem em anexo) No meu PC Windows 10, enviamos NFCe, tudo certo, pelo Demo com as mesmas configurações, sempre usando os Schemas da pasta do Acbr...e envia normalmente. Meu cliente tem Windows 7 Ultimate SP1...é a diferença. Alguém pode ajudar?
  15. Boa tarde! Continua cortando a impressão. Com a propriedade "FormularioContinuo" True, imprime os 30 cm, e com a propriedade "FormularioContinuo" False, imprime os 30 cm (40 itens) e acrescenta apenas o QrCode. Fontes atualizados hoje...
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.