Ver Mensaje Individual
  #3  
Antiguo 27-05-2017
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 599
Reputación: 21
mRoman Va por buen camino
Cita:
Empezado por ecfisa Ver Mensaje
Hola Miguel.

La descripción del problema que das es muy vaga y por tanto es improbable que podamos darte una respuesta acertada. Podría deberse al tratamiento que le das a los errores...
  • ¿ Como gestionas el control de excepciones en el programa ?
  • ¿ Algunos ejemplos errores que provocan el fallo de impresión ?
  • ¿ Algunos ejemplos de las situaciones en que se producen esos fallos ?
  • ...
Todo dato que pienses que sea relevante y puedas aportar servirá para que podamos ayudarte mejor.

Saludos
Gracias ecfisa por contestar.

Mira los errores no los trato con try, except o una cosa asi....agrego algo del código:

En un formulario tengo esto en un boton:
Código Delphi [-]
procedure TfrmDetalleComanda2.sBtnImprimirClick(Sender: TObject);
begin
    ImprimirTicket2();
    ImprimirTicket2();
    stpActualizaEstatusComanda.Close;    
    stpActualizaEstatusComanda.ParamByName('nId_Registro').AsInteger:=BD.n_IDRegistro;
    //qryTicket.fieldByName('registro_id2').AsInteger;
    stpActualizaEstatusComanda.ParamByName('i_estatus_comanda').AsString:='I'; //Comanda pendiente de cobrar
    stpActualizaEstatusComanda.ParamByName('i_estatus_cuenta').AsString:='A'; //Cuenta sigue abierta
    stpActualizaEstatusComanda.ExecProc;
    stpActualizaEstatusComanda.Transaction.Commit;
    frmMesasAbiertas2.FormShow(Sender);
    Close;
end;

Y el usuario me comenta que despues de la impresión marca este error:

Código Delphi [-]
" is not a valid floating point value

El caso es que muy probablemente el error esta cuando se ejecuta el código que esta posterior a la impresión...aparte de encontrar el error, como le hago para que el usuario consulte otra comanda y la pueda mandar a impresión!!....la otra comanda marco un error, ni modo....pero ya no le permite mandar otra....porq?, no manda mensaje de nada en la segunda comanda que quieren imprimir....simplemente dan click sobre el boton....y el boton no hace nada...no ejecuta el código que puse arriba.

Por cierto mando llamar al procedimiento de impresion "ImprimirTicket2();"...2 veces porq la impresora Epson T2 (algo, no recuerdo ahorita), solo permite 1 copia...y no mas de 1, lo comento por si alguien se pregunta porque llamo 2 veces a este procedimiento.

Saludos y gracias por su tiempo.

pd. try...except..end, seria la solucion?....EL ERROR NO SIEMPRE LO MARCA EN OTRAS COMANDAS.
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!

Última edición por mRoman fecha: 27-05-2017 a las 05:04:57.
Responder Con Cita