Dangelo2010

Teria alguma sit ou manual para homologação do AutoTEF para uso?

Boa noite! O AutoTEF já esta pronto para teste ou ainda não?

Obrigado! Achei que o problema era aqui no meu computador Valeu

Bom dia! tem varios links que não estou conseguindo acessar estou com mensagem de erro "Algo deu errado. Por favor, tente novamente."

Não deu certo, pois ele faz o download novamente e alimenta wSL.LoadFromFile(wArq, TEncoding.UTF8);

Você fala de excluir o arquivo ACBrNCM.json que esta na pasta?

wSL.LoadFromFile(wArq, TEncoding.UTF8); fiz assim tambem e nao deu certo

Tranquilo Até dessa forma eu fiz mais não resolveu // Tente ler com ISO-8859-1 (ou ajuste se precisar de outra codificação) wSL.Encoding := TEncoding.GetEncoding(28591); // ISO-8859-1 wSL.LoadFromFile(wArq); // Se você tiver certeza da codificação correta, pode ajustar isso FileText := wSL.Text; // Se a leitura estiver errada, você pode tentar uma codificação diferente if ContainsStr(FileText, 'Caracteres estranhos') then begin // Tente uma codificação alternativa se necessário wSL.Encoding := TEncoding.GetEncoding(1252); // Windows-1252 wSL.LoadFromFile(wArq); FileText := wSL.Text; end; // Converta para UTF-8 se necessário FileText := TEncoding.Convert(TEncoding.GetEncoding(28591), TEncoding.UTF8, TEncoding.GetEncoding(28591).GetBytes(FileText)); wJson := CriarEValidarJson(FileText);

Eu vi aqui que dentro do arquivo json esta certinho, so quando vem para o grid que fica assim function TACBrNCMs.CarregarCache: String; var wArq: String; wSL: TStringList; wJson: TACBrJSONObject; wDataCache: TDateTime; xData: string; begin Clear; wJson := Nil; Result := EmptyStr; wArq := CacheArquivo; if (wArq = EmptyStr) or (not FileExists(wArq)) then Exit; try wSL := TStringList.Create; try wSL.LoadFromFile(wArq); // aqui ja vem com os caracteres wJson := CriarEValidarJson(wSL.Text); try xData := TratarCampoData(wJson.AsString['DataCache']); wDataCache := StringToDateTimeDef(xData, 0, 'dd/mm/yyyy'); if (CacheDiasValidade > 0) and (DaysBetween(Now, wDataCache) > CacheDiasValidade) then begin DeleteFile(wArq); Exit; end; Result := wSL.Text; finally wJson.Free; end; finally wSL.Free; end; except DeleteFile(wArq); end; end;

Estou com o mesmo problema, meu Delphi e o 11

Entendi, valeu

Boa tarde! Teria alguma documentação sobre broadcast?

Entendi! Obrigado

Bom dia! Alguém já conseguiu rodar um sistema feito em delphi .exe no Mac OS?

Obrigado @Juliana Tamizou Mais pode fechar que o @Daniel InfoCotidiano já mim passou o que preciso fazer