Неконсольное приложение

Вопросы программирования на Free Pascal, использования компилятора и утилит.

Модератор: Модераторы

Неконсольное приложение

Сообщение Виталий » 02.01.2014 21:49:18

Всем доброго. Использую Лазарус 1.0.12 и FPC 2.6.2 для разработок. Понадобилась необходимость в приложении, которое не является ни консолью ни окном.
В Делфи это получается если убрать директиву {$Apptype console}. Тогда приложение становится просто процессом.

Как в Лазарусе указать, что приложение будет просто процессом без консоли?
Виталий
новенький
 
Сообщения: 40
Зарегистрирован: 05.01.2013 22:33:11

Re: Неконсольное приложение

Сообщение Vadim » 03.01.2014 06:17:15

Виталий писал(а):Как в Лазарусе указать, что приложение будет просто процессом без консоли?

В смысле, сервисом?
Vadim
долгожитель
 
Сообщения: 4112
Зарегистрирован: 05.10.2006 08:52:59
Откуда: Красноярск

Re: Неконсольное приложение

Сообщение Brainenjii » 03.01.2014 08:26:50

Правильный подход - сделать сервис/демон. Неправильный, но лёгкий - сделать обычное гуёвое приложение, а в .lpr файле добавить Application.ShowMainForm := False; Выйдет что-то вроде
Код: Выделить всё
  Application.Initialize;
  Application.ShowMainForm := False;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
Аватара пользователя
Brainenjii
энтузиаст
 
Сообщения: 1351
Зарегистрирован: 10.05.2007 00:04:46

Re: Неконсольное приложение

Сообщение Виталий » 03.01.2014 19:25:46

Vadim писал(а):В смысле, сервисом?

Нет, не сервисом, а просто приложение без окна.
Brainenjii писал(а):Правильный подход - сделать сервис/демон.

Но мне так делать нет смысла )
Прога после загрузки винды будет кой-че бэкапить, потом она уже не нужна до следующей перезагрузки, и нет смысла совать ее в службы. :)
Тем паче что нужно делать это после входа в сеанс (винда)
Brainenjii писал(а):Неправильный, но лёгкий

Ну это понятно, просто хотелось сделать маленькое по размеру приложение.
Ладно тема закрыта вопрос решен в пользу второго варианта.
Виталий
новенький
 
Сообщения: 40
Зарегистрирован: 05.01.2013 22:33:11

Re: Неконсольное приложение

Сообщение Лекс Айрин » 03.01.2014 20:52:09

Виталий писал(а):Прога после загрузки винды будет кой-че бэкапить, потом она уже не нужна до следующей перезагрузки, и нет смысла совать ее в службы.


можно ведь и загасить ее в конце процедуры бекапа.
Аватара пользователя
Лекс Айрин
долгожитель
 
Сообщения: 5723
Зарегистрирован: 19.02.2013 16:54:51
Откуда: Волгоград

Re: Неконсольное приложение

Сообщение Alexx2000 » 03.01.2014 21:12:43

Виталий писал(а):Как в Лазарусе указать, что приложение будет просто процессом без консоли?

Добавить директиву
Код: Выделить всё
{$APPTYPE GUI}

Или просто поставить соответствующую галочку в настройках проекта ("Компоновка"->"Графическое приложение Win32").
Аватара пользователя
Alexx2000
постоялец
 
Сообщения: 489
Зарегистрирован: 25.10.2006 00:22:07
Откуда: Мытищи

Re: Неконсольное приложение

Сообщение Виталий » 04.01.2014 15:02:55

Alexx2000 писал(а):Добавить директиву
Код: Выделить всё
{$APPTYPE GUI}

Или просто поставить соответствующую галочку в настройках проекта ("Компоновка"->"Графическое приложение Win32").

О! Вот оно и нашлось :D
Домо аригато :o
Виталий
новенький
 
Сообщения: 40
Зарегистрирован: 05.01.2013 22:33:11


Вернуться в Free Pascal Compiler

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 5

Рейтинг@Mail.ru