Hola, tengo el siguiente codigo:
Código Delphi
[-]
Function FechaValida(Fecha:String):Boolean;
Var
Buena:boolean;
Begin
Buena:=true;
{$R-}
try
StrToDate(Fecha);
except
on E: EConvertError do Buena:=False;
end;
{$R+}
FechaValida :=buena;
End;
El caso es que aunque tengo la directiva de chequeo de rango, cuando introduzco mal la fecha, desde el entorno de delphi 6, se me para y me lanza una "raised exception" de fecha no valida... Si lo ejecuto desde windows no hay problema... Hay alguna directiva para que no se me pare y tenga que darle OK para continuar???
Gracias