| 查看: 1017 | 回复: 1 | |||
[交流]
【转帖】Delphi编程中ADOquery控件的用法 已有1人参与
|
|
通过sql的存储过程来实现: 添加 With ADOQuery1 do begin Close; SQL.Clear; SQL.Add(' Insert Into Table1(Field1,Field2)') SQL.Add(' Values(10,20)'); ExecSQL; end; 修改 With ADOQuery1 do begin Close; SQL.Clear; SQL.Add(' Update Table1 Set Field1=20,Field2=30)') ExecSQL; end; 删除 With ADOQuery1 do begin Close; SQL.Clear; SQL.Add(' Delete From Table1') SQL.Add(' Where Field1=20 and Field2=30'); ExecSQL; end; 查询 With ADOQuery1 do begin Close; SQL.Clear; SQL.Add(' Select Field1,Field2 From Table1') SQL.Add(' Where Field1=20 and Field2=30'); Open; end; *************************************************** 通过Delphi自有的方法属性实现: 添加： with ADOQuery1 do append; ...... post; 删除： with ADOQuery1 do delete（选择删除的记录）; //默认删除记录指针指向的记录 修改： with ADOQuery1 do edit; ...... post; adotable1.Append; //添加 ADotable1.Fields.FieldByName('gxid1').Value:=gx; adotable1.Post; adotable1.delete; //删除 adotable1.edit; //修改 ADotable1.Fields.FieldByName('gxid1').Value:=gx; adotable1.post; WITHI adoquery do begin//添加 adoquery.open;//motice set adoquery.sql adoquery.append;//OR adoquery.insert; fieldbyname(fieldname).asstring:=trim(edit1.text); ...... adoquery.post; end; 删除: adoquery.delete 修改: adoquery.edit; fieldbyname(fieldname).asstring:=trim(edit1.text); 有关细节可以参看帮助OR DEMO |
回复此楼» 猜你喜欢
河北省自然科学基金
已经有8人回复
-
云南大学材料与能源学院解琳课题组钙钛矿博士招生
已经有7人回复
-
西安交大新媒学院副院长用撤稿论文结题
已经有5人回复
-
论文撤稿了
已经有5人回复
-
某211大学教师把个人教师官方主页改成:我跑了我跑了我跑了!官宣跑路！
已经有5人回复
-
26/27申博自荐
已经有9人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有3人回复
-
售SCI一区T0P文章，我:8.O.5.5.1.O.5.4,科目齐全,可+急
已经有7人回复
-
揭秘青基评审内幕：几个A才能顺利中标
已经有4人回复
-
青B发送上会通知了吗
已经有7人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- matlab累和编程求问
已经有9人回复
- 铝材的用法：充分发挥材料和设计特点制造产品
已经有4人回复
- 语言证明内容出现两个单词用法小错误这个问题严重吗？
已经有10人回复
- pdquest用法请教
已经有3人回复
- 【求助】如何用DELPHI实现对多种类型文件的管理功能
已经有9人回复
- 求助delphi 编程，在window2003中输入汉字为乱码问题
已经有5人回复
- 人工神经网络编程
已经有12人回复
- 【转帖】用Delphi开发视频聊天软件
已经有8人回复
- 【分享】一个Delphi的源码加密插件
已经有4人回复
2楼2013-10-11 02:13:13
10