| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

таймер

andre ©   (2003-06-21 02:24:00) 

Я рисую рисунок прямо на экране; так вот как создать таймер, чтобы через определенное время рисунок перерисовывался (пробовал через GetTickCount, но сильно загружается процессор.Может чего не так сделал).Спасибо.

---

Andre   (2003-07-02 02:57:00) [1]

Ну зачем же так грубо...

---

Shluz   (2003-06-30 23:15:00) [2]

> Я рисую рисунок прямо на экране
:)) друг, ты потерялся в киберпространстве!! Рисовать можно еще на бумаге :)
//Вот так досидишься за компом, рисовать начнешь на экране, питаться компактами, мочиться прям в системник, знать свое имя и фамилию исключительно в 16-ричных кодах и т.п.

---

Andre   (2003-06-28 02:16:00) [3]

Всем спасибо, всё работает.

---

Digitman   (2003-06-23 10:03:00) [4]

> Marouder


а где ж у тебя KillTimer() ?)

Вот насоветуешь вопрошающему, потом ведь будет он жаловаться, мол, нехватка памяти, утечка ресурсов и т.д. и т.п. ))

---

Marouder   (2003-06-23 09:28:00) [5]

Вот кусок из моей простенькой проги, тут ставится таймер.



var msg:tmsg;

procedure TimerProc(hWnd,uMsg,idEvent,dwTime:DWORD);stdcall;
var fl:DWORD;
begin
fl:=1;
if InternetGetConnectedState(@fl,0) then
MessageBox(0,"ВЫРУБАЙ ИНЕТ НА ХРЕН","ХВАТИТ УЖЕ СИДЕТЬ",MB_ICONINFORMATION);
end;

begin
SetTimer(0,100,3600000,@timerproc);
While GetMessageA(msg,0,0,0) do
begin
TranslateMessage(msg);
DispatchMessageA(msg);
end;
end.



---

Digitman   (2003-06-23 08:30:00) [6]

разве из описания ф-ции в стандартном хэлпе что-то неясно тебе ?

---

Andre   (2003-06-23 02:04:00) [7]

У меня нет формы.
Про SETTIMER знаю, но не знаю что с ним делать, WINAPI только осваиваю. Спасибо.

---

Digitman   (2003-06-21 13:55:00) [8]

> рисунок прямо на экране


да хоть на бумаге кисточкой !
какое это имеет значение к проблеме ?

используй обычный компонент TTimer, в обработчике его события OnTimer() делай практически все что заблогорассудится, но - быстро, не дольше чем период времени, указанный в св-ве TTimer.Interval

---

Marouder   (2003-06-21 10:02:00) [9]

Функция API SetTimer. Думаю, разберешся. Времени нет расписывать.

---

Наверх