adodataset 新增问题

xikboy 2007-09-08 01:16:18

ads_lr.Open;
ads_lr.Append;
loadzd;
rzdbcombobox1.ItemIndex :=0;
rzdbcombobox2.ItemIndex :=0;
rzdbcombobox3.ItemIndex :=0;
RzdbDateTimeEdit1.date :=now();
ads_lr.Post;
ads_lr.Close;
ads_lr.Active :=true;
application.MessageBox('增加成功！','中文提示',64);

我给上面四个字段附值了，可实际保存时只有那个时间有，其它三个都是空的，
点新增的时候，它们是有值的？？

...全文

58 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

骑牛上铂金 2007-09-09

打赏
举报

回复

与数据库的字段关联了吗！

xikboy 2007-09-08

打赏
举报

回复

没人？

Delphi 如何判断ADO的状态，通过新增和修改内容，可查看ADO的状态。相关代码如下：　　procedure TFrmOrderBy.BtnCloseClick(Sender: TObject); 　　begin 　　 Close; 　　end; 　　procedure TFrmOrderBy.BtnOrderClick(Sender: TObject); 　　begin 　　 if ADODataSet1.State = dsInsert then 　　 ShowMessage('新增状态'); 　　 if ADODataSet1.State = dsEdit then 　　 ShowMessage('修改状态'); 　　 if ADODataSet1.State = dsBrowse then 　　 ShowMessage('浏览状态'); 　　end;

看过好多主从数据表更新保存的操作，都不能解决我遇到的问题，问题是这样的：
主从表结构，设置两个表的
CursorType: ctKeyset，
CursorLocation: clUseClient，
LockType: ltBatchOptimistic
然后用MasterField关联起来两表，在新增一个单据时，主表输入数据，从表输入数据，
当保存时，原来我的保存是这样的：
if not DM.ADOConnectio

procedure TForm1.DBGridEh1CellMouseClick(Grid: TCustomGridEh; Cell: TGridCoord; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin if cell.Y = (self.ADODataSet1.Recordset.RecordCount+1...

delphi AOD insert（新增行后，行位置保持不变） procedure TForm.ADOQueryDataAfterOpen(DataSet: TDataSet); begin inherited; //添加排序规则即可实现，insert 新增后，行的位置不变 DataSet.Sort:=‘barcodeSeq , companyNo, a.createdDateTime, typeNo’; end; ...

在C++Builder 5中使用ADO数据库编程 (转)[@more@]在C++Builder 5中使用ADO数据库编程 ---转载自《计算机世界日报》 (文/凌震) ---- 本文介绍了在 C++Builder 5环境下新...

数据库相关

2,498

社区成员

88,445

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章