delphi中如何实现对一个表的添加数据?
我想学习delphi6,现在通过ADO建立了一个表,如何实现对这个添加,修改,删除数据?具体设置和代码应是如何?希望能越详细越好。高分答谢。beginwithtform2...
我想学习delphi6,现在通过ADO建立了一个表,如何实现对这个添加,修改,删除数据?具体设置和代码应是如何?希望能越详细越好。高分答谢。
begin
with tform2.Create(self) do
begin
showmodal;
free;
end;
end;
end.
这段代码是什么意思?谢了。
又建了一个FORM,通过一个edit和botton,通过botton按钮来这个ADOTABLE添加数据,下面是botton里的代码
begin
form1.ADOTable1.Insert;
form1.ADOTable1.FieldByName('sfz').AsString:=edit1.Text;
form1.ADOTable1.Post;
close;
end;
能详细解释下吗? 满意的追加50分,急~!!!!!
上面两位的都不错,我实在无法分出高下,第一位解释的比较详细,是我需要的;第二位解释的通俗些,逻辑性很好,我先谢过二位了。
可是我这里还有一个问题,麻烦请教二位:
如何利用ADO空间来连接数据库,具体分为:1.用ADO连接DBD建的表,2.连接ACCESS表。
或者你们给我讲解一下ADO得了,真是不懂啊,现在看见delphi我就头大。
谢谢各位了。 展开
begin
with tform2.Create(self) do
begin
showmodal;
free;
end;
end;
end.
这段代码是什么意思?谢了。
又建了一个FORM,通过一个edit和botton,通过botton按钮来这个ADOTABLE添加数据,下面是botton里的代码
begin
form1.ADOTable1.Insert;
form1.ADOTable1.FieldByName('sfz').AsString:=edit1.Text;
form1.ADOTable1.Post;
close;
end;
能详细解释下吗? 满意的追加50分,急~!!!!!
上面两位的都不错,我实在无法分出高下,第一位解释的比较详细,是我需要的;第二位解释的通俗些,逻辑性很好,我先谢过二位了。
可是我这里还有一个问题,麻烦请教二位:
如何利用ADO空间来连接数据库,具体分为:1.用ADO连接DBD建的表,2.连接ACCESS表。
或者你们给我讲解一下ADO得了,真是不懂啊,现在看见delphi我就头大。
谢谢各位了。 展开
2个回答
展开全部
我来给你逐行说一下:
begin
with tform2.Create(self) do begin
showmodal;
free;
end;
end;
//whit do是Delphi里的一种语法格式,就是可以省略一个变量的定义。而可以直接用该变量的方法
他等同于以下代码:
frm2 := Tfrom2.Create(self);
frm.showModal;
frm.Free;
又建了一个FORM,通过一个edit和botton,通过botton按钮来这个ADOTABLE添加数据,下面是botton里的代码
begin
form1.ADOTable1.Insert;
form1.ADOTable1.FieldByName('sfz').AsString:=edit1.Text;
form1.ADOTable1.Post;
close;
end;
这是往数据库里追加程序的一段代码:
如果你的adotable和from和当前的按钮在一个窗体下的话
其实你可以将from1.省略掉。
先将ADOTABLE置于追加方式。
然后将sfz字段的值用edit1的内容赋值。
再提交,写库。
begin
with tform2.Create(self) do begin
showmodal;
free;
end;
end;
//whit do是Delphi里的一种语法格式,就是可以省略一个变量的定义。而可以直接用该变量的方法
他等同于以下代码:
frm2 := Tfrom2.Create(self);
frm.showModal;
frm.Free;
又建了一个FORM,通过一个edit和botton,通过botton按钮来这个ADOTABLE添加数据,下面是botton里的代码
begin
form1.ADOTable1.Insert;
form1.ADOTable1.FieldByName('sfz').AsString:=edit1.Text;
form1.ADOTable1.Post;
close;
end;
这是往数据库里追加程序的一段代码:
如果你的adotable和from和当前的按钮在一个窗体下的话
其实你可以将from1.省略掉。
先将ADOTABLE置于追加方式。
然后将sfz字段的值用edit1的内容赋值。
再提交,写库。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
with tform2.Create(self) do 创建tform2类型的窗体,参数self表示父窗体为当前窗体
begin
showmodal; 新建窗体以模态显示,模态的意思是此时只能操作新建窗体,关闭此窗体才能进行其它操作。
free; 释放窗体资源
end;
end;
begin
form1.ADOTable1.Insert; 设置ADOTable1为插入状态
form1.ADOTable1.FieldByName('sfz').AsString:=edit1.Text; 为字段sfz赋值,.AsString表示所赋值为字符串类型。
form1.ADOTable1.Post; 向数据库提交,此时修改数据库。
close; 关闭ADOTable1。
end;
begin
showmodal; 新建窗体以模态显示,模态的意思是此时只能操作新建窗体,关闭此窗体才能进行其它操作。
free; 释放窗体资源
end;
end;
begin
form1.ADOTable1.Insert; 设置ADOTable1为插入状态
form1.ADOTable1.FieldByName('sfz').AsString:=edit1.Text; 为字段sfz赋值,.AsString表示所赋值为字符串类型。
form1.ADOTable1.Post; 向数据库提交,此时修改数据库。
close; 关闭ADOTable1。
end;
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询