[firebase-br] Off-Topic ( ClientDataSet x Lx300 ) Por favor !!!!

Antonio Carlos a.lima.silva em terra.com.br
Ter Ago 1 11:31:50 -03 2006


Bem já sabem que é off e para estar sendo postado é porque já fui em vários 
locais ditos especializados e nínguem quiz ou soube ajudar e ai já em 
desespero, derrepente encontro alguem que passou por isso.

O pepino é a impressão de forma louca que esta ocorrendo, uso Firebird 1.5, 
DBexpress, Delphi7 Sp1, RDPrint 4.0

Seleciono normalmente os itens de um pedido de saida por vendas e uso o 
RDPrint para gerar o relatório em matriciais.

SdsItemPVenda.CommandText := 'SELECT * FROM ITENS_VENDA WHERE  ITEMSCOD_PED 
:= P00';
CdsItemPVenda.Params.Clear;
CdsItemPVenda.FetchParams;
CdsItemPVenda.Close;
CdsItemPVenda.IndexFieldNames := 'ITEMS_INCITEM' ; // crio um index para 
ordenar os itens para a exibição em um DBGrid
CdsItemPVenda.Open;

A impressão é simples


RDPrint.Abrir;
CdsItemPVenda.DisableControls; // para evitar a amostragem no dbgrid;
CdsItemPVenda.First;
while not CdsItemPVenda.eof do
  begin
     RDPrint(RDPrintFIELD..... ) ;
     CdsItemPVenda.next;
 end;
RDPrint.fechar;
CdsItemPVenda.First;
CdsItemPVenda.EnableControls;

Ocorre que "AS VEZES( NÃO HÁ UMA PERIDIOCIDADE, É ESPORÁDICO), SOMENTE NO 
CLIENTE " a impressão fica louca !
Exemplo :

Um pedido onde há apenas 1 item é impresso dois, e o total mantém-se o de 
um.Um total que é 234,00 é impresso 0,00 , ou é impresso dois itens e por ai 
vai ou.

No rodapé da página onde é impresso a quantidade de itens atraves do 
CdsItemPVenda.RecordCount sempre está certo.

Já gastei uma caixa de formulário no laboratório ( com outra impressora 
LQ570 ) e o "defeito não aconteceu"

Já postei ao proprietario do componente e ele informou não haver bug .
Postei em listas de hardware sobre LX300 e suas panes e não obtive nenhuma 
ajuda.

Alguma luz ?








Mais detalhes sobre a lista de discussão lista