No repositório do ACBr existe um exemplo de como listar as notas:
C:\ACBr\Exemplos\ACBrDFe\ACBrNFe\DistribuicaoDFe.txt
Dá pra ter uma boa ideia do funcionamento baseando-se por lá.
Reinaldo Silveira's post in PESQUISA was marked as the answer
Observe que se você fazer a consulta assim: LIKE '%AFASTADOR%MEDIO%' você obterá resultado. Ou seja, substituindo o caractere espaço por porcentagem, sua pesquisa ficará mais flexível.
Tente algo assim:
qry.Close;
qry.SQL.Add('SELECT * FROM TB_PRODUTO WHERE DESCRICAO LIKE :pesquisa');
qry.Params[0].Value := '%'+ StringReplace(edtPesquisa.Text, ' ', '%', [rfReplaceAll]) +'%';
qry.Open;
Eu uso desta forma e nunca tive problemas.
Olá italoluz!
Eu me expressei mal, na verdade eu me referia à Unit principal (e não Form), onde eu declarei: Windows, Forms e ActiveX em uses.
Se não estou esquecendo de nada, os passos foram os seguintes:
1) após criado o serviço no Delphi, é necessário instalá-lo (via prompt: C:\caminho_do_servico\nome_do_servico.exe /install
2) após instalado, vá em services.msc (menu executar). Botão direito sobre o serviço, propriedades, logon. Em 'esta conta', informe um nome de usuário e senha que possua privilégios administrativos (é importante que a senha deste usuário esteja definida para nunca expirar - para evitar problemas futuros)
3) logue no Windows usando esse mesmo usuário, e instale o certificado digital por lá
4) volte em services.msc e inicie o serviço.
Bom, acho que foi somente isso. Espero ter ajudado.
Abraços.
We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.