Sérgio Assunção

Bom dia ... alguém ja conseguiu criar um .apk e executar em um device ? Instalei o XE5, em um form coloquei um botão e uma label, ao direcionar a compilação para o simulador que veio com o próprio sdk (rsxe5_android (5554)), simplesmente não acontece nada ... a tela fica preta e não se a aplicação não roda. Transportei esse .apk gerado para um aparelho, e o efeito é o mesmo. Isso também acontece com os exemplos fornecidos (pasta samples). Existe alguma configuração a ser feita ? Percebi também que o .apk ficou muito grande (6 megas) para apenas um button e uma label, é isso mesmo ? Obrigado. Sérgio

Ja sim ... Access violation. Eu acho que esse "frame[0]" é a questão. Só não estou sabendo portar esse comando em c# no webbrowser do delphi.

Boa tarde ... Tenho esse comando em C# funcionando certinho: WebBrowser1.Document.Window.Frames[0].Document.GetElementById("usuario").SetAttribute("value", usuario.Text); Como ficaria em Delphi ? Ja tentei: WebBrowser1.OleObject.Document.GetElementByID('usuario').SetAttribute('value', usuario.Text); E me retorna um access violation. Alguma dica ? Obrigado.

Eu salvei a pagina. Estou tentando preencher os campos e clicar na imagem "Ok" para poder avançar para a tela seguinte. Posso lhe enviar o html ? Sérgio

Não consegui ainda... Em C# eu tenho esse código e funciona certinho ... só não estou conseguindo fazer o mesmo no Delphi. if (Wb.Document.Window.Frames[0].Document.GetElementById("LoginId") != Null) Wb.Document.Window.Frames[0].Document.GetElementById("LoginId").SetAttribute("Value", eLogin.Text); Sérgio

Aproveitando mais um pouco da atenção... mais uma dúvida. Eu uso muito o "Value" nos parametros nas minhas instruções SQL. Exemplo: qEstoque.ParamByName('Loja').Value := 4; Seria dessa forma qEstoque.ParamByName('Loja').AsInteger := 4; o correto ? O que muda ? Sérgio

Deu certo aqui a segunda opção mencionada pelo Regys. Agradeço muito a atenção. Sérgio

Fazendo qEstoque.ParamByName('vLojas').AsString := Lojas; só puxou a LOJA 4. Já dessa forma: qEstoque.Sql.Text := 'select * from PRODUTOS where LOJA in ('+Lojas+')'; deu certo. Obrigado. Sérgio

Bom dia ... Preciso de um help aqui com uma consulta sql. Faço assim: qEstoque.Close; qEstoque.Sql.Clear; qEstoque.Sql.Text := 'select * from PRODUTOS where LOJA in (4,5)'; qEstoque.Open; Funciona certinho. Dessa forma: var Lojas: String; ... Lojas := '4,5'; qEstoque.Close; qEstoque.Sql.Clear; qEstoque.Sql.Text := 'select * from PRODUTOS where LOJA in (:vLojas)'; qEstoque.ParamByName('vLojas').Value := Lojas; qEstoque.Open; Só mostra na grid os produtos da LOJA 4. Onde estou errando ? Obrigado. Sérgio

Eu abro o form produtos e já faço uma consulta no servidor: "select * from PRODUTOS where LOJA=x" ... Ok, tranquilo. Já com o form aberto eu vou ter a necessidade de mostrar os produtos de uma determinada cor. Nessa etapa que eu já não queria ter que buscar novamente no servidor Ex: "select * from PRODUTOS where LOJA=x and COR=z". Gostaria de trabalhar em cima das informações que estão em cache, ou seja, da loja x. Sérgio

Bom dia amigo... A minha necessidade é a seguinte ... acho que o termo seria "espelhar uma query". Vou realizar uma consulta e terei um retorno de X registros. Ai gostaria de realizar uma segunda consulta em cima dos dados que ja estão em cache (os x registros) e teria y registros. Caso essa segunda consulta não retornasse nada, a grid voltaria a exibir a primeira consulta (os x registros iniciais). Eu fiz aqui uma "gambiarra" da seguinte forma: Faço o primeiro sql e jogo os dados em um clientdataset, e passo a trabalhar com o clientdataset da segunda consulta em diante. Não sei se fui claro :/ De qualquer forma eu agradeço a atenção de todos vocês. Att, Sérgio

André ... A empresa excluiu o "teste", "teste" ... posso lhe passar em PVT ? Obrigado. Sérgio

Ainda continuo sem progressos por aqui... Posso remunerar caso alguém consiga desenvolver algo. Agradeço. Sérgio

Olá Daniel... isso só foi um exemplo. Realmente, pensando no desempenho que estou tentando fazer uma consulta já com dados que estarão em cache. Talvez espelhar uma query ... não sei exatamente a solução. Obrigado. Sérgio

Olá amigos bom dia... To precisando de um help Tenho uma consulta aqui (vou exemplificar): select * from PRODUTOS where LOJA=1 e tenho um retorno de mais ou menos 10 mil registros de um total de quase 30 mil. Preciso fazer uma consulta da consulta... por exemplo: select (do resultado anterior) where preco > 50.00; afim de se ter um melhor em cima apenas do cache. O locate acaba sendo inviável pelo fato de apenas posicionar no primeiro registro do filtro. É possível ? Utilizo o Zeos 6.6 e Mysql. Obrigado. Sérgio

É o mesmo erro que retorna aqui. Não seria algo errado com a unit importada ? Ou mesmo a acentuação que foi usada no WS ? Recebi um exemplo em C# e funciona certinho. Sérgio

Em anexo. Agradeço. Sérgio Project1.rar

Bom dia ... não obtive sucesso Acho que tem algo errado, pois veja como veio as variaveis na unit importada pelo Wsdl: FRaz_oSocial: WideString; FLocaliza__o: WideString; ... os caras acentuaram os a variáveis no WS e na importação esta vindo dessa forma. Já atualizei o meu WSDL Importer (D7) e o problema continua. Alguem pode dar um help ? Muito obrigado. Sérgio

Boa tarde amigos... Estou tendo a necessidade de criar um pequeno aplicativo que irá fazer algumas consultas através de um webservice e estou tendo algumas dúvidas. Já fiz a importação pelo wsdl importer, gravei a unit e já estou interagindo com ela em meu projeto. A dificuldade é que os retornos das funções são em array e não sei como tratar ou converter esse resultado. Vejam: function Clientes(const login: WideString; const senha: WideString): ArrayOfCliente; stdcall; Alguém pode me dar um help ? Em anexo a unit gerada pela importação. Obrigado. Sérgio FeixeWeb.pas

Você ainda tem problemas com o envio ? Sérgio

Verifique a instação do certificado, verifique também se as dlls foram registradas corretamente. Sérgio

Contato pelo email ser_assuncao@hotmail.com

Blz Daniel, Blz Regys ... vo partir pra um gerador mesmo. Obrigado !!! Sérgio

Bom dia Daniel... Nesse caso eu teria que usar a dll fornecida pelo fabricante ? Usando o fortes report ou um outro eu não consigo ajustar uma impressão 40 colunas e inserir o código de barras? Agradeço muito a sua atenção. Sérgio

Olá amigos, boa noite ... Eu tenho um terminalzinho de pre-vendas onde emito um comprovante não fiscal formatado (usei o writeln) para 40 colunas com um numero a ser importado pelo pdv. Agora eu queria trocar esse numero por um codigo de barras e gostaria de uma dica para a melhor forma de fazer, seja por algum report de forma grafica ou alguma outra solução. Obrigado. Sérgio