Vamos ver se entendi.
Anota meu msn ai pra vc entrar em contato comigo, vai ser mais fácil

[EMAIL PROTECTED]
  -----Mensagem original-----
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de jmourajr2000
  Enviada em: quinta-feira, 8 de dezembro de 2005 08:26
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: RES: [delphi-br] Numero de Copias - Usando QuickReport


  Eduardo, como vai?

  Obrigado pela dica, mas após o comando rel_Etiq.PRINT; eu não
  consigo estabelecer um contador. Mesmo dentro dos eventos do rel_etiq
  (Quickreport) nem na procedure anteriormente citada.
  Desculpe, mas Não consegui captar.

  Abraços.

  José de Moura




  --- Em delphi-br@yahoogrupos.com.br, Eduardo Silva ® <[EMAIL PROTECTED]>
  escreveu
  > Vc quer o total que ele já imprimiu ou o total que ele esta
  imprimindo
  > naquele momento?
  >
  > Se for o primeiro caso, coloque um campo na tabela integer e crie
  um
  > somat´roio pra ele a cada etiqueta impressa
  >
  > Se for no segundo, faça um contador no ato da impressão
  >   -----Mensagem original-----
  >   De: delphi-br@yahoogrupos.com.br [mailto:delphi-
  [EMAIL PROTECTED]
  > nome de jmourajr2000
  >   Enviada em: terça-feira, 6 de dezembro de 2005 14:59
  >   Para: delphi-br@yahoogrupos.com.br
  >   Assunto: [delphi-br] Numero de Copias - Usando QuickReport
  >
  >
  >   Caros amigos, boa tarde!
  >
  >   Por favor, Preciso incluir em um aplicativo desenvolvido, a
  seguinte
  >   situação:
  >
  >   Utilizo para imprimir etiquetas(usando o QuickReport) a seguinte
  >   instrução:
  >
  >   var MODELO : String;
  >   begin
  >        MODELO := dmPecas.tblPecas.FieldByName('MODELO').AsString;
  >        If not assigned(rel_Etiq) then
  >           rel_Etiq := Trel_Bar.create(Application);
  >           rel_Etiq.Query1.Close;
  >           rel_Etiq.Query1.ParamByName('MODEL').AsString := MODELO;
  >           rel_Etiq.Query1.Open;
  >           rel_Etiq.PrinterSettings.Copies := StrToInt
  (NumEtiqs.Text);
  >           rel_Etiq.Print;
  >   end;
  >
  >   Sendo que no componente NumEtiqs eu determino a quantidade de
  >   etiquetas a serem impressas(Até ai tudo OK).
  >   Mas agora o Cliente necessita que eu inclua a quantidade de
  >   etiquetas impressas(esta etiqueta é somente 1(uma) por pagina) em
  >   Real-Time, ou seja, a cada copia impressa deverá ser sinalizado o
  >   numero de etiquetas impressas.
  >
  >   Já quebrei a cabeça e ainda não obtive resultados.
  >
  >   Alguem poderia me ajudar.
  >
  >   Agradeço muito de ante-mão.
  >
  >   Abraços a todos.
  >
  >   José de Moura
  >
  >
  >
  >
  >   --
  >   <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
  >
  >
  >
  >
  >
  >         Yahoo! Grupos, um serviço oferecido por:
  >               PUBLICIDADE
  >
  >
  >
  >
  > -------------------------------------------------------------------
  ---------
  > --
  >   Links do Yahoo! Grupos
  >
  >     a.. Para visitar o site do seu grupo na web, acesse:
  >     http://br.groups.yahoo.com/group/delphi-br/
  >
  >     b.. Para sair deste grupo, envie um e-mail para:
  >     [EMAIL PROTECTED]
  >
  >     c.. O uso que você faz do Yahoo! Grupos está sujeito aos
  Termos do
  > Serviço do Yahoo!.
  >
  >
  >
  >   __________ NOD32 1.1313 (20051206) Information __________
  >
  >   This message was checked by NOD32 antivirus system.
  >   http://www.nod32.com
  >
  >
  > [As partes desta mensagem que não continham texto foram removidas]





  --
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>





        Yahoo! Grupos, um serviço oferecido por:
              PUBLICIDADE




----------------------------------------------------------------------------
--
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.



  __________ NOD32 1.1315 (20051207) Information __________

  This message was checked by NOD32 antivirus system.
  http://www.nod32.com


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a