delphi之TDataset
2016-11-17 20:57 绿贝 阅读(2799) 评论(0) 编辑 收藏 举报
TDataSet控件一些重要的属性:
Active:判断数据库是否已打开;
Eof:判断数据集是否指向最后一条记录(在以下状态下为true:1.打开一个空的数据集;2.调用Last方法;3.调用next方法但当前记录已经是最后一条记录;4.对空范围或记录调用SetRange方法);
RecordCount:与数据集关联的记录条数;
FieldValue:在数据集的活动记录中提供对所有字段的值的访问方法。(重要)
Append:添加一个新的、空的记录到这个数据集的末尾。(重要)
FieldByName:根据字段的名称来访问(只用用来访问已存在的字段,否则会报EDatabaseError错误)。(重要)
Delete:删除一个活动记录并指针移动到DataSet对象的下一个记录。(重要)
DisableControls:利用数据控件显示与一个DataSet对象关联的禁用数据。
EnableControls:与DisableControl刚好相反。
First:移动到DataSet的第一条记录。调用该方法的目的是为了让DataSet的第一条记录设置为active。(重要)
IsEmpty:判断数据集是否为空。(重要)
Next:移动到下一条记录。(重要)
Last:将指针移动到数据集的最后一条记录。(重要)
Open:打开数据集。(重要)
with jscdQryPackBalances do
begin
departdate := FieldByName('departdate').AsDateTime;
vehicleno := FieldByName('vehicleno').AsString;
end;
if jcdspackbalance.Active then
begin
jcdspackbalance.Edit;
jcdspackbalance.AppendRecord([departdate,agentrate]);
end
else
begin
jcdspackbalance.CreateDataSet;
jcdspackbalance.AppendRecord([departdate,agentrate]);
end;
jscdQryPackBalances.Edit;
jscdQryPackBalances.Delete;