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



Вернуться   Форум по 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,545
Версия 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.
Ответить с цитированием
  #7  
Старый 30.07.2009, 15:40
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Delphi 7 попробуй - должен работать.
ЗЫ: Привет из Win7
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #8  
Старый 31.07.2009, 12:08
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,545
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от Muxa
Попытался скомпилировать, выдает вот это:

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

P.S. Windows 7, Delphi 2009
Варнинги это просто педупреждения, у тебя один эррор, вот его и надо исправить.
А так это все конечно Delphi 2009 по всей видимости глючит, так как в D7 все ОК.
Ответить с цитированием
  #9  
Старый 01.08.2009, 16:44
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

Пробовал исправить - не получилось( А на Delphi 7 пересаживаться не могу(
Ответить с цитированием
  #10  
Старый 01.08.2009, 17:09
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Это по какой ж причине (из любопытства)?
Тогда отлавливай ошибку... и ещё кучу ошибок на почве PChar, PANSIChar, string, PWideChar, и им подобным... точнее- ошибки из совместимости...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #11  
Старый 01.08.2009, 20:57
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

Не могу пересесть, т.к. за лицензию СG 2009 начальством деньги плачены. С типами ладно - переживем. А на счет 3 ошибки...
Ответить с цитированием
  #12  
Старый 02.08.2009, 19:51
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Так это... покажи строчку, на которой спотыкается... ответим...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #13  
Старый 02.08.2009, 21:22
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 7,868
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Ну компилятор же тебе сказал. у тебя не совпадают типы параметров, которые ты передаешь в какую-то функцию. Внимательно смотри и помни, что по умолчанию String в 2009 - это Unicode (т.е. то, что раньше было WideString).
Ответить с цитированием
  #14  
Старый 02.08.2009, 22:35
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

Imikle спасибо) Исправил - работает.
Ответить с цитированием
  #15  
Старый 04.08.2009, 08:54
Muxa Muxa вне форума
Новичок
 
Регистрация: 01.06.2009
Сообщения: 80
Репутация: 10
По умолчанию

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



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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter   Ссылка на Telegram