Que tal....
Encontré la solución:
Código Delphi
[-]procedure TfrmDetalleComanda.sBtnImprimirClick(Sender: TObject);
begin
ImprimirTicket(); ImprimirTicket(); frmMesasAbiertas.btnActualizarClick(Sender);
Close;
end;
Esta es el procedure q imprime el ticket 2 veces....
Código Delphi
[-]procedure TfrmDetalleComanda.ImprimirTicket();
begin
qrTicket.qryCantLetra.Close;
qrTicket.qryCantLetra.ParamByName('id').AsInteger:=nID;
qrTicket.qryCantLetra.Open;
qrTicket.qryTicket.Close;
qrTicket.qryTicket.ParamByName('registro_id').AsInteger:=nID;
qrTicket.qryTicket.Open;
qrTicket.QuickRep1.Print;
end;
Lo que esta de GRIS era como lo tenia definido...y asi no me funcionaba ya que despues de imprimir como que los DataSets (IBQuery) se cerraban y me decia que los campos q queria imprimir no estaban, cuando lo queria imprimir otra vez...
qrTicket.QuickRep1.Print;
qrTicket.QuickRep1.Print;
Saludos....y gracias por el tiempo q hayan invertido en querer ayudarme