在我的表单中,为了使录入节省时间,不用来回用鼠标,我想一打回车键,光标显示在DBedit上。这个问题怎么解决呀?谢谢!
解决方案 »
- 为什么 findwindow(nil,'美容院管理系统') 总是不等于0呢?代码如下
- installshield X Express 补丁打包的问题
- outlook收邮件进度条窗口中listview是什么控件!
- 如何在ListView中触发一事件,动态添加一列TListColumn,急在线等!!
- ADOQuery的事务操作!!!HELLP!HELP!HELP!
- 请问如何将Delphi的资源转换成VC的资源,部分转换也行,十分感谢。
- 关于Bezier曲线转换成dxf格式
- 在panel中显示其它的窗体有一个关闭按钮怎么去掉呢?
- 棘手的问题
- 请教-关于在缓存更新情况下不能正确更新主从表的问题
- 存储过程语法:如何将记录各个字段的值赋给变量?
- 求ftp源代码
if key=13 then
DBedit.setfocus;
怎么回事呀?麻烦你快告诉我吧!我的程序如下:
procedure Tptsfdj.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=#13 then
DBedit11.setfocus;end;end.
Shift: TShiftState);
begin
if key=#13 then
DBedit11.setfocus;end;
用keypress.
procedure Tptsfdj.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
button1.Click();
DBedit11.setfocus;end;
DBeditl1.setfocus;
button1.click();
怎么没有好心的人告诉我呀?
加入if key=#13 then Button1.Click;然后在Button1.Click里加入 DBedit11.setfocus;(我想直接加在button1的onKeyPress里应该也没问题的)button2的onKeyPress
加入if key=#13 then Button2.Click;
DBedit11里处理onkeydown事件
xx.Click