como regresar de un procedimiento sin que este termine de ejecutarse

[JoseAntonio]

Empezado por oscarac

buenos dias
....

Código Delphi [-]
 
if rgRango.ItemIndex = 1 then  // compras por proveedor
   begin
      if edtProveedor.text = '' then  // si es proveedor no tiene dato que regrese a colocarlo
         edtproveedor.setfocus;
   End
..
..
GeneraReporte

deberia ser asi:

Código Delphi [-]
 
if rgRango.ItemIndex = 1 then  // compras por proveedor
   begin
      if edtProveedor.text = '' then begin  // si es proveedor no tiene dato que regrese a colocarlo
         edtproveedor.setfocus;
         raise exception.create('Debe elegir un proveedor');
    End;
   End
..
..
GeneraReporte

[[newtron]]

Hola.

Yo lo he entendido de otra forma, que no continue hasta que no introduzca el campo que necesita y eso creo que la mejor manera de hacerlo es llamando a un formulario modal para que te pida los campos que necesitas o en vez de usar un edit usar un inputbox pero eso queda bastante más cutre.

Saludos