Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Программа и интерфейс
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 21.07.2009, 19:10
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию Создание сервиса на Delphi

В общем у меня такая ситуация. Написал я обычное приложение и с помощью Tservice (делал просто через File-New-Other) создал сервис. Написал в в секции begin все, что должен делать сервис. И теперь мне нужно запустить этот сервис из моего приложения, чтобы он постоянно пока включен ПК висел резидентно, а при выключении удалялся. Но у меня не запускается сервис(( Как я понял сервис нужно сначала установить, а потом запустить.

Пробовал сделать так как написано в ФАКе DS - не получается запустить сервис. Может, кто-нибудь напишет мне самый простой сервис,чтобы он инсталлировался/ деинсталлировался и запускался правильно?
Ответить с цитированием
  #2  
Старый 23.07.2009, 07:31
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

Неужели мне тут не помогут?(
Ответить с цитированием
  #3  
Старый 23.07.2009, 10:40
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

Тебе именно сервис нужен или просто чтоб не было видно твоего софта? Спрятать свое приложение можно так:
Код:
 ShowWindow(Application.Handle,sw_hide);
 ShowWindow(FORM1.Handle, SW_HIDE);
будет висеть только в процессах
Ответить с цитированием
  #4  
Старый 23.07.2009, 11:17
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

Именно сервис.
Ответить с цитированием
  #5  
Старый 29.07.2009, 22:25
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,560
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Muxa
Именно сервис.
Лови 10 раз ...
Вложения
Тип файла: zip service_test.zip (3.6 Кбайт, 363 просмотров)
Ответить с цитированием
  #6  
Старый 30.07.2009, 15:31
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

Попытался скомпилировать, выдает вот это:

Пытался исправить эти ошибки - не получилось

P.S. Windows 7, Delphi 2009

Последний раз редактировалось Muxa, 30.07.2009 в 15:35.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 13:40.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter