Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.27;
Скачать: CL | DM;

Вниз

Обновление трея   Найти похожие ветки 

 
DimaK ©   (2003-11-15 23:13) [0]

Подскажите, как можно обновить трейку, дело в том, что я синхронизирую и по необходимости изменяю системное время, вот мой код:

procedure TForm1.Button1Click(Sender: TObject);
var st: TSystemTime;
begin
GetSystemTime(st);
st.wHour:=StrToInt(Edit1.Text)-3; // Часы
st.wMinute:=StrToInt(Edit2.Text); // Минуты
st.wSecond:=StrToInt(Edit3.Text); // Секунды
st.wMilliseconds:=0;
SetSystemTime(st);
end;

но дело в том, что время меняется, но в трее оно остается какое-то время старым, я так понимаю что надо обновить трейку, но как?


 
Шустрый   (2003-11-16 08:20) [1]

Попробуй использовать TTimer, чтобы он непрерывно обновлял трэй, я так делал))



Страницы: 1 вся ветка

Текущий архив: 2003.11.27;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
1-89877
Quit
2003-11-15 18:18
2003.11.27
Строку наоборот


3-89748
vov-
2003-11-07 21:38
2003.11.27
цвет dbgrid


14-90111
Layner
2003-11-04 08:37
2003.11.27
offtop: А почему в многопоточном прил., написанном на Delphi, при


14-90075
vuk
2003-11-04 17:41
2003.11.27
По аське пришло. :o)


3-89739
Developerr
2003-11-10 20:51
2003.11.27
Yaffil SQL Server Login и Password