Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.22;
Скачать: CL | DM;

Вниз

IBSever запуск и закрытие?   Найти похожие ветки 

 
Sour ©   (2002-06-19 07:03) [0]

Господа, помогите, пожалуйста.
Для работы программы необходим запущенный IBServer (ibserver.exe).
OnCreate главной формы пишу:
IBInst := ShellExecute(0, 0, PChar(Path + "ibserver.exe"), "-a", 0, SW_HIDE);

Первый вопрос: почему в трее появляется иконка, я же написал SW_HIDE?
Второй вопоос: как на завершение работы приложеня закрыть IBServer?
Пишу SendMessage(IBInst, SW_QUIT, 0, 0) и сервер не закрывается?
Писал и SW_CLOSE и SW_DESTROY не помогает?

З.Ы. IBInst: THandle - описан глобально?


 
Raptor ©   (2002-06-19 14:58) [1]

Первый вопрос: почему в трее появляется иконка, я же написал SW_HIDE?

А почему, собственно, она там не должна появляться. То что ты задал SW_HIDE означает только, что окно приложения не появится (и то не всегда) на экране. Иконку в трей запихивает твой IBServer и на нее никакой SW_HIDE не действует. Здесь имеются 2 решения этого вопроса.
1) Попросить твой IBServer не показывать иконку в трее. То есть указать это в настройках (если такая возможность предусмотрена).
2) Самому убирать иконку из трея после запуска IBServer.
Второй способ наиболее универсальный. Только сначала надо найти ID иконки, который ей присваивает IBServer при помещении ее в трей (этот ID не меняется от запуска к запуску приложения), а потом с помощью Shell_NotifyIcon() убирать иконку сразу же после запуска.

Второй вопоос: как на завершение работы приложеня закрыть IBServer?
Пишу SendMessage(IBInst, SW_QUIT, 0, 0) и сервер не закрывается?
Писал и SW_CLOSE и SW_DESTROY не помогает?


Опять же почему это он должен закрываться? ж-))
Если ты прочитаешь ВНИМАТЕЛЬНО хелп или MSDN, то сразу увидишь, что результатом работы функции

ShellExecute() является HINSTANCE, а не HWND, который требуется для твоего SendMessage.
Тебе сначала нужно найти хендл главного окна с помощью функции FindWindow(<класс окна>,<загаоловок окна>)

(класс и заголовок требуемого окна можна подсмотреть с помощью WinSight32, который идет в стандартной

поставке Delphi), а потом подставить его вместо первого параметра функции SendMessage() (лучше используй

PostMessage).



Страницы: 1 вся ветка

Текущий архив: 2002.08.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
1-71072
VELK
2002-08-09 09:01
2002.08.22
Помогите !!!! Программа написана на Delphi 4 и её не возможно


14-71372
RV
2002-07-25 09:39
2002.08.22
Игра Пятнашки. Хелп ми


4-71439
serd_hhc
2002-06-15 08:45
2002.08.22
Wininet и закачка файлов.


3-70970
NDR
2002-08-02 13:56
2002.08.22
ОТМЕНА последнего действия !


1-71172
Nazareth
2002-08-12 10:15
2002.08.22
DBChart, как он меня достал!!!