Ir para conteúdo
  • Cadastre-se

datilas

Membros
  • Total de ítens

    520
  • Registro em

  • Última visita

  • Days Won

    2

datilas last won the day on 21 Agosto 2022

datilas had the most liked content!

1 Seguidor

Últimos Visitantes

3.539 visualizações

datilas's Achievements

  1. na minha opinião e melhor solução é essa: pois não alterou a assinatura do evento e alterou apenas o unit referente ao sitef, na minha aplicação a alteração foi mínima. na procedure ACBrTEFAPI1QuandoPerguntarCampo eu adicionei: If (MR = mrRetry) Then Resposta := '-2'; e funcionou perfeitamente.
  2. atualize o acbr e as dlls do openssl que estão em: ..\DLLs\OpenSSL\3.1.3 adicione a uses: blcksock e faça assim: ACBrHTTP.HTTPSend.Sock.SSL.SSLType := TSSLType.LT_TLSv1_3;
  3. o acbrtefapi tambem atende sitef e ja tem topicos para adicinar tef elgin e tef auttar mas esses não tem previsão lembrando que não tem previsão
  4. vc tem libxml2 e libxml2-devel instalado?
  5. vc esta copiando dll para o linux, linux não trabalha com dll. linux trabalha com .so por padrao mas não nesessariamente.
  6. o problema esta na interpretação do base64: data:image/png;base64,PD94bWwgdmVyc2lvbj0iMS4wIi... data: é o tipo de arquivo, que no caso é image/png base64, é o tipo de configuração. resumindo vc precisa decodificar o texto depois de: "data:image/png;base64," (PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0i.....) esse texto:"data:image/png;base64," server para os navegadores conseguirem interpretar e renderizar o arquivo (png,jpg,pdf etc.)
  7. usando synapse: Var http: THTTPSend; sURLRedirect: string; Begin http := THTTPSend.Create; Try sURLRedirect := ''; HTTP.HTTPMethod('POST', 'SUAURL'); If (http.ResultCode = 301) or (http.ResultCode = 302) Then Begin HeadersToList(http.Headers); sURLRedirect := http.Headers.Values['Location']; sURLRedirect := Trim(sURLRedirect); End; If sURLRedirect <> '' Then HTTP.HTTPMethod('POST', sURLRedirect); Finally Begin http.Free; End; End; End;
  8. tenta usar : procedure TForm1.ACBrPSPGerenciaNet1QuandoTransmitirHttp(var AURL, AMethod: string; ReqHeaders: TStrings; ReqBody: AnsiString); begin ReqHeaders.Add('partner-token: seutoken'); end; mas creio que não há necessidade. já tentou usar o demo como esta preenchendo ClientId e ClientSecret?
  9. não sei qual componente vc esta usando. mas tente: jSubObj.TryGetValue<string>('cont_pessoa')
  10. não seria melhor stEnvio.Add(',"anexoType":"application/pdf;base64"'); ? para quem usar e-mail em navegador poder ver um resumo ou todo ele sem a necessidade de baixar. pois os navegadores reconhecem tipos específicos para tarefas especificas. mas o importante é que esta funcionando. foi só uma dica. https://developer.mozilla.org/en-US/docs/Web/HTTP/Basics_of_HTTP/MIME_types/Common_types
  11. https://developers.mercadolivre.com.br/pt_br/gerenciamento-de-vendas
  12. tenta assim: seuMD5 := gearMD5('seuUSUARIO:suaSENHA'); Consulta.HTTPSend.Headers.Add('Authorization: Digest ' + seuMD5); https://en.wikipedia.org/wiki/Digest_access_authentication? https://forum.lazarus.freepascal.org/index.php?topic=15747.0
×
×
  • 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.