Главная страница
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.026 c
3-89788
IGORYOK
2003-11-06 16:01
2003.11.27
Почему после того как я ввожу Connection String внутри программы


1-89831
Goorus
2003-11-17 03:09
2003.11.27
Graphics


3-89728
rosl
2003-11-11 03:39
2003.11.27
edit.text


1-89818
Татьяна
2003-11-14 11:26
2003.11.27
TF1Book


3-89711
frogl
2003-11-09 11:26
2003.11.27
Записть полей типа text в MS SQL