用TQuery
qrTemp.SQL.Clear;
qrTemp.SQL.Add('update databasename');
qrTemp.SQL.Add('Set XXX='+''''+'AAA'+'''');
qrTemp.SQL.Add('where XXX='+''''+'BBB'+'''');
qrTemp.ExecSQL;
qrTemp.SQL.Clear;
qrTemp.SQL.Add('update databasename');
qrTemp.SQL.Add('Set XXX='+''''+'AAA'+'''');
qrTemp.SQL.Add('where XXX='+''''+'BBB'+'''');
qrTemp.ExecSQL;
解决方案 »
- 如何打开delphi编写的软件查看源代码
- 寻求可以分组的类似TListView的控件
- 多次查询的怎么邦定到一个DBGird里面去的啊??
- 郁闷中!
- 感觉有些奇怪,不知怎么做,烦请大家,
- XPSP2 是不是不能装DELPHI7 啊 为什么 没办法编怿 急啊 DELPHI 没办法用怎么生活
- ★★★哪位大哥可用分多的用不了,能否给小弟捐献一些,实在不行我用钱买!!!★★★
- Delphi的一个小问题,算不算Bug呢?各路英雄看过来》》》我的最后100分送给大家了。
- 请教如何用delphi实现web服务
- Delphi问题:在客户机上如何得到当前NT服务器名?
- 本人已将图形填充源代码上传,欢迎下载。另有一问题,请大家支个招,谢谢!!!!
- 问一个关于clientdataset的菜鸟问题
while not table.eof do
begin
if trim(table.Fieldvalues['XXX'])='AAA' then
begin
table.edit;
table.FieldValue['XXX']:='BBB';
table.post;
end;
table.next;
end;
用TQuery
qrTemp.SQL.Clear;
qrTemp.SQL.Add('update databasename');
qrTemp.SQL.Add('Set XXX='+''''+'BBB'+'''');
qrTemp.SQL.Add('where XXX='+''''+'AAA'+'''');
qrTemp.ExecSQL;