Duarte

Resolvi pessoal, a nomenclatura deste framework agora é apenas Vision.

Boa noite, pessoal estou precisando adicionar ao SDK do IOS este frameowork (VisionKit), estou com estra infra: Como estou adicionando o framewordk Mais não carrega, alguém tem alguma dica? Preciso muito deste framework ai.

Boa tarde, amigo infelizmente não será mais possível utilizar este recurso de IMEI no 11 não! Tive que criar minha rotina mesmo de criação de GuiID

@adrianosantos bom dia, você teria alguma informação sobre este comunicado da google: Os desenvolvedores de apps em dispositivos com o Android 11 e versões mais recentes precisam usar armazenamento com escopo para que os usuários possam controlar melhor o acesso ao armazenamento dos dispositivos. Para lançar apps nessas versões do Android após 5 de maio, será necessário seguir uma destas instruções: Atualizar o app com práticas recomendadas de privacidade, como usar o framework de acesso ao armazenamento ou a API Media Store Atualizar o app para declarar a permissão "Acesso a todos os arquivos" (MANAGE_EXTERNAL_STORAGE) no arquivo de manifesto e concluir a Declaração de permissões correspondente no Play Console a partir de 5 de maio Remover a permissão "Acesso a todos os arquivos" do app Outro ponto sobre permissões é como ler o IMEI nas versões mais novas do Android, pois mudaram o jeito de pegar as permissões para Phone_State

Boa tarde, depois de muito quebrar a cabeça achei a solução, vou deixar aqui, caso alguém precise. procedure InsertItemListView(AListView : TListView; ADataSet : TDataSet; AHeader, AText, ADetail, ADetail1, ADetail2, ADetail3 : string); begin try AListView.BeginUpdate; AListView.Items.Clear; with ADataSet do begin First; while not Eof do begin if Trim(AHeader) <> '' then with AListView.Items.Add do begin Text := ADataSet.FieldByName(AHeader).DisplayText; Purpose := TListItemPurpose.Header; //Aqui é o pulo do gato para add os Headers. Na verdade você add dois items, um será o Header e ou outro o item ou itens, sendo que podemos add vários itens tem do mesmo headers. No meu caso será um para cada. end; with AListView.Items.Add do begin Text := FieldByName(AText).DisplayText; Detail := FieldByName(ADetail).AsString; Data[TMultiDetailAppearanceNames.Detail1] := FieldByName(ADetail1).DisplayText; Data[TMultiDetailAppearanceNames.Detail2] := FieldByName(ADetail2).DisplayText; Data[TMultiDetailAppearanceNames.Detail3] := FieldByName(ADetail3).DisplayText; Tag := RecNo; end; Next; end; end; finally AListView.EndUpdate; end; end;

Boa noite, Estou tentado preencher um ListVier em run-time, pois via LiveBindings Desinger estou tendo problemas quanto ao uso de Thread e/ou Task. Veja parte do código. Lembrando que isso para FMX. procedure T_frmPedido.SpeedButton1Click(Sender: TObject); var fItem : TListViewItem; begin try with _lvwItens do begin BeginUpdate; Items.Clear; with Pesquisa do begin First; while not Eof do begin fItem := Items.Add; fItem.Text := FieldByName('DESCRICAO').AsString; fItem.Data[TMultiDetailAppearanceNames.Detail1] := FieldByName('PRECO').DisplayText; fItem.Data[TMultiDetailAppearanceNames.Detail2] := FieldByName('ESTOQUE').DisplayText; fItem.Data[TMultiDetailAppearanceNames.Detail3] := FieldByName('MARCA').AsString; //Como adicionar a propriedade ItemHeader.text em run-time? O mesmo serve para Item.LookupData Next; end; end; end; finally EndUpdate; end; end; O grande problema é... preciso alimentar a propriedade Item.Header.Text via run-time e não estou conseguindo.

Bom dia, estou desenvolvendo uma rotina de sincronização de fotos via Mobile "Android". Bem após tirar a foto deve apresentar a tela de edição de imagem para o usuário pode edita-la ao seu gosto e enviar para o servidor, em versões anteriores ao Rio este processo sempre funcionou utilizando funções nativas "TTaskPhotoFromCameraAction" apenas ativando a propriedade "Editable=true". Bem no rio caso esta propriedade seja ativada sempre retorna um erro "Não pode ser menor que 50x50 pixes". o mesmo não acontece quando é da galeria "Já salvo". Precisamos migrar para Delphi mais moderno "Rio>" Para ter suporte a novas API 26>. Mais esta função é de estrema importância. teriam uma solução?

Bom dia, Meus amigos preciso muito a ajuda de vocês, conforme novas regras para emissão de boleto, será aceito pelos bancos boletos vencidos, seguido este cronograma A partir de 10 de julho: boleto de R$ 50 mil ou mais; A partir de 11 de setembro: boleto de R$ 2 mil ou mais; A partir de 9 de outubro: boleto de R$ 500 ou mais; A partir de 13 de novembro: boleto de R$ 200 ou mais; A partir de 11 de dezembro: boleto de qualquer valor. Pois bem, ontem um cliente nosso pagou um boleto com o código de barras vencido, pelo banco SiCred nos usamos Itau, na instrução da remessa foi falando o valor do juros, mora, mais ao pagar o sicredi calculou um juros menor do que nos informamos, quais os procedimento para impedir que usuário / banco altere ou até mesmo ignore os juros / multa?

Boa tarde, Caros, alguém já passou por isso ou pode me dar uma ajuda, em alguns clientes em certos momento esta levando erro de acesso... "Access Violation" debugando juntamente com o madException ele para estas últimas linhas... exception message : Access violation at address 0040AA70 in module 'NOTURNO.exe'. Read of address 0000FFFD. thread $118c (TEnviaNFCe): 0040aa70 +008 NOTURNO.exe System 202 +0 TObject.Free 00d45dd3 +017 NOTURNO.exe ACBrDFeHttpIndy 90 +1 TDFeHttpIndy.Destroy 00d4f08e +066 NOTURNO.exe ACBrDFeSSL 1043 +8 TDFeSSL.Destroy 00d8c40b +017 NOTURNO.exe ACBrDFe 206 +1 TACBrDFe.Destroy 00e43756 +08a NOTURNO.exe ACBrNFe 249 +10 TACBrNFe.Destroy Isto quando ajusto para protocolo: httpIndy O método em questão está dentro de um Thread, utilizado para enviar as NFC-e que ficaram em contingência.

Bom dia, Amigos, está havendo alguma instabilidade no repositório do acbr? já tem uns dois dias que não consigo mais atualizar os fontes, Retorno: Update Working copy 'E:\ACBr' locked. 'E:\ACBr' is already locked. Please execute the 'Cleanup' command.

Bom dia, era exatamente isso...! Muito obrigado meu amigo!

Boa noite, Estamos configurando o envio de NFS-e para o provedor (Ginfes) Cidade (Muriaé/MG). E estamos tendo problemas quanto as configurações do Regime Especial de Tributação veja os caso já testado: Caso 1 - Regime = Nenhum Simples Nacional = SIM Retorno: Campo RegimeEspecialTributacao nao informado para empresa optante do simples nacional. Quando se tratar de empresa optante do simples nacional marcar o campo RegimeEspecialTributacao com uma das opcoes: 05 - MEI do simples nacional ou 06 - ME ou EPP do simples nacional. Caso 2: Regime = Nenhum Simples Nacional = NAO Retorno: Codigo de tributacao inexistente Consulte a legislacao vigente para saber o Codigo de tributacao que devera ser informado neste campo. Caso 3: Regime = MicroempresarioEmpresaPP (Conforme orientações do caso 1) Simples Nacional = SIM Codigo de tributacao inexistente Consulte a legislacao vigente para saber o Codigo de tributacao que devera ser informado neste campo. Veja tentamos de tudo e nada passa, alguém teria algum .xml de demo usando GINFES? Digo autorizado! Em anexo .xml dos casos acima mencionado, conto com a ajuda..... Caso1.xml Caso2.xml Caso3.xml

Bom dia, Iniciamos hoje o envio de NF-e usando a versão 4.0, o envio está OK, tanto ambiente produção, quanto homologação, agora ao tentar enviar qualquer eventos: CC-e, Cancelamento, estou tendo este retorno: tpAmb>2</tpAmb> <verAplic>1.0.0</verAplic> <cOrgao>53</cOrgao> <cStat>999</cStat> <xMotivo>2243 - Falha ao carregar certificado da conexao</xMotivo> Anexo logs. Alguém já passou por isso? Tem algum já cancelando notas na versão 4.0? OBS: WebService: SVAN 2331-eve.xml 2331-eve-soap.xml 2331-ped-eve.xml 2331-ped-eve-soap.xml

Bom dia, Pessoal, eu já o DistribuicaoDFe algum tempo, hoje precisei fazer algumas implementações nele e notei que ele agora não faz mais o download pois apos a consulta, se eu não estou engado, o componente fazia o download logo em seguida a chamada do método: DistribuicaoDFe, das notas que estavam disponível para download... Certo? foi removido esta opção?

Boa tarde, pessoal a class TACBrCargaBalItem cria uma instancia de: TACBrCargaBalTaras mais não libera ela causando memory leaks na carga dos arquivo. adicionei a liberação. destructor TACBrCargaBalItem.Destroy; begin FSetor.Free; FNutricional.Free; FTara.Free; inherited; end; segue Unit. ACBrCargaBal.pas

Sim, o erro em questão "Blob Not Found" tirou o meu sono, rsrs. Logo pelos seguinte fatos: Não tenho nenhum blob no banco!. Não ocorreia em todos os clientes, e são centenas! No cliente em questão ocorria as vezes! Vejam: se aplicar: SELECT * FROM RDB$FIELDS. Teremos a lista de todos os campos do banco, seja criado por você ou do proprio sistema "Firebird" e o saco é que o firebird usa blobs para guardar informações dentro de si mesmo! foi o caso do meus dominios com checks. veja: Criado pelo proprio fireibird campo Blob para armazenar as validações, pois é logico que podem ter validações enormes. Então imagine que um deste blob "interno" corrompa" já era o banco, dai estava o erro as vezes no clientes, o dominio/check "d_situação" que está presente em alguns tabelas estava corrompido! Eita errinho sacana... rsrs O Cara evita não trabalhar com "Blob" pois eu os considero um saco. rsrs e lá vem o firebird cheio deles.. rssr

Bom dia, Quero aqui deixar a solução do problema, pois em nenhum lugar conseguir uma resposta, e depois de muito lutar, graças a Deus achei! O erro estava no banco de dados, ou seja, corrompido! Depois de checar todos os objetos do banco, não apenas os casuais, mais todos que o firebird nos libera atrás de tabelas do sistema, constatei que, todas as regras de validades em Check dos domínios no firebird são gravados em campos blob na tabela do sistema “Firebird”. Tenho alguns domínios que tem validações no chack “Check” para garantir uma boa integridade do banco, um deles é chamado “D_Situacao” aonde valida as situações aceitáveis pelo banco, foi exatamente neste (domínio) que dentro da tabela interna do firebird que corrompeu. Solução! Extrai o metabase do banco, crie um novo banco e usei um aplicativo que por sinal gosto muito “DataPump” migrei os dados e pronto... Poderia apenas fazer um backup/restory, creio que sim, mais como já estava muito chateado com o erro, preferir ser mais cauteloso levando os dados para um banco criado do zero.

Boa tarde, Pessoal, até hoje não consegui uma rotina que me mostro o tanto de memoria que minha aplicação está consumindo naquele momento, preciso muito de uma rotina assim...! Tenho, Memoria usada, memoria física, memoria livre, mais é vital para mim saber o consumo da minha aplicação naquele momento da memoria!...

obrigado celso!

Bom dia, pessoal estou querendo usar a rotina do acbr para bloquear o mouse e tecla, já procurei nas units mais não achei em qual ela fica, alguém poderia me dizer?

Bem, parece que consegui resolver, como não é um erro que acontece com frequencia. São centenas de clientes, e em alguns e neste mesmo raramente acontece, mais após estas alterações com centenas de deste até agora não levantou o erro, segue alguns ajuste que fiz na FDConnection e DataSetProvider. pois uso o trio: FDQuery + DataSetProvider + ClientDataSet. Print das configurações:

Boa tarde, Obrigado pelo retorno, Banco Dados: FireBird 2.5 win32 class server. Estrutura dos componentes de acesso: FDQuery + Provider + ClientDataSet Sim, por incrivel que parece só com master-detail! Há DBExpress.. rsrs, pos-e contras... Outra coisa, caso tenha se deparado com isso, em alguns caso, muito raros, mais ocorre, mesma estrutura, acontece o seguinte: Ao gravar dados, do nada os dados são enviado "null" ou seja é como se os componente limpasse os dados, repassando tudo "null" sendo que nos componente visuais "dbgrid, dbedit, etc" estão todos alimentados...

Boa tarde, Se crie o tópico no lugar indevido me perdoe e aceito correções! Bem, estou enfrentando um problema com FireDAC Delphi 10.1 Berlin, o negocio é seguinte, na hora de gravar os dados da esse erro: [firedac][phys][fb][blob] not found O estranho é que não temos nenhum campo blob nas tabelas em questão, alguém já se deparou com isto? Uma informação, na maioria das vezes este erro ocorre com tabelas com master - details. Já desativei as opções: Items To Feth "Blobs" e Items To Cache "Blobs" da FDConnection.

Para contornar esta situação na minha função de imprimir tive que alimentar as propriedades da nota após carregar o xml: with _NFSe do begin NotasFiscais.Clear; NotasFiscais.LoadFromFile(XML); with _dmSistema._Empresa do begin with NotasFiscais.Items[0].NFSe.Prestador do begin Cnpj := FieldByName('CNPJ').AsString; InscricaoMunicipal := FieldByName('INSCMUN').AsString; InscricaoEstadual := FieldByName('INSCEST').AsString; end; with NotasFiscais.Items[0].NFSe.Tomador do begin RazaoSocial := FieldByName('RAZAO').AsString; with Endereco do begin Endereco := FieldByName('ENDERECO').AsString; Numero := FieldByName('NUMERO').AsString; Complemento := FieldByName('COMPLEMENTO').AsString; Bairro := FieldByName('BAIRRO').AsString; xMunicipio := FieldByName('CIDADE').AsString; CEP := FieldByName('CEP').AsString; end; with Contato do begin Telefone := TelefoneEmpresa; Email := FieldByName('EMAIL').AsString; end; end; end; end; NotasFiscais.Imprimir; Teria outro jeito? Lembrando que isto é apenas para métodos: Enviar, ConsultarLoteRPS, Usando por exemplo: Gerar, o xml é carregado com todos os dados do tomador.

Bom dia, Estou tendo um problema ao usar o método: ConsultarLoteRps o xml retornado neste método é o que eu salvo e carrego para impressão, pois nele é que vem o número da nota, bem só que ao carregar o xml ele vem com os dados do tomador em branco, não sendo possível fazer a devida impressão. Existe outro xml que retorne todos os dados para impressão se usar a sequencia de métodos: Enviar ConsultarLoteRps Webservice que está sendo usado: Saatri. Em anexo xml de retorno 31.xml NFS-e 271.pdf