[[egostar]]

Empezado por Caral

Hola
Es muy cierto, da errores en tiempo de ejecucion, pero que pesados son, no se si sere demasiado perfeccionista pero aborrezco estos erroes, siempre trato de buscar otra manera de hacer lo mismo, porque hoy me acuerdo del porque me da el error, dentro de unos meses se ma habra olvidado y a comenzar de nuevo.
Me ha pasado varias veces, y simpre busco otra solucion, nunca dejo el error ahi.
Es preferible romperse la cabeza dos dias que dejar un error o algo asi porque si.
Saludos

Muy de acuerdo amigo Caral, lo que yo haria es lo siguiente:

Código Delphi [-]
procedure Tfrm_clientes.b_ErrorClick(Sender: TObject);
var
  a,b,c: Integer;
begin
  a := 15;
  b := 0;
  if b <> 0 then begin
     c := a div b;
     txtCodigo.Text := IntToStr(c);
  end
  else begin
           ShowMessage('ERROR xyz: Divisón cero');
  end;
end;

Los try...except me resultan mas útiles en cuestiones no controlables a primera vista, pero bueno, quien soy yo para dar consejos de usar o no un try.

Salud OS.