Главная страница
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.016 c
1-89855
Боян Георгиев
2003-11-16 14:33
2003.11.27
Функция Read для стрингов


1-89859
AngelSaint
2003-11-16 10:34
2003.11.27
system idle


1-89971
MakNik
2003-11-17 15:33
2003.11.27
Формы


1-89942
Pert
2003-11-17 21:29
2003.11.27
из Edit a в переменную


3-89783
Chel
2003-11-10 17:41
2003.11.27
NCOCI