首页 > 代码库 > kbmmemtable 删除数据
kbmmemtable 删除数据
procedure TForm6.btn5Click(Sender: TObject);
var
fld_Id:TIntegerField;
fld_Value:TStringField;
fld_Time:TDateTimeField;
begin
//删除
cxGrid1DBTableView1.DataController.DataSource := ds1;
ds1.DataSet := kbmtbl1;
with kbmtbl1 do
begin
Open;
// fld_Id:=TIntegerField(FieldByName(‘Id‘));
// fld_Value:=TStringField(FieldByName(‘Value‘));
// fld_Time:=TDateTimeField(FieldByName(‘Time‘));
if Locate(‘Id‘,5,[]) then
begin
Delete;
UpdateIndexes;
end;
end;
end;
kbmmemtable 删除数据
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。