同题目
解决方案 »
- 查询后 要对表中的某一列进行相加求和 怎么编写
- 高分求一代码优化,高手请进!
- 求十进制转换成为十六进制的方法
- 欢迎加入中国Delphi大联盟QQ群-(做最好的讨论,求助,资源共享 QQ群 号码:1463857)
- 给位大虾看看我的代码是那里出了错!一个奇怪的问题,谢谢各位了!
- 利用Delphi对IE控制的问题.....有源码..
- 在Delphi中如何把做好的软件发布?
- 谁有DBTreeView控件?收到马上送50分!
- 关于F1book如何分页的问题
- mts环境,怎么在客户端注册(分配)midas.dll?
- delphi中连接sql2000数据库的方法,是否有专用接口,ado还是bde
- 高手请进!控件错位问题?在线等!
mainMenu1.isshortcut(msg);就可以了。
//定义toolbutton1的快捷键为ctrl+c
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key=67) and ([ssctrl]=shift) then
begin
form1.ToolButton1.Click;
end;
end;