Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.09.2010, 19:53   #1
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию Запуск чужой программы как сервиса

Привет всем!

Вопрос как запустить любую чужую программу как сервис windows?
Человек_Борща вне форума Ответить с цитированием
Старый 17.09.2010, 00:49   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

Неужели никто не загорался идеей такой программы или данным вопросом в целом?

Поясню о чем идет речь=)

Есть такая программа AppToService позволяет запускать любое "обычное" приложение как сервис Windows.

Вопрос: как такое реализовать на delphi?
Человек_Борща вне форума Ответить с цитированием
Старый 17.09.2010, 01:11   #3
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,829
По умолчанию

Вам к Марку из Сисинтерналс или гуглу.
p51x вне форума Ответить с цитированием
Старый 17.09.2010, 07:31   #4
Баламут
Баламучу слегка...
Участник клуба
 
Аватар для Баламут
 
Регистрация: 01.11.2006
Сообщений: 1,585
По умолчанию

Если не принципиально это делать на API, то почитай тут.
Баламут вне форума Ответить с цитированием
Старый 18.09.2010, 14:16   #5
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

Там описано использование строннней утилиты как программы для запуска других программ как сервисов.

Или я чего-то непонял из статьи?
Человек_Борща вне форума Ответить с цитированием
Старый 18.09.2010, 14:52   #6
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

...допилять и обработать напильником, времени на доработку физически нет:
Вложения
Тип файла: txt service.pas.txt (2.4 Кб, 175 просмотров)
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 18.09.2010, 15:01   #7
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

Чего непонятного-то? Пишешь сервис, который вызывает программу.
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума Ответить с цитированием
Старый 18.09.2010, 19:25   #8
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

raxp - спасибо , указал куда нужно думать! =)

GunSmoker - одно дело писать сервис который будет вызывать программы, другое дело писать программу которая будет вызывать другие программы как сервис.
Человек_Борща вне форума Ответить с цитированием
Старый 18.09.2010, 21:21   #9
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

Угу, особенно если учесть, что второе невозможно. Сервисы запускает только SCM.

А вы как думали работает программа, что вы указали? Ровно так и работает: она регистрирует себя как службу и при запуске запускает другую программу. Службу (её) останавливают - она киляет запущенную другую программу.
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума Ответить с цитированием
Старый 08.02.2011, 13:44   #10
tonick2001
Новичок
Джуниор
 
Регистрация: 08.02.2011
Сообщений: 1
По умолчанию

raxp, воспользовался вашим модулем, службу создает, но стартовать данная служба отказывается, не подскажете в чем может быть проблема?
tonick2001 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запуск chm файла из под сервиса JOHNKZ1 Общие вопросы Delphi 9 23.10.2014 20:58
Запуск программы как Shell NiXo Общие вопросы Delphi 3 01.11.2009 17:08
как взять текст из чужой программы. InqSoft WindowScanner не помог. SarahConner Общие вопросы Delphi 2 24.06.2009 22:48
запуск сервиса и CreateProcessWithLogonW sysyman Win Api 8 22.01.2009 23:01
Запуск своего модуля из чужой программы Volkogriz Общие вопросы Delphi 7 16.10.2007 05:19