Главная страница
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-89840
Лена
2003-11-16 20:24
2003.11.27
Перевод целого р- ичного числа (2<= p<= q) в десятичную систему с


1-89956
Shluz
2003-11-17 20:16
2003.11.27
If Then


3-89752
Vemer
2003-11-07 12:52
2003.11.27
Не работает ORDER BY на VIEW


6-90030
Yrasikombo
2003-09-29 14:56
2003.11.27
Как определить все IP адреса включенных компов в локальной сети.


1-89900
Bokus
2003-11-15 10:00
2003.11.27
Криптография