本人刚学delphi ,写了一个查询修改程序,用edit组件显示查询结果,
用 update 语句进行修改, 可是修改后数据库中已更新,
当按向下后再向上回来时显示界面edit中的值还是未修改的只有退出再进入才显示更新的值sqlstr='update ...'
query.sql.clear
query.sql.add(sqlstr)
query.sql.prepare
query.sql.execsql
请问怎么解决????
用 update 语句进行修改, 可是修改后数据库中已更新,
当按向下后再向上回来时显示界面edit中的值还是未修改的只有退出再进入才显示更新的值sqlstr='update ...'
query.sql.clear
query.sql.add(sqlstr)
query.sql.prepare
query.sql.execsql
请问怎么解决????
解决方案 »
- CoIntialize(nil);CoUnitialize;该引用什么啊
- 急!急!急!急!interface not supported
- Delphi中如何在程序中访问(打开)一个DLL中的窗体(TForm)?将窗体封装在DLL中时需要注意什么?
- 服务器端 响应几十万的学生下载课件和教材 该如何设计,采用什么技术?
- 如何把查询的某项按照拼音排序??
- 上次根据网友提供的代码,写了一个dll串口通讯的例子,但我一直调试通不过,能帮忙解决吗?有源码!!!!
- 我想通过一个变量(组件名),实现对组件属性的设置,可以吗?
- 如何使用多分辨率文理贴图提高游戏速度?
- 刚接手一个项目,是通过串口接单片机通讯方面的.有点问题想和大家切磋一下!!!!
- 求助:在表格里每用鼠标点一次就出现一个矩形框,如何实现?
- Panel+背景图片
- 图像拷贝。
要更新后立即显示!
肯定得重新执行你的查询语句!调用你的执行查询的事件!
如果你用一按钮执行查询是,则调用此按钮的onClick事件!例:procedure TForm1.Button1Click(Sender: TObject); //查询
begin
sqlstr='select ...'
query.sql.clear;
query.sql.add(sqlstr);
query.sql.open;
......
end;
procedure TForm1.Button2Click(Sender: TObject); 更新
begin
sqlstr='update ...';
query.sql.clear;
query.sql.add(sqlstr);
query.sql.prepare;
query.sql.execsql;
button1.OnClick(nil); //调用
end;
我用别的语言好像没有这么复杂,难道delphi 语言不好使,功能不强???
(我不想用 dbedit,难道用edit 组件不行吗 ?)
query1.open;
刷新后.
当然刷新后指针会移动到第一条记录.
如果你想指到当前记录.你只能在刷新前保存那条记录号.刷新后指定那个记录就行了.
你拿什么来更新EDIT里面的东西啊。这么个单独我控件。。
你不通过语句EDIT里的值怎么可能变。!!。难道我理解不对吗?..
edit1.text := query1.fieldbyname('字段').assting;不知道你是否用了dbgrid控件。所以不好写。。