S
searoom
Unregistered / Unconfirmed
GUEST, unregistred user!
用 Dll 做 MDI 子窗口有不少问题,其中 Tab 和 Enter 的问题我已经解决了
但是,不知道怎么在程序里面向子窗口发送快捷键的触发消息。
以下是我处理 Tab 和 Enter 键的方法:在 OnApplicationMessage 中添加代码
if Msg.message=WM_KEYDOWN then
begin
vk := Msg.wParam;
vd := Msg.lParam;
if vk in [VK_TAB,VK_RETURN] then
begin
frm := Screen.ActiveForm;
if frm<>Application.MainForm then
begin
if isDllFrm(longint(frm)) then
begin
frm.Perform(CM_DIALOGKEY,vk,vd);
if vk in [VK_TAB] then
Handled := true;
end;
end;
end;
end
哪位高人兄弟能否帮忙想想办法也能够解决快捷键的问题
但是,不知道怎么在程序里面向子窗口发送快捷键的触发消息。
以下是我处理 Tab 和 Enter 键的方法:在 OnApplicationMessage 中添加代码
if Msg.message=WM_KEYDOWN then
begin
vk := Msg.wParam;
vd := Msg.lParam;
if vk in [VK_TAB,VK_RETURN] then
begin
frm := Screen.ActiveForm;
if frm<>Application.MainForm then
begin
if isDllFrm(longint(frm)) then
begin
frm.Perform(CM_DIALOGKEY,vk,vd);
if vk in [VK_TAB] then
Handled := true;
end;
end;
end;
end
哪位高人兄弟能否帮忙想想办法也能够解决快捷键的问题