delphi中,如何向dbgrid中添加数据记录并自动刷新
我想将几个edit.text编辑后的内容,通过一个click按钮增加到dbgrid中,并自动刷新。求解答。附图...
我想将几个edit.text编辑后的内容,通过一个click按钮增加到dbgrid中,并自动刷新。求解答。附图
展开
3个回答
2017-06-10 · 知道合伙人软件行家
关注
展开全部
一、预备知识
在 delphi 语言中,对于数据库的操作类组件,简单地可以分为前台(数据显示)及后台(数据操作)类组件。前台类的组件,如 dgGrid、dbEdit 等;后台类的组件,如 AdoTabel、ADOQuery 等。
两者的关系,通常来说,在前台(如 dbGrid)中,对数据的操作(添加、删除记录),最终都需要后台进行实际的动作。
二、对数据库进行添加数据记录操作,通常步骤如下:
1、设置数据库为添加记录状态
2、为数据表中的各字段赋值
3、确认数据,将数据写入数据库
4、更新数据库状态(刷新前台组件数据),
需要说明的是,第 4 步骤为 非必需 项。delphi 的数据库组件具有数据感知特性,一般当数据库改变后,前台的诸如 dbGrid 等组件会自动刷新数据。但某些时候(当数据进行了更改,而数据表格并没有实时反映出变化时),需要进行此步骤。
三、编写代码示例如下:
procedure TForm1.Button1Click(Sender: TObject);
begin
//设置数据库为添加记录状态
ADOTable1.Append;
//为数据表中的各字段赋值
ADOTable1.FieldByName('Name').Value := '张三丰';
ADOTable1.FieldByName('Sex').Value := '男';
ADOTable1.FieldByName('Age').Value := 30;
ADOTable1.FieldByName('Address').Value := '武汉长沙';
//提交数据
ADOTable1.Post;
//更新数据库状态(刷新前台组件数据)
ADOTable1.Requery();
end;
展开全部
DB 开头的控件表示数据感知。初期使用,很方便。
而用非数据感知的处理方法,无非就是操作 AdoQuery之类的继承自 TDataSet 的控件。
都一样的规则,
先定位到数据,比如:Locate,或者在 DBGrid 上点选。
ADOQuery.Edit; // 准备编辑。
ADOQuery.FieldByName('第一个字段名').AsVariant := 1233; // 也可以 As 你指针的特定类型。
ADOQuery.FIelds[1].AsString := Edit1.Text; // 第二个字段
ADOQuery.Pos; // 提交到数据库文件中。
而用非数据感知的处理方法,无非就是操作 AdoQuery之类的继承自 TDataSet 的控件。
都一样的规则,
先定位到数据,比如:Locate,或者在 DBGrid 上点选。
ADOQuery.Edit; // 准备编辑。
ADOQuery.FieldByName('第一个字段名').AsVariant := 1233; // 也可以 As 你指针的特定类型。
ADOQuery.FIelds[1].AsString := Edit1.Text; // 第二个字段
ADOQuery.Pos; // 提交到数据库文件中。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
一、使用Tedit控件,增加后,关闭数据集并重新打开
二、使用数据感知控件, 如TDBEdit
二、使用数据感知控件, 如TDBEdit
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询