Главная страница
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.028 c
1-89952
DimaK
2003-11-17 22:38
2003.11.27
Caption формы


1-89867
DimaK
2003-11-15 23:13
2003.11.27
Обновление трея


1-89924
snake1977
2003-11-18 10:58
2003.11.27
Debuger


7-90140
VadimEagel
2003-09-16 01:54
2003.11.27
Как выключить монитор в TService


1-89941
Мыш
2003-11-18 08:58
2003.11.27
Почему create Tobject-a не дает сделать override в потомке?