Error En STRTODATE()
 

Hola Buenas,
Estoy Utilizando Delphi 5, y tengo un grabe problema con la funcion STRTODATE..
Lo primero que hago es esto..
Guardo en variables los parametros. del formato por defecto de la fecha.
ejecuto el strtodatetime.. y todo perfercto
despues vuelvo a setear los valores por default....
(asta aca todo ok!!!)

Código Delphi [-]
      AuxSep:=DateSeparator;
      DateSeparator := '/';
      auxFecha:=Shortdateformat;
      ShortDateFormat := 'MM/DD/YYYY';
      MailMsg.StartDate :=   StrToDateTime(fecha+ ' '+hora);
      shortdateformat:=auxFecha;
      DateSeparator := auxSep;

el problema viene despues.. Siempre que quiero utilizar la funcion STRTODATETIME Nuevamente Delphi Me da este error !!!

Delphi exception EConvertError at $441F985

probando vi que es en la funcion STRTODATE (poque la hora la combierte bien..)
Cualquiera Sea el formato de fecha que utilise (DD/MM/YYYY o MM/DD/YYYY)