Ver Mensaje Individual
  #1  
Antiguo 19-11-2010
marioar marioar is offline
Miembro
 
Registrado: jul 2010
Posts: 11
Reputación: 0
marioar Va por buen camino
manejo de excepciones en lazarus

Hola gente, estoy teniendo problema para controlar las excepciones, en particular lo que quiero hacer es controlar la existencia de un archivo dbf, el codigo es el siguiente:

Código Delphi [-]
try
  dbf2.FilePathFull:= DirecOrigen.Text;
  dbf2.TableLevel:=7;
  dbf2.TableName:= 'profesional.dbf';
  dbf2.Active:= true;
  except
  on e : exception do
  begin
     application.MessageBox('Verifique la ruta de origen', 'error', 0);
     exit;
  end;
end;

cuando busco en una ubicacion incorrecta me tira el cartel "reised exception class 'Exception' with message: Open: file not found: ...."

alguna idea de donde estoy pifiando???
gracias!!

Última edición por Casimiro Notevi fecha: 19-11-2010 a las 11:48:55.
Responder Con Cita