ANTICHAT - Показать сообщение отдельно - [Delphi]/[Pascal] Задай вопрос, получи ответ

Цитата:

Сообщение от НTL

Как мне на Delphi сделать прогу которая бы висела в процессах (То есть без формы) и спокойно выполняла свою дела? Если создать Console Application, то будет висеть окно терменала...

Собственно, как и говорил slesh. File->new->other->console application.
Удаляем строчку {$APPTYPE CONSOLE} - так не будет показываться черное окно. Далее организуем бесконечный цикл, чтобы программа висела в памяти. Фленов в "Delphi глазами хакера" приводил такой вариант:

Код:

while GetMessage (Msg, HInstance, 0, 0) do
    begin
      TranslateMessage(msg);
      DispatchMessage(msg);
      //где-нибудь тут пишется свой код
    end;

Но у меня на машине этот способ безбожно тормозил и грузил процессор на 100%, поэтому я делаю так:

Код:

while GetMessage (Msg, HInstance, 0, 0) do
    begin
      TranslateMessage(msg);
      DispatchMessage(msg);
      //где-нибудь тут пишется свой код
      Sleep(100);
    end;

Может, можно делать как-то более правильно, но я честно не знаю как. Да и в принципе, меня так вроде устраивает.