Show и Hide COM-Server [Delphi, Windows]
S@shka © (2005-01-11 18:37:00)
Что то никак не могу врубиться....
1. Есть Com-server (мой)
некое оконное приложение выполняющее определенные функции.
2. Есть клиент, в котором по нажатию кнопки (выбора эл-та
меню) должен запускаться этот Com-server.
..................................
Причем мне хотелось бы чтобы после запуска сервера его форма
"имела фокус". А после того как пользователь нажал мимо окна
сервера, то есть активировал окно Клиента (оно занимает весь
экран), сервер закрывался.
Для этого я в клиенте написал в обработчеке кнопки
if (F = nil) then F := CoMyClass.Create;
А также переопределил Application.OnActivate следующим
образом...
if (F <> nil) then F := nil;
Проблема.... проблема в том, что после нескольких запусков
(причем закономерности нет) окно Сервера не получает фокуса и
приходится выполнить на нем клик мышкой. Как от этого
уйти????
VMcL (2005-01-12 14:31:00) [1]
SystemParametersInfo +
SPI_GETFOREGROUNDLOCKTIMEOUT/SPI_SETFOREGROUNDLOCKTIMEOUT
?
Наверх 
ЧАТ |
Орешник |
|
