如何利用delphi向数据库中添加数据(在编写完了的界面中添加······)?

 我来答
匿名用户
2013-09-05
展开全部
你的图上控件我看不清是什么! 如果只是向界面里输入 程序如下
var
Form1: TForm1;
i:integer;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
if i>0 then stringgrid1.RowCount:=stringgrid1.RowCount+1;
i:=i+1;
stringgrid1.Cells[0,i]:=inttostr(i) ;
stringgrid1.Cells[1,i]:=edit1.Text ;
stringgrid1.Cells[2,i]:=edit2.Text ;
stringgrid1.Cells[3,i]:=edit3.Text ;
stringgrid1.Cells[4,i]:=edit4.Text ;

end;

procedure TForm1.FormCreate(Sender: TObject);
begin
i:=0;
stringgrid1.Cells[1,0]:='编号';
stringgrid1.Cells[2,0]:='用户';
stringgrid1.Cells[3,0]:='密码';
stringgrid1.Cells[4,0]:='备注';
end;
匿名用户
2013-09-05
展开全部
你可以用DB控件,直接连接数据库
例如DBedit
把它的DataSource属性设置成你所查询出来表的数据集把DataField属性设置成你要关联的字段
在放几个Button 一个写成添加,一个写修改,一个写删除,一个写保存
添加中写入
查询出来表的数据集的名字.append
修改中写入
查询出来表的数据集的名字.edit
删除中
查询出来表的数据集的名字.delete
保存中写入
查询出来表的数据集的名字.post
这样基本就可以了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式