Скачать: CL | DM;

Незавершающееся консольное приложение.   Найти похожие ветки 

← →
ezorcist   (2007-02-26 20:25) [0]

program Project1;
{$APPTYPE CONSOLE}
uses  windows;
var msg:TMsg;
begin
 While (GetMessage(msg,HInstance,0,0)) do begin
   translatemessage(msg);
   dispatchmessage(msg);
 end;
end.

На моем компе это потребляет весь процессор... Подскажите в чем дело?

---

← →
SlymRO   (2007-02-27 07:42) [1]

While (GetMessage(msg,0,0,0)) do begin

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.033 c