Программа-невидимка на Delphi

[Ronder]

Как создать приложение на Delphi не использую компонента Forms, чтобы программа постоянно висела в процессах?

Заранее благодарен!

[profi]

А не проще скрыть форму Form1.Visible:=false;

[Ronder]

Не проще, размер откомпиленого файла большой будет.

[Stilet]

Программа-невидимка на Delphi

Сделай консольное приложение, но убери директиву $APPTYPE CONSOLE

program Project1;


uses windows,
  SysUtils;

begin
 while MessageBox(GetForegroundWindow,'qq','ee',MB_OKCANCEL)<>IDCANCEL do;
  { TODO -oUser -cConsole Main : Insert code here }
end.

размер откомпиленого файла большой будет.

Есть возможность написать прогу с формой и размер ее будет очень маленький. Задача какая?

[Ronder]

С конкретной задачей пока не определился, на данном этапе нужно просто чтобы программы была без интерфейса и висела в процессах, не видавая себя окнами (типа MessageBox).

Stilet, Ваш код хорош, но мне нужно чтобы не было никаких всплывающих сообщений. Возможно ли такое сделать?

[Stilet]

Возможно ли такое сделать?

А что твой редактор кода в котором ты программу пишешь мой пример редактировать не позволяет?
Оставь While true do; и радуйся демону в процессах

[Ronder]

Сообщение от Stilet

Оставь While true do; и радуйся демону в процессах

Гениальное решение! Только вот загрузка процессора в 50% меня не устраивает...

[profi]

Тогда удалите

While true do;

или что то нибудь еще туда напишите и все. Вы хотите вирус написать видимо? Используйте еще New->Other->Service Application

[Stilet]

Ronder

Смысл в том что ты все что угодно можешь написать между begin...End. Что ты там писать будешь я не знаю, но если тебе нужно чоб программа висела в процессах, тебе нужно ее зациклить, и определить условие выхода. Скажем в обычных оконных приложениях это сообщения, но они ведь тоже ловятся в такого вида каркасах, как я привел, и там именно цикл While используется.
Так что давай конкретную задачу. Иначе это просто поболталовка

[Ronder]

Смысл программы в том, что она должна постоянно проверять наличие файла, допустим, C:\t.txt. Если этого файла там нет, то скопировать из резерва его обратно. Делал прогу с помощью формы, скрывая её:

ShowWindow(Handle,SW_HIDE);
ShowWindow(Application.Handle,SW_HIDE);

Но в момент запуска окно всё же вылатает на экран, т.е. программу видно, но в процессах она висит.

На данном этапе возник вопрос как программу скрыть, а дальше уже придётся думать, как постоянно проверять наличие файла :-(