客户端用
clientdataset
clientDataSet 保存记录。
[@more@]procedure TDeptForm.Button2Click(Sender: TObject);var
csql: string;
begin
csql:= 'insert into bas_dept (deptNo,DeptName) values ('+ QuotedStr(edit1.text)+','+ QuotedStr(edit2.text) +')';
clientDataSet1.close;
clientDataSet1.CommandText:=csql;
clientDataSet1.Execute; // 保存 新增记录。
clientDataSet1.CommandText:='select * from bas_dept';
clientdataSet1.Open;
end;
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/729024/viewspace-1024677/ ，如需转载，请注明出处，否则将追究法律责任。
上一篇：
三层开发
下一篇：
Processor Time
请登录后发表评论
登录
全部评论
