вопрос sendmessage

← →
Alexxxx (2008-12-22 11:30) [0]

Подскажите после вызова sendmessage меняется фокус на окно которому передается сообщение, так и должно быть? если нет, то как это поправить

← →
Медвежонок Пятачок © (2008-12-22 11:31) [1]

в общем случае не должно

← →
Сергей М. © (2008-12-22 11:32) [2]

Какое сообщение посылаешь ?

← →
Медвежонок Пятачок © (2008-12-22 11:33) [3]

можно любое послать, а в обработчике сделать сетфокус. и будет такой побочный эффект от сендмессаджа

← →
mops (2008-12-22 11:36) [4]

SendMessage(h, Msg, wParam, Lparam);

← →
mops (2008-12-22 11:37) [5]

H:=FindWindow("TForm",nil); if h=0 then begin result:=false; exit; end; iResult:=SendMessage(h, Msg, wParam, Lparam); result:=true;

так точнее

← →
Сергей М. © (2008-12-22 11:38) [6]

> mops

А ты-то откуда знаешь, что Alexxxx посылает Msg на h ?)

← →
mops (2008-12-22 11:42) [7]

а это я и был, просто ник скопировался из оперы другой )

← →
Сергей М. © (2008-12-22 11:43) [8]

Ну так какое же Msg ты посылаешь на х ?

← →
mops (2008-12-22 11:43) [9]

в общем, я вот так делаю и фокус почему то меняется

← →
{RASkov} © (2008-12-22 11:45) [10]

> Msg

Что это за сообщение?)

← →
mops (2008-12-22 11:47) [11]

WMMYMESS=WM_USER+1;

отсылаю WMMYMESS, число

> отсылаю ..число

Понятно что не телеграмму)

А форма твоя как обрабатывает это сообщение ?

← →
mops (2008-12-22 11:55) [13]

вызывается функция

procedure setTask(var msg: TMessage);
begin
try
SettingTasks.Refresh;
Tasks.Refresh;
QueryVisTask.Refresh;
msg.Result:=1;
except
msg.Result:=0;
end
end;

Ну так закомментарь вызов этой функции, чтобы убедиться в том, что чудеса с фокусом происходят именно в ней..

> Медвежонок Пятачок © (22.12.08 11:33) [3]

> можно любое послать, а в обработчике сделать сетфокус. и
> будет такой побочный эффект от сендмессаджа

Такие фокусы в XP не должны проходить,
если, конечно, не поколдовать с настройками.

--
Regards, LVT.

вопрос sendmessage Найти похожие ветки