rodrigofernandes

Bom dia tudo bem ? Estou fazendo a requisição do webservice do google maps. O retorno do serviço é um arquivo Json que faço o seguinte processo: RESTClient1.BaseURL := urlOrigem; RESTRequest1.Execute; Memo1.Clear; Memo1.Lines.Add(RESTRequest1.Response.JSONText); Preciso de ajuda para percorrer o arquivo de retorno e pegar as informações necessárias, abaixo estou copiando os dados do memo { "results": [ { "address_components": [ { "long_name": "Rua Augusto Wolf", "short_name": "Rua Augusto Wolf", "types": [ "route" ] }, { "long_name": "Jardim do Sol", "short_name": "Jardim do Sol", "types": [ "political", "sublocality", "sublocality_level_1" ] }, { "long_name": "Indaiatuba", "short_name": "Indaiatuba", "types": [ "administrative_area_level_2", "political" ] }, { "long_name": "São Paulo", "short_name": "SP", "types": [ "administrative_area_level_1", "political" ] }, { "long_name": "Brazil", "short_name": "BR", "types": [ "country", "political" ] }, { "long_name": "13343-630", "short_name": "13343-630", "types": [ "postal_code" ] } ], "formatted_address": "Rua Augusto Wolf - Jardim do Sol, Indaiatuba - SP, 13343-630, Brazil", "geometry": { "bounds": { "northeast": { "lat": -23.0982405, "lng": -47.20356659999999 }, "southwest": { "lat": -23.1016691, "lng": -47.2087514 } }, "location": { "lat": -23.0998709, "lng": -47.2058849 }, "location_type": "GEOMETRIC_CENTER", "viewport": { "northeast": { "lat": -23.0982405, "lng": -47.20356659999999 }, "southwest": { "lat": -23.1016691, "lng": -47.2087514 } } }, "place_id": "ChIJ-VKzTlBLz5QRG-jBHklwwPI", "types": [ "route" ] } ], "status": "OK" }

Bom dia tudo bem ? Estou tentando fazer o envio de uma imagem salva no celular para meu servidor, estou fazendo o envio dos dados via Post. A imagem estou salvando o caminho no banco SQLite, gostaria de ajuda para o envio da imagem salva no celular. Desde já agradeço

Problema resolvido com a criação dos componentes em modo de execução e fazendo Post pela função execute.

Bom Dia tudo bem ? Estou tentando fazer o envio via post com Rest. Consigo fazer os envios pelo Rest Debugger sem problema nenhum, mas quando faço pela aplicação, faz a primeira vez com sucesso depois tenho um erro de Bad Request. Mesmo utilizando com os componentes gerados pelo Rest Debugger. O código de envio está com abaixo: RESTClientPostEnviarLiberacao.BaseURL := 'http://localhost:9000/enviarliberacao'; RESTRequestEnviarLiberacao.body.ClearBody; RESTRequestEnviarLiberacao.body.Add(arrCab.ToString, TRESTContentType.ctAPPLICATION_JSON); RESTRequestEnviarLiberacao.ExecuteAsync( procedure Alguém poderia dar uma auxílio, desde já agradeço.

Pessoal o erro era nas configurações do Webservice. Acertei as configurações e o envio foi realizado com sucesso. Valeu !!!

Estou tendo o seguinte erro na consulta ou transmissão da NFe. Erro Interno: 6 Erro HTTP: 0 URL: https://nfe.fazenda.sp.gov.br/ws/nfeautorizacao4.asmx Desde já agradeço a colaboração.

Certo .. então com o Unigui não rola mesmo esse tipo de processo ? Teria que fazer para compilar com o Android ?

o Unigui gerar um .EXE .. que é responsável em gerar as páginas HTML para serem executadas no browser

Essa configuração por interferir no projeto feito com o Unigui ?

Quando tento compilar o demo do Android tenho o seguinte problema. Clico em Yes e da seguinte retorno.

Marca Sunmi Smart POS system P1(4G) Modelo: W6900

Estou usando Ide RIO 10.3.3. O erro ocorre tanto no Browser ( Windows ) ,como no próprio dispositivo que está pareado. Não consegui utilizar o Demo. Coloquei uma imagem do dispositivo.

Bom Dia, estou tentando fazer uma impressão via Bluetooth no dispositivo Sunmi. Tente configurar a porta da seguinte forma: ACBrPosPrinter1.Porta := 'BTH:InnerPrinter' e ocorre o seguinte erro: Bluetooth device not found: disconnected or turned off. Fiz o processo abaixo no create do form, mas ocorre o mesmo erro. F := TStringList.Create; ACBrPosPrinter1.Modelo := ppEscEpsonP2; try ACBrPosPrinter1.Device.AcharPortasBlueTooth(F); ShowMessage(F.Text); except on E: Exception do ShowMessage('Erro: ' + E.Message ); end; F.Free Desde já agradeço a atenção.

Estou usando o Delphi Berlin 10.1. Tem alguma outra sugestão ? Você tentou utilizar o processo em outra versão do Delphi ?

Ele da a mensagem de erro na linha if (fsBluetooth.PairedDevices <> nil) then

Na primeira no for

for DevBT in fsBluetooth.PairedDevices do if TodasPortas or IsPrinterDevice(DevBT) then AStringList.Add('BTH:'+DevBT.DeviceName {+ ' - ' + IntToStr(DevBT.ClassDevice)}); Erro no for

Windows Server 2012 o Erro esta na linha ACBrPosPrinter1.Device.AcharPortasBlueTooth( cbxPorta.Items );

Estou utilizando Delphi Berlin. Para fazer uma simulação estou usando o projeto de exemplo do AcbrPosPrinter. No projeto tem o seguinte código para localizar portas de impressão: cbxPorta.Items.Clear; ACBrPosPrinter1.Device.AcharPortasSeriais( cbxPorta.Items ); Fiz a seguinte alteração para tentar localizar portas via bluetooth: cbxPorta.Items.Clear; ACBrPosPrinter1.Device.AcharPortasBlueTooth( cbxPorta.Items ); Ao executar o exemplo ocorre o erro abaixo: Aguardo uma ajuda para solução deste desafio, fazendo o mesmo neste em outros projetos ocorre o mesmo erro. Obrigado

Estou instalando o driver BTH para testar.

Estou usando Unigui. O sistema roda na própria impressora.

https://docs.sunmi.com/en/general-function-modules/printing-service/

Bom dia a todos. Estou realizando um teste rodando um aplicação em um equipamento Sunmi, modelo W6900, pensei em utilizar o AcbrPosPrinter mas não estou conseguindo realizar a impressão. Alguém já utilizou este equipamento ?? Desde já agradeço.

Obrigado a todos, consegui resolver a pesquisa com as seguintes configurações.