我想在程序中实现这样一个功能:
1、在查询页按“增加”按钮,新增记录,
2、跳到资料编辑页,录入资料,保存,
3、回到查询页,指针定位到刚才新增的记录上。
前两个功能我已经实现了,但最后一个,写不出来,望高人指教。注意,是用intraweb控件。另外,怎么实现当页面刷新时,输入框中的光标会重新定位在开始位置上去,我看过bnPYSse写的《IntraWeb学习笔记(四)》,但会提示ComponentName.setFocus中Undeclared identifier: 'setFocus'。
谢谢大家。
1、在查询页按“增加”按钮,新增记录,
2、跳到资料编辑页,录入资料,保存,
3、回到查询页,指针定位到刚才新增的记录上。
前两个功能我已经实现了,但最后一个,写不出来,望高人指教。注意,是用intraweb控件。另外,怎么实现当页面刷新时,输入框中的光标会重新定位在开始位置上去,我看过bnPYSse写的《IntraWeb学习笔记(四)》,但会提示ComponentName.setFocus中Undeclared identifier: 'setFocus'。
谢谢大家。
解决方案 »
- 为什么多线程退出时提示错误类EOSError
- Delphi 的消失!大家去看看!
- 如何将窗体置顶就像消息框一样必须关闭才能进行下一步操作
- a QQ group of english for programming:4569812. welcome to join.
- 有关在右键菜单中加入程序的问题
- 一个关于多表查询的问题,请各位大虾帮忙!!!
- 在线,拜托,一定给分
- 怪怪!DLL中的问题,搞不明白了...
- 小弟刚学delphi,怎样从一个文件夹拷贝文件到另外一个文件夹
- delphi自己的向下兼容性太差拉! 毛病多多...
- [MySQL]如何显示mysql5.0中text类型字段的内容?
- 怎么动态创建事件????????
当回到查询页面时,用select 语句搜索出刚才新增的纪录。
SQuery:=format('select l.*,c.name as name,d.dic as dic from hzlk_logo as l,CUST as c,hzlk_dic as d where l.BelCus=c.CUS_NO and l.BelSen=d.SubType and l.LogoCode=''%s'' order by l.LogoName',[DM._CurFocusLogo]);
with DM do
begin
BetterADODataSet1.Active :=false ;
BetterADODataSet1.CommandText :=SQuery;
BetterADODataSet1.Active := True;
end;第二个问题有谁能帮我解决吗?