проблема следующего содержания: есть CustomControl, он появляется POPUp (типа лист в комбобоксе), так вот нужно скрывать это окошко если узер вдруг вздумает подвинуть форму. Ловить событие ACTIVATE не представляется возможным, потому, что фокус остается на родительской форме, и на контрол он попадать и не должен. Примерно понятно, что контрол должен стать модальным, но как CustomControl показать модально - ума неприложу...
Подскажите плиз, может кто знает как это сделать, буду очень признателен

вобчем-то все аказалось несложно, жаль тока никто не смог помочь...
Ну если у кого нить возникнет вопрос, то - спроси меня как.

Ну запостите код...

Ну, все по порядку:
для начала как сделать, чтоб CustomControl стал popup, нужно переопределить метод CreateParam

Цитата

procedure TComboList.CreateParams(var Params: TCreateParams); begin   inherited;   Params.Style := Params.Style xor WS_CHILD;   Params.Style := Params.Style or WS_POPUP; end;

тем самым убираем из стиля создания Child и ставим Popup
после этого значения Top и Left нужно задавать уже в Screen координатах
потом, если нам надо чтобы наш контрол показывался модально, т.е. как popup менюшка
нужно создать специальный метод, который нужно использовать вместо MyControl.Visible := True;
итак:

Цитата

procedure MyControl.ShowModal; begin   Visible := True;   try     repeat       SendMessage(Application.Handle, WM_ENTERIDLE,MSGF_MENU , Handle);           {Это мы посылаем нашему приложению сообщния, что оно сейчас простаивает,           в принципе эта строчка необязательна}     Application.HandleMessage;           {Здесь мы говорим приложению, стоять и не обрабатывать новые сообщения}       if (GetCapture<>Handle) then SetCapture(Handle);           {Здесь мы говорим системе, что именно наш контрол должен получать сообщения           от мышы, а не какой-то другой}     until not Visible;     {пока наш контрол видим цикл повторяется}   finally     ReleaseCapture;     {возвращаем все на свои места}   end; end;

в этом цикле можно проверять любой параметр, необязательно видимость, главное, иметь возможность сменить его когда контрол должен пропасть с экрана

дальше остается только сделать чтото типа Visible := False; в обработчике сообщения WM_LMBUTTONDOWN
что интересно - в этом способе ненужно передавать фокус в наш компанент, так, что оснавная форма не не теряет активности (как сделать, чтоб фокус не передавался после клика по котролу мышью, надеюсь сами догадаетесь). и все, элементарно и действенно, правда это всего лишь основа, под свой конкретный случай скорее всего нужно будет сделать еще кое что...

Спасибо.