我定义了一个系统热键,想在热键被按下时使我的程序出现,以下是我的做法,不知道错在那里了! private
procedure hotkey(var msg:tmessage);message wm_hotkey;
......
procedure TForm1.FormCreate(Sender: TObject);
begin
registerhotkey(handle,hotkeyid,MOD_control,$41);
end;
procedure hotkey(var msg:tmessage);
begin
if (msg.LParamHi=$41) and (msg.lparamLo=mod_control) then
showmessage('sdfsdf');//这个可以出现
showwindow(handle,‘最大化的那个语句,我望了’);//这个却不对!为什么呀?
end;
......
我没分了!
procedure hotkey(var msg:tmessage);message wm_hotkey;
......
procedure TForm1.FormCreate(Sender: TObject);
begin
registerhotkey(handle,hotkeyid,MOD_control,$41);
end;
procedure hotkey(var msg:tmessage);
begin
if (msg.LParamHi=$41) and (msg.lparamLo=mod_control) then
showmessage('sdfsdf');//这个可以出现
showwindow(handle,‘最大化的那个语句,我望了’);//这个却不对!为什么呀?
end;
......
我没分了!
解决方案 »
- delphi中用DBChart绘图
- DevExpress QuantumGrid 的问题,有没有 DBGridEh 中位列 的 Picklist 和 keyList 的功能,cxgrid 只有 items ,没有 keyitems
- 放狼烟招呼高手:关于jpg与bmp转型时,分辨率改变的问题
- 状态显示问题
- HELP:怎样判断字符串里含有中文字符?
- 送分____一个简单SQL问题;
- 放出GUI程序读取控制台程序输出的源码,有人要吗?
- Delphi5.0下生成的bpl文件可否安装在Delphi6.0下?
- delphi 中有这样的写法吗
- sqlserver 导入excel '01 变为 1 如何解决?
- 树的单元怎样做才有效呢?
- 如何在程序中删除程序所调用的数据库?
-->
showwindow(handle,SW_NORMAL);//SW_MAXIMIZED
(SW_SHOWMAXIMIZED;SW_SHOWMINIMIZED;SW_SHOWMININOACTIVATE;)都不能显示
setwinodwpos();