一个局域网内监控程序,有点问题,请大家帮忙看看! 我想做成使程序运行时不显示在任务栏,也不显示在系统托盘里,当用户按下Ctrl+K组合键后显示,但是我组知道怎么做,请教各位了!比如说金山词霸,按下Ctrl+O(自定义的热键)后,立即出现在最前面,这是怎么实现的? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我想做成使程序运行时不显示在任务栏,也不显示在系统托盘里,当用户按下Ctrl+K组合键后显示,但是我组知道怎么做,请教各位了!比如说金山词霸,按下Ctrl+O(自定义的热键)后,立即出现在最前面,这是怎么实现的? 加速数据库的搜索过程想增加数据库的检索速度吗?在进行数据检索之前,调用数据表的DisableControls方法,将DataSet和 DataSource组件的联系断开,当检索结束时,调用数据表的EnableControls方法,重新在DataSet和 DataSource组件之间建立联系,这样就可以节省更新数据控制的时间,从而加速检索的速度。下面是一个实例:unit Unit1;..typeTForm1 = class(TForm)DataSource1: TDataSource;Table1: TTable;Button1: TButton;..procedure TForm1.Button1Click(Sender: TObject);varSeekValue: string;beginTable1.DisableControls;Table1.FindKey([SeekValue]);Table1.EnableControls;end;end.G 增强数据表的处理能力对使用数据表的应用程序,怎样在减少代码维护的同时增加程序的性能?使用Delphi的数据模块就可以做到这一点。方法如下:1 在程序计划中添加一个数据模块(Data Module);2 将数据表存取组件放到数据模块窗体上:为应用程序使用的每个数据表都添加一个TTable和TDataSource组件到数据模块窗体上,并正确设置它们的DatabaseName、TableName和DataSet属性。 3 在使用数据表的每个窗体上加入对数据模块单元的应用,这样就可以在这些窗体上使用数据控制组件了,将这些组件的DataSource设置为数据模块的合适的TDataSource组件。使用数据模块窗体将所有数据表都集中起来后,有以下三个优点:第一,免去了向每个窗体均添加数据表存取组件;第二,如果同一数据字段在不同的窗体中使用并修改,这样的修改在不同的窗体间是共享的,而且不需要增加任何代码;第三,由于程序减少了在不同窗体上校验同一数据表的代码,所以程序的性能达到一定的改善。D 隐藏/显示Windows 95的任务栏想不想让你编写的Delphi程序具有隐藏/显示Windows 95任务栏的功能,在程序中使用下面的两个过程就可以实现这一功能。procedure hideTaskbar;var wndHandle : THandle;wndClass : array[0..50] of Char;beginStrPCopy(@wndClass[0], 'Shell_TrayWnd');wndHandle := FindWindow(@wndClass[0], nil);// 隐藏任务栏ShowWindow(wndHandle, SW_HIDE); end;procedure showTaskbar;var wndHandle : THandle;wndClass : array[0..50] of Char;beginStrPCopy(@wndClass[0], 'Shell_TrayWnd');wndHandle := FindWindow(@wndClass[0], nil);// 显示任务栏ShowWindow(wndHandle, SW_RESTORE); end; 隐藏应用程序假如你不仅想让应用程序隐藏窗体,同时不想让应用程序在任务栏上显示,可以使用如下命令:ShowWindow (Application.handle, SW_HIDE);这条命令对使用托盘区(System Tray)图标来激活的应用程序十分有用。处理自己的热键应用程序可以使用许多Windows默认的热键。但是,有时需要向窗体添加自己的热键。当用户键入他们时,怎样捕获它们呢?为了解决这个问题,首先应将窗体的KeyPreview属性设置为True,然后在窗体的OnKeyDown事件处理程序中添加如下代码:if (ssCtrl in Shift) and (chr(Key) in ['A', 'a']) then ShowMessage('Ctrl-A');OnKeyDown事件处理程序将捕获击键,并执行指定的代码。 to dzogchen(雪茹):谢谢啦!过几天给加分!:) 播放语音 在“Service Application”中不行? 子类化 P2P打洞的Session可以否1对多个远程NAT的IP? 请教串口短信收发程序的一个问题 急, 导出DBGrid到Word !!! 简单问题 二进制运算 要求中国队马上回家的兄弟,请举手 我想学习Delphi,大家帮忙推荐一本好书! 急急!!阿水 求位大虾帮忙 数据库问题 初学者的问题,大家帮我看看这个存储过程有什么不对 请教一个函数,刚学没办法。
比如说金山词霸,按下Ctrl+O(自定义的热键)后,立即出现在最前面,这是怎么实现的?
D 隐藏/显示Windows 95的任务栏想不想让你编写的Delphi程序具有隐藏/显示Windows 95任务栏的功能,在程序中使用下面的两个过程就可以实现这一功能。procedure hideTaskbar;var wndHandle : THandle;wndClass : array[0..50] of Char;beginStrPCopy(@wndClass[0], 'Shell_TrayWnd');wndHandle := FindWindow(@wndClass[0], nil);// 隐藏任务栏ShowWindow(wndHandle, SW_HIDE); end;procedure showTaskbar;var wndHandle : THandle;wndClass : array[0..50] of Char;beginStrPCopy(@wndClass[0], 'Shell_TrayWnd');wndHandle := FindWindow(@wndClass[0], nil);// 显示任务栏ShowWindow(wndHandle, SW_RESTORE); end; 隐藏应用程序假如你不仅想让应用程序隐藏窗体,同时不想让应用程序在任务栏上显示,可以使用如下命令:ShowWindow (Application.handle, SW_HIDE);这条命令对使用托盘区(System Tray)图标来激活的应用程序十分有用。处理自己的热键应用程序可以使用许多Windows默认的热键。但是,有时需要向窗体添加自己的热键。当用户键入他们时,怎样捕获它们呢?为了解决这个问题,首先应将窗体的KeyPreview属性设置为True,然后在窗体的OnKeyDown事件处理程序中添加如下代码:if (ssCtrl in Shift) and (chr(Key) in ['A', 'a']) then ShowMessage('Ctrl-A');OnKeyDown事件处理程序将捕获击键,并执行指定的代码。