Hola
Excepción ?????
Osea: Quieres que si alguno de los edits esta en blanco salte una execpcion????.
Osea: Quieres dejar que se equivoquen ????.
Osea: mmmmmm.
No hace falta una excepcion cuando se puede hacer que la funcion trabaje dependiendo de .......
Código Delphi
[-]
Function TForm1.TransformaTiempo:Real;
var h,m,s : Integer;
Begin
h:= StrToint(Edit1.Text);
m:= StrToint(Edit2.Text);
s:= StrToint(Edit3.Text);
If h or m or s <> StrToInt('') then TransformaTiempo:= h*3600 + m*60 + s;
End;
Saludos