一、在最后一个Tdbedit中判断如果ord(key)=vk_tab则增加记录,将焦点移到要移的记录上去。如:
if ord(key)=vk_tab then
begin
key:=chr(0);
table1.append
dbedit1.setfocus;
end;
二、在keypress事件中屏ESC,Enter键 ,
如ord(key)=13 //回车
then key:=chr(0);
三、case ord(key) of
vk_down:;
vk_up:;
vk_left:;
vf_right:;
end;
说明:所有的键定义如vk_down在Windows单元中,可以将他打开查看
if ord(key)=vk_tab then
begin
key:=chr(0);
table1.append
dbedit1.setfocus;
end;
二、在keypress事件中屏ESC,Enter键 ,
如ord(key)=13 //回车
then key:=chr(0);
三、case ord(key) of
vk_down:;
vk_up:;
vk_left:;
vf_right:;
end;
说明:所有的键定义如vk_down在Windows单元中,可以将他打开查看
解决方案 »
- 求救,InstallShield下调用osql将数据库删除不干净!!
- 【急代解决 - 如何读取并显示数据库中 htm 形式的数据,显示也为htm 形式】
- 用过imageEn的朋友邦我看看是怎么回事
- DBGrid能不能实现这个?(刚发的问错意思了,已经散分了)
- 特定排序问题 接分贴
- TADOconnection需不需要TSession建立多线程?
- DBGrid在新增资料时为什么只能够显示一笔记录?
- 为何DataSource丢失?
- 如何设置DBGrid的ScrollBar状 态????
- 千两狂死狼,砍一回恃魂如何?
- ActiveForm的发布问题:在浏览器端按提示下载后仍不可见?
- 如何将 Hook 的消息去除?
对于问题一、需要加一个判断datasourse.state是edit,还是insert状态的判断,就可以区别当前是编辑还是插入状态,然后具体编程即可!
另:sunrised請各位delphi好手出手相助!!!!!!!!!