窗口中有一个ADOQuery,SQL如下:Select a.Warehouse,b.Descript,Sum(a.Qty) as qty,Sum(a.Qty) as ReQty
From trans a Join Warehouse b on a.Warehouse = b.Code
Where a.TxnDate Between :BeginDate And :EndDate And
Group by a.WareHouse,b.Descript刷出数据后,想在DBGrid中ReQty一栏写入数量,但是行一变动后,此列值又恢复原值,如何解决此问题啊?我的原意是想在一个DBGrid中,用户手修改ReQty的值,最后用以比较ReQty和Qty两栏的值,不一致的写入到另一张数据表中。
From trans a Join Warehouse b on a.Warehouse = b.Code
Where a.TxnDate Between :BeginDate And :EndDate And
Group by a.WareHouse,b.Descript刷出数据后,想在DBGrid中ReQty一栏写入数量,但是行一变动后,此列值又恢复原值,如何解决此问题啊?我的原意是想在一个DBGrid中,用户手修改ReQty的值,最后用以比较ReQty和Qty两栏的值,不一致的写入到另一张数据表中。
解决方案 »
- 在delphi中怎样测试网络是否通畅
- 以前一直用delphi,现在这间公司用.net,而且还是做所谓的winform程序,十分不爽,郁闷...
- 任命windindance为开发语言大版主
- 有“全向MODEM”(QXCOMM)说明书的朋友:请问该MODEM在设置语音模式前有没有什么“MODEM初始化命令”?
- ado查询对于2000和2008不同的表现
- RichEdit中如何获取打开文件的字体和颜色?
- *********DLL问题************
- bitmap压缩问题。
- 800分求有關印刷排版算法的資料.(入者有分)
- 誰有将Delphi转换成C或JScript的工具?
- 如何修改、添加、删除字段?????
- 放分100。(告别delphi论坛)2003-6-19晚结 ,(我所有帖子都会结完。值得大家学校哟)
AdoQuery1.Sql.Text := sqlstring;
AdoQuery1.Open ;
AdoQuery1.FieldByName('ReQty').ReadOnly := False;
ClientDataSet1.Open;
ClientDataSet1.FieldByName('ReQty').ReadOnly := False ;
只要不Update,不会报错。