| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как запустить таймер? [D5, Win95/98]
quaker © (2003-09-19 07:52:00)
У меня очень простой вопрос, как запустить таймер??? Я пишу то, что написано в API Helр...
// на WM_CREATE
SetTimer(Wnd, 1, 1000, NIL);
// на WM_DESTROY
KillTimer(Wnd, 1);
...WM_TIMER не работает...
Объясните пожалуйста, что я делаю неправильно?
andre (2003-09-21 23:35:00) [1]
> WM_CREATE:
> SetTimer(Window,1,1000,0);
> WM_Timer:
только не 0, а nil
MBo (2003-09-19 09:15:00) [2]
все прекрасно работает
case Message of
WM_DESTROY:
begin
KillTimer(Window,1);
PostQuitMessage (0);
Result := 0;
Exit;
end;
WM_CREATE:
SetTimer(Window,1,1000,0);
WM_Timer:
begin
s:=IntToStr(GetTickСount);
SetWindowText(Window, PChar(s));
end;
WM_PAINT:
...
| |
