Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> обмен данными служба-приложение, как сделать 
:(
    Опции темы
Teran
  Дата 26.11.2006, 00:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
как можно организовать обмен данными из сервиса  в приложение
в сервисе почемуто не отрабатывает (как будто служба не видит приложения): 
Код

    MyProgramHwnd =  FindWindow("Ttest", "Test");
    SetForegroundWindow(MyProgramHwnd);
    MyProgramHwnd1 =  FindWindowEx(MyProgramHwnd, 0, "TEdit", NULL);
        SendMessage(MyProgramHwnd1, WM_SETTEXT, 0,(WPARAM)"1111111111111111111");

как это можно поправить?


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
Sunvas
Дата 26.11.2006, 00:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Тут вообще-то Delphi а не С++!!


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
Teran
Дата 26.11.2006, 01:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
Цитата(Sunvas @  26.11.2006,  00:44 Найти цитируемый пост)
Тут вообще-то Delphi а не С++

язык роли не играет


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
dumb
Дата 26.11.2006, 02:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


sceloglauxalbifacies
****


Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: 13
Всего: 158
Teran, ключенвое слово: SERVICE_INTERACTIVE_PROCESS
PM MAIL   Вверх
Teran
Дата 26.11.2006, 13:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
Цитата(dumb @  26.11.2006,  02:58 Найти цитируемый пост)
ключенвое слово: SERVICE_INTERACTIVE_PROCESS

я так понял что просто при создании сервиса нужно еще добавить SERVICE_INTERACTIVE_PROCESS и все будет нормально?
Код

CreateService(
    mgr,
    SServiceName,
    DServiceName,
    SERVICE_ALL_ACCESS,
    SERVICE_WIN32_OWN_PROCESS or SERVICE_INTERACTIVE_PROCESS,
    SERVICE_DEMAND_START,
    SERVICE_ERROR_NORMAL,
    pchar(Application.ExeName),
    nil,nil,nil,nil,nil
   );

 smile 


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
Teran
Дата 26.11.2006, 15:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
а как получить хендл севиса чтоб ему отправлять SendMessage?
если у него вообще он есть
 smile 


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
Sunvas
Дата 26.11.2006, 16:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(Teran @  26.11.2006,  15:53 Найти цитируемый пост)
а как получить хендл севиса чтоб ему отправлять SendMessage?
если у него вообще он есть
  

Так у сервисов же нет хендлов!
Хендлы есть только у окон - им и можно посылать сообщения SendMessage-ом.


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
Teran
Дата 26.11.2006, 17:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3
Цитата(Sunvas @  26.11.2006,  16:44 Найти цитируемый пост)
Так у сервисов же нет хендлов!

значит с сервисом общатся из программы нельзя?


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
dumb
Дата 26.11.2006, 18:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


sceloglauxalbifacies
****


Профиль
Группа: Экс. модератор
Сообщений: 2929
Регистрация: 16.6.2006

Репутация: 13
Всего: 158
создай невидимое окно в сервисе, раз уж он у тебя SERVICE_INTERACTIVE_PROCESS.

Добавлено @ 18:57 
ps. и поизучай тему IPC: сообщения - не единственный способ взаимодействия...
PM MAIL   Вверх
Sunvas
Дата 26.11.2006, 20:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(Teran @  26.11.2006,  17:16 Найти цитируемый пост)
значит с сервисом общатся из программы нельзя?

Можно, но с окнами этого приложения!


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
Akella
Дата 27.11.2006, 12:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329
Teran, а может лучше "общаться" через TCP/IP??
PM MAIL   Вверх
Sunvas
Дата 27.11.2006, 14:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(Akella @  27.11.2006,  12:14 Найти цитируемый пост)
Teran, а может лучше "общаться" через TCP/IP??

Тогда неисключено, то файервол будет рубить соединение (по просьбе пользователя конечно) и ничего не выйдет.


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
Akella
Дата 28.11.2006, 13:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329
зато прелесть в том, что можно "общаться" с любого компьютера в сети.

Добавлено @ 13:56 
Обратите внимание на Wingate, Kerio, Acronis, например...
PM MAIL   Вверх
Sunvas
Дата 28.11.2006, 17:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Соль и сахар
****


Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: 28
Всего: 89
Цитата(Akella @  28.11.2006,  13:55 Найти цитируемый пост)
зато прелесть в том, что можно "общаться" с любого компьютера в сети.

А автору надо по сети общаться?
Цитата(Akella @  28.11.2006,  13:55 Найти цитируемый пост)
Обратите внимание на Wingate, Kerio, Acronis, например...

А что в них (особенно в Акронисе)?


--------------------
Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0601 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.