Ir para conteúdo
  • Cadastre-se

Ailton N. Mattos

Membros
  • Total de ítens

    15
  • Registro em

  • Última visita

Posts postados por Ailton N. Mattos

  1. 4 horas atrás, Daniel Simoes disse:

    Não há outra explicação, a não ser o Erro de posicionamento da Bobina...

    Como aplicação, você pode iniciar a impressão na coluna que desejar... basta enviar espaços antes do texto 

    entendi, vou fazer desta forma então. vlw

  2. 22 horas atrás, Daniel Simoes disse:

    Isso parece ser um problema de posicionamento da Bobina.. Verifique se há algum afastador, no berço da bobina

    Está tudo certo com a impressora, o o afastador está no lugar certo. Tenho um programa de automação na máquina e ele está imprimindo os pedidos e conta perfeitamente.

  3. 3 horas atrás, Daniel Simoes disse:

    por favor dê mais detalhes...

    Que relatórios está tentando imprimir ?

    Usa EscPos, Fortes ou Fast ?

     

    2 horas atrás, Daniel Simoes disse:

    EscPos não tem controle de Margens, apenas o Número de Colunas em Fonte normal...

    Qual é a sua dificuldade ? Já testou o demo do ACBrPosPrinter ?

    Sim, testei bastante o exemplo, minha grande dificuldade é criar esse limitação para não cortas mais letras, pensei que que tinha alguma configuração, para eu não fazer nenhuma "gambiarra"

    Mas dar para eu controlar em qual coloca a palavra começa e em qual o limite dela?

  4. Boa tarde,

    Estou com duvidas para definir as margens esquerda/direita do meu documento, minha impressora é uma bematech 2500th, as duas margens estão cortando palavras. Como eu faço para limitar espaços para as margens?

  5. Em 24/12/2019 at 11:18, Juliomar Marchetti disse:

    tu assistiu o vídeo e leu com calma o que o Italo falou?

    ele vem quando tu faz a consulta, tu começa com zero e ele vai te trazer o último

    Desculpe, eu não achei esse video explicativo, tem como me mandar?

    Obrigado

  6. 2 horas atrás, Juliana Tamizou disse:

    Bom dia.

    Este é o artigo de nossa Base de Conhecimentos detalhando o processo do DistribuiçãoDfe.

    Att.

    Obrigado pelo resposta.

    Só fiquei com um duvida agora, como eu consigo pegar o numero da ultima NSU ?

  7. Boa tarde amigos,

     

    Estou usando algumas funções do NFe do ACBr, já consegui criar uma tela com funções de inutilização e tal.

    Mas agora estou precisando criar uma função de baixar/recuperar o XML de venda pelo numero da nota, eu não estou conseguido fazer, você teriam alguma dica ou passo a passo? 

     

    Obrigado

  8. 31 minutos atrás, adilsonpazzini disse:

    var
     F1: TextFile;
     vPath1: String;
     ResultTemp: Boolean;
     CAMINHO : String ;
     Ini     : TIniFile ;
     varBD_ALIAS:string;
     varBD_PATH :String;
     varBD_HOST :String;
     varBD_USER :String;
     varBD_PASS :String;
     varBD_PORTA:String;

    begin
    varBD_ALIAS := 'DB';
    ResultTemp := False;
    CONEX01.Show ;
    CONEX01.Repaint;

         //-----------> acertando alias <------------------------------
         Caminho := IncludeTrailingPathDelimiter(ExtractFileDir(application.ExeName))+'ARQCONEXAO.INI';

         if not(fileexists(CAMINHO)) then
          begin
           Showmessage('Arquivo inexistente => '+CAMINHO);
           APPLICATION.Terminate ;
           Abort ;
          end else begin
           Application.CreateForm(TSISINI,SISINI);
           if SISINI.LoadAlias > 1 then
            begin
             SISINI.ShowModal;
             if SISINI.ModalResult = MROK then
              varBD_ALIAS := SISINI.ALIAS_SELEC;
            end;
           freeAndNil(SISINI);
          end;

         //#############################################################################
         //###################> lendo paramentros do ARQUIVO INI <######################
         //#############################################################################
         Ini := TIniFile.Create(Caminho);
         try
          varBD_PATH := Ini.ReadString( varBD_ALIAS, 'PATH', '' );
          varBD_HOST := Ini.ReadString( varBD_ALIAS, 'HOST', '' );
          varBD_USER := Ini.ReadString( varBD_ALIAS, 'USER', '' );
          varBD_PORTA:= Ini.ReadString( varBD_ALIAS, 'PORTA', '' );

          if trim(Ini.ReadString( varBD_ALIAS, 'PASSWORD', '')) <> '' then
           varBD_PASS := Decrypt(HextoAscii(Ini.ReadString( varBD_ALIAS, 'PASSWORD', '')))
          else
           varBD_PASS := 'masterkey';

         finally
          Ini.Free;
         end;

        try
          DM.DATABASE.Connected := False  ;
          DM.DATABASE.HostName  := varBD_HOST ;
          DM.DATABASE.Database  := varBD_PATH ;
          DM.DATABASE.User      := varBD_USER;
          DM.DATABASE.Password  := varBD_PASS;
          if trim(textotonum(varBD_PORTA)) <> '' then
          DM.DATABASE.Port      := strtoint(textotonum(varBD_PORTA));
          DM.DATABASE.LoginPrompt := False;

          DM.DATABASE.Connected := true;


          ResultTemp := True;

         Except
         On E: Exception do
          begin
             ShowMessage('Não foi possível conectar ao Banco de Dados !!!'+E.Message);
          end;
        end;

    CONEX01.Close;
    Result := ResultTemp;
    end;

    Esse código eu coloco em um data module?

×
×
  • 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.