amigos tengo un reloj que toma la hora de un servidor remoto y quisiera saber si es la forma mas optima de hacerlo.
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;
Fecha.Close;
Fecha.SQL.Clear;
Fecha.SQL.Add('SELECT date_format(current_date(),"%Y/%m/%d")');
Fecha.Open;
Label11.Caption:=Fecha.fields[0].AsString;
Except on e:exception do
Escribir('*****Exepcion al Actualizar la Hora: '+label25.Caption+' en el Timer Hora');
End;
el Timer tiene como parametro de Interval:=10000;
durante el dia me genera este tipo de excepcion
Acces violation