Как запустить таймер?

← →
quaker (2003-09-19 07:52) [0]

У меня очень простой вопрос, как запустить таймер??? Я пишу то, что написано в API Helр...

// на WM_CREATE SetTimer(Wnd, 1, 1000, NIL); // на WM_DESTROY KillTimer(Wnd, 1);

...WM_TIMER не работает...
Объясните пожалуйста, что я делаю неправильно?

← →
MBo © (2003-09-19 09:15) [1]

все прекрасно работает

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:
...

> WM_CREATE:
> SetTimer(Window,1,1000,0);
> WM_Timer:

только не 0, а nil

Как запустить таймер? Найти похожие ветки