那就换两个问题吧:如何按键盘上ESC的时候触发form.onclosequery的事件?在此事件我写了个是否退出的代码;如何在光标移在dbcombobox中时,按键盘上那个向下(小键盘里)的箭头就会自动下拉出picklist,并可用箭头选择,回车确定?
解决方案 »
- dbgrid 父子表 一个删除按钮
- 怎样不换页打印.
- 金税数据库的加密问题
- 公布一个秘籍,关于这方面有分的别忘记了让我拿哟。
- 请问,哪有免费主页空间申请?
- 关于Fastreport的打印问题!!高手帮忙呀!!!!!!!!!
- 我想在dbgrid中把某一bool字段全部显示为复选框,象ACCESS中一样,不用控件,怎么实现?
- 在Delphi里关于播放realplayer的问题?
- 这种功能的实现需要另外开一个线程吗?具体应该怎样做?
- 急救!急救!!!我都要成伍子胥过关了!高手们,请详细讲讲query与updatesql一起用的方法。我看过帮助也找过文档,更曾经实现过,但现在全完完了,就一“updatesql fail!”愿出60分,苦盼高手指点”
- 如何操纵RichTextEdit控件???
- 谁知道怎样使系统延迟,注意,要整个系统延迟,不是sleep!
在FORM的ONKEYDOWN事件中加代码
IF BYTE(KEY)=27 THEN CLOSE;
在FORM的onclosequery的事件中加代码
If Application.MessageBox('是否要关闭程序?','提示',MB_YesNo + MB_ICONQUESTION) <> IDYES Then
CanClose := False;
将TBitBtn的Default属性设成True,你在Form上按回车就相当于按它(除了焦点在其它按钮上)。同样,Cancel属性设成True时,按Esc相当于按它。如果你一定要用TSpeedButton,还有个办法:将它与某个TAction对象连起来,把Action对象的ShortCut设成需要的热键(如Enter或Esc),也能达到效果。