RibaSoft
-
Content Count
105 -
Joined
-
Last visited
-
Eu tambem fiquei na duvida lendo o manual, mas explicando assim entedi certinho .
-
* Ajustei com um Break no for pra ele pegar o primeiro item for I := 0 to Pred(auxItens.Count) do begin auxItem := UpperCase(Copy(auxItens[I], 1, Length(MemKey))); if(auxItem = MemKey)then begin Result := I; Break; end; end;
-
* Olá * Corrigi a função pois ela estava funcionado apenas com dois dígitos. * Na UF funcionou de boa, mas quando fui usar nos municípios que vi a caca que eu tinha feito. * Dai a função ficou assim... //========================== COMBO BOX KEY ===================================\\ function TRiba.ComboBoxKey(const AKey: char; AItens: TPersistent): integer; var auxItens: TStringList; I: integer; auxItem: string; begin MemKey := MemKey + FormataTexto(AKey); try auxItens := TStringList.Create; auxItens.Assign(AItens); for I :=
-
nossa desculpa, vou ver onde vc colocou e da proxima vez já coloco no lugar certo. DEUS abençoe
-
* Olá, procurei muito por essa solução e como não encontrei decidi disponibilizar aqui a forma que eu pensei para o ComboBox do lázaros aceitar mais dígitos quando a propriedade Style = csDropDownList * Como a função em uma classe criei o Timer em tempo de exeção... * uses para criar o timer ExtCtrls var MemKey: string; //================================ CREATE ====================================\\ constructor TRiba.Create; begin TimerMemKey := TTimer.Create(nil); TimerMemKey.Interval := 1000; TimerMemKey.Enabled := False; TimerMemKey.O
-
Olá, passando pra pedir desculpas por não conseguir colaborar no componente ADRCST do ACBR, pois sou limitado pelo meu pouco conhecimento e não consegui me adaptar ao padrão em que os componentes ACBr são feitos. Continuo a disposição para disponibilizar a classe que eu criei do meu jeito que graças a DEUS esta funcionando e validando todos os arquivos junto ao site do Receita PR Também aproveito para informar que para o Simples Nacional não é mais obrigatório o envio ADRCST a partir do mês que vem referente a este mês, pois o Simples entra como optante automático a isenção, quem qui
-
Geralmente algumas palavras em maiúsculo como REF dão esse problema, eu passei td pra minúsculo pra contornar até que a receita resolva isso
-
blz, brigadão, vou ver certinho lá e assim que pronto retorno, DEUS abençoe.
-
Não lista certificados Store Windows
RibaSoft replied to RibaSoft's topic in NFC-e - Nota Fiscal do Consumidor Eletrônica
Agradeço o Antonio Tota, por ter descoberto o problema e compartilhado e o BigWings, pela sua atenção conosco e ter enviado a correção, da minha parte também está resolvido, DEUS abençoe a todos -
Não lista certificados Store Windows
RibaSoft replied to RibaSoft's topic in NFC-e - Nota Fiscal do Consumidor Eletrônica
Perfeito amigo resolveu aqui na hora, comentei a linha do UNICODE e criei uma como DELPHI2009_UP //{$IfDef UNICODE} {$ifDef DELPHI2009_UP} StoreProvider := CERT_STORE_PROV_SYSTEM_W; {$ELSE} StoreProvider := CERT_STORE_PROV_SYSTEM_A; {$ENDIF}; Para quem estiver com dificuldade em achar, esse arquivo esta em ...Fontes\ACBrDFe\ACBrDFeWinCrypt.pas Não sei se essa é a forma correta mas resolveu perfeitamente, realmente tenho muito oq aprender ainda, sem palavras pra agradecer, DEUS abençoe -
Não lista certificados Store Windows
RibaSoft replied to RibaSoft's topic in NFC-e - Nota Fiscal do Consumidor Eletrônica
Boa noite, não estou recebendo e-mail com as notificações do fórum, desculpa prometi tirar a tarde pra ver isso e acabou que não consegui, mas devo ir até mais tarde hj vendo isso, muiiiiito obrigado por compartilhar sua solução com a gente, vou experimentar aqui e retorno, DEUS abençoe. -
Não lista certificados Store Windows
RibaSoft replied to RibaSoft's topic in NFC-e - Nota Fiscal do Consumidor Eletrônica
Ainda não, mas um jeito tenho que dar, assim que eu descobrir a solução compartilho aq, se vc conseguir antes me avisa por favor, vou pegar a parte da tarde pra mexer só com isso, hj sai se DEUS quiser -
Não lista certificados Store Windows
RibaSoft replied to RibaSoft's topic in NFC-e - Nota Fiscal do Consumidor Eletrônica
Oi, muito obrigado pela atenção, já tentei todas as opções do storelocation, já fiz o downgrade do lazarus para o 2.0.8, já atualizei os fontes e nada. nem no meu sistema nem no exemplo. Eu não entendo, foi depois da atualização dos fontes ACBr, eu sempre deixo a copia dos fontes anteriores guardadas, mas dessa vez acabei apagando. estou testando com os certificados A1 instalados no Windows, mas minha necessidade é nos clientes de cartão A3, pois os A1 eu pego direto pelo arquivo, mas não aparece nem acessa nem o A1 nem o A3 do store. -
Olá, desculpe criar esse tópico, mas to desesperado, depois que atualizei os fonts e o lazarus, meus sistema sisplesmente parou de listar os certificados no Store do windows. *Meu codigo NF.SSL.SSLType := LT_TLSv1_2; //Protocolo de Segurança de Comunicação NF.SSL.SSLHttpLib := httpWinHttp; //Gerenciador da Comunicação NF.SSL.SSLCryptLib := cryWinCrypt; //Gerenciador de Certificado NF.SSL.SSLXmlSignLib := xsLibXml2; //Gerenciador de Assinatura NF.SSL.LerCertificadosStore; for I := 0 to pred(NF.SSL.ListaCertificados.Count) do ComboBoxListaCertificados.It
-
Olá se alguém puder me ajudar e confirmar os cálculos da calculadora ADRCST abaixo ficarei muito grato. Ela gera um log com as formulas que eu usei. DEUS abençoe. https://ribasoft.com.br/downloads/publicos/Calculadora_ADRCST.zip
