摘要:
procedure TForm6.btn5Click(Sender: TObject);var fld_Id:TIntegerField; fld_Value:TStringField; fld_Time:TDateTimeField;begin //删除 cxGrid1DBTableView1.D 阅读全文
摘要:
procedure TForm6.btn4Click(Sender: TObject);var fld_Id:TIntegerField; fld_Value:TStringField; fld_Time:TDateTimeField;begin //查询 cxGrid1DBTableView1.D 阅读全文
摘要:
procedure TForm6.btn6Click(Sender: TObject);var fld_Id:TIntegerField; fld_Value:TStringField; fld_Time:TDateTimeField; id:Integer;begin //循环比较最小值 cxGr 阅读全文
摘要:
kbmtbl1.EmptyTable; 阅读全文
摘要:
//建表 kbmtbl1 := TkbmMemTable.Create(Self); ds1.DataSet := kbmtbl1; kbmtbl1.FieldDefs.Clear; kbmtbl1.FieldDefs.Add('Id', ftInteger, 0, False); kbmtbl1. 阅读全文
摘要:
procedure TForm6.btn2Click(Sender: TObject);var fld_Id:TIntegerField; fld_Value:TStringField; fld_Time:TDateTimeField; i,Id:Integer;begin //插入 cxGrid1 阅读全文