Ayuda con Access Violation

[JerS]

Nadie ha pasado por un problema como este??? tambien me esta pasando en la siguiente parte del codigo

Código Delphi [-]
      Try
        Hora.Close;
        Hora.SQL.Clear;
        Hora.SQL.Add('Select (time_format(Current_time,"%H:%i"))as Hora, (time_format(Current_time,"%h:%i %p"))as HoraAMPM ');
        Hora.Open;
        label25.Caption:=Hora.Fields[0].AsString;
        label8.Caption:=Hora.Fields[1].AsString;
        Application.ProcessMessages;
      Except on e:exception do
        Escribir('*****Exepcion al Actualizar la Hora: '+label25.Caption+' en el Timer Hora');
      End;

Arrojandome esta Excepcion: *****Exepcion al Actualizar la Hora: 10:33 en el Timer Hora

este codigo esta en un TTimer el cual tiene un intervalo de 10000