Ver Mensaje Individual
  #7  
Antiguo 29-07-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola gente.
Totalmente de acuerdo con delphi.com.ar y javier7ar.
Con esas funciones se puede comprobar la conversión sin que que se lanze una excepción.

Pero nena_yei dijo:
Cita:
Pues bien, no sé si el funcionamiento del try no es ese o que algo estoy haciendo mal,...
Por lo que tratamos de aclarar por qué no le funcionaba el try except.

Si el caso expuesto hubiera sido este:
Código:
procedure TForm1.Button1Click(Sender: TObject);
var
  t: TextFile;
begin
  AssignFile(t,'F:\prueba.txt'); // ( PRUEBA.TXT NO FUE CREADO AUN )
  try
   Reset(t);
  except
   ShowMessage('El archivo no existe');
  end;
end;
No habría podido evitar que se eleve la excepción.

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita