Ver Mensaje Individual
  #5  
Antiguo 09-03-2007
jam jam is offline
Miembro
 
Registrado: may 2003
Posts: 74
Reputación: 22
jam Va por buen camino
Bueno, ojeando la vcl se pueden encontrar varios ejemplos:

Código Delphi [-]
{ TFileStream }

constructor TFileStream.Create(const FileName: string; Mode: Word);
begin
  if Mode = fmCreate then
  begin
    FHandle := FileCreate(FileName);
    if FHandle < 0 then
      raise EFCreateError.CreateResFmt(@SFCreateError, [FileName]);
  end else
  begin
    FHandle := FileOpen(FileName, Mode);
    if FHandle < 0 then
      raise EFOpenError.CreateResFmt(@SFOpenError, [FileName]);
  end;
end;

aquí se puede ver que se lanzan exepciones, yo lo que quería saber es si hay alguna alternativa a
Código Delphi [-]
try
fn:=Tfilestrem.create('fichero que no existe',fmopen)
except
 fn:=nil;
end;
__________________
-¿no es usted la hija de un famoso banquero?.
-pues no.
-Perdone, pero por un momento pensé que me había enamorado de usted.
Responder Con Cita