Caro amigos estou usando o componente Acbr para exportar a txt da mgv6, eu exporto varios itens mais so esta indo um para a txt, poderia mim da uma orientação o que pode esta acontecendo? estou usando da seguinte forma a baixo citada.
cpCarga.Produtos.Clear;
while not qrproduto.eof do begin
cpCarga.Produtos.Clear;
memo1.Lines.Add(qrproduto.fieldbyname('produto').asstring);
Application.ProcessMessages;
barra.IncPartsByOne;
with cpCarga.Produtos.New do begin
ModeloEtiqueta := 1;
Setor.Codigo := 1;
Tipo := tpvPeso;
Codigo := StrToInt(qrprodutoCODIGO.AsString);
Descricao := qrprodutoPRODUTO.AsString;
ValorVenda := qrprodutoPRECOVENDA.AsFloat;
Validade := 0;
Tecla := 0;
end;
qrproduto.Next;