1188
社区成员
当与TDBGRID绑定时，为什么在ADODC中记录不为空时直接赋值出错？
当与TDBGRID绑定时，ADODC中记录为空时可以直接赋值，但不为空时直接赋值出错？为什么？
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
sangshuyezi 2004-09-07
//在TDBGRID1_beforeupdate事件中写：
//Adodc1.Recordset.Fields(0).Value =text_box(0).Text
//运行时如果记录是新增的还没有内容时正常，可是当修改时记录已有内容时出现“operation is invalid the event TDBGRID1_beforeupdate"错误信息。
//注：TDBGRID1是TDBGRID的名字；Adodc1.Recordset.Fields(0)字段在TDBGRID中没有此列。
在修改时你并不想修改这个字段的值吧？
如果也要修改，那就写在下面的触发事件中
Private Sub TDBGrid1_AfterColUpdate(ByVal ColIndex As Integer)
'在此你也可指定是更改了哪一列然后重新给Adodc1.Recordset.Fields(0)赋值。
End Sub
//Adodc1.Recordset.Fields(0).Value =text_box(0).Text
//运行时如果记录是新增的还没有内容时正常，可是当修改时记录已有内容时出现“operation is invalid the event TDBGRID1_beforeupdate"错误信息。
//注：TDBGRID1是TDBGRID的名字；Adodc1.Recordset.Fields(0)字段在TDBGRID中没有此列。
在修改时你并不想修改这个字段的值吧？
如果也要修改，那就写在下面的触发事件中
Private Sub TDBGrid1_AfterColUpdate(ByVal ColIndex As Integer)
'在此你也可指定是更改了哪一列然后重新给Adodc1.Recordset.Fields(0)赋值。
End Sub
sangshuyezi 2004-09-07
你是否想在添加一条记录的时候为某些段设置默认值，如果是这样的，你的代码不应该写在这个地方。
Private Sub TDBGrid1_OnAddNew()
'在此设置默认值
Adodc1.Recordset.Fields(0).Value =text_box(0).Text
'...
End Sub
Private Sub TDBGrid1_OnAddNew()
'在此设置默认值
Adodc1.Recordset.Fields(0).Value =text_box(0).Text
'...
End Sub
candy0622 2004-09-06
出现“operation is invalid the event TDBGRID1_beforeupdate"错误信息
TDBGRID1是TDBGRID的名字。
TDBGRID1是TDBGRID的名字。
sangshuyezi 2004-09-04
我用这个控件很久了
不知道"为空时可以直接赋值,但不为空时直接赋值出错"是怎么操作的,不太明白.
提示什么错误信息?
不知道"为空时可以直接赋值,但不为空时直接赋值出错"是怎么操作的,不太明白.
提示什么错误信息?
Delphi中的TDBGrid多行数据操作例子 摘要:Delphi源码,数据库应用,TDBGrid ...Delphi中的TDBGrid多行数据操作例子源代码，附带有SQLSERVER数据库文件，测试前请先附加数据库，编译时可能有点慢，先连接数据库就好了。 运行环境：Windows/Delphi7
tdbgrid_在Delphi的TDBGrid中显示和编辑MEMO字段 tdbgrid If you are developing database applications with tables containing MEMO fields, you'll notice that, by default, the TDBGrid component does not show the contents of a MEMO field inside a DBGri....
Delphi 将TDBGrid导入到Excel表中附数据库.rar Delphi7.0将TDBGrid导入到Excel表中，测试程序先连接好SQLSERVER数据库，并将数据读取到TDBGrid中，然后再将数据从TDBGrid导入到Excel表中，为了测试方便，SQLSERVER数据库文件已经附在源码包中。以下代码片断会有...
tdbgrid网格线颜色_如何在TDBGrid组件中更改颜色 如果要为DBGrid中的选定行着色，但又不想使用dgRowSelect选项(因为您希望能够编辑数据)，则应该使用DBGrid.OnDrawColumnCell事件。 This technique demonstrates how to dynamically change the color of text in a...
双击DBGrid记录行时在DBGridDBLClick事件中弹出一个窗体，但是在双击标题行时并不触发这个dblClick事件，应该怎么写代码？... 双击DBGrid记录行时在DBGridDBLClick事件中弹出一个窗体，但是在双击标题行时并不触发这个dblClick事件，应该怎么写代码？ Delphi / Windows SDK/API...
delphi使用SQL的教程4(使用Params属性为参数赋值 ) 17.4.1 使用Params属性为参数赋值 TQuery部件具有一个Params属性，它们在设计时不可用，在程序运行过程中可用，并且是动态建立的，当为TQuery部件编写动态SQL 语句时， Delphi 会自动地建立一个数组Params，数组...
delphi dbgrid_如何在Delphi DBGrid中对记录进行排序 为了简单起见，为了标记对记录进行“排序”的列，我们将列标题的字体样式简单地更改为粗体，并在使用另一列对数据集进行排序时将其删除。 procedure TForm1.DBGrid1TitleClick(Column: TColumn);{$J+}const ...
Delphi开发学习三：TdataSource 控件与 TDBGrid 控件使用实例 TdataSource 控件与 TDBGrid 控件在数据库开发中经常是成对出现的。作为数据库感应控件，TDBGrid控件主要作用是通过TdataSource控件连接数据集（如TADOQUery）以各 种方式显示数据库中的数据，并提供客户端浏览的...
TDBGrid //多选行取值 procedure TForm1.Button1Click(Sender: TObject); Var i: Integer; begin for i := 0 to DBGrid1.SelectedRows.Count - 1 do Begin DBGrid1.DataSource.DataSet.GotoBookmark(DBGrid1.SelectedRo
VB中的dbGrid不能用,是怎么回事?在VB中运行后可以直接修改的控件是什么? 大家好! 我是刚刚入会的,请大家帮我解决这两个问题.谢谢! 我是一名即将毕业的计算机专业的大学生,毕业设计是做机房排课系统,不大会啊,希望知道的会友告知!
Doevents 在 Tdbgrid 中的一个妙用 用 ＴｄｂＧｒｉｄ 创建 主－子 窗体 ，Ｔｄｂｇｒｉｄ 都绑定到两个记录集，命名为“主记录集Ａ” 和 “子记录集Ｂ” ， 记录Ｃ是子纪录集Ｂ中的一条数据，子纪录集Ｂ是 主记录集满足“条件Ａ”的记录...
Delphi 实现TDBGrid组件的斑马线显示.rar 也就是TDBGrid的不同行显示不同的颜色，设置不同的背景色，让数据显示更清淅，看上去像斑马线，俗称隔行换色，本例子是结合数据库实现的，若要正常运行，请先附加Database数据库中的SQLSERVER文件，附加后在本示例中...
Delphi DBGrid PickList通过sql查询语句中ltrim不显示下拉列表的问题 注意查询语句的字段中不能有ltrim(字段名) as (字段名) 否则该字段在DBGrid中不会显示下拉PickList列表 procedure TForm1.FormShow(Sender: TObject); begin with dm.ADOQuery1 do begin dm.ADOQuery1.Close; ...
Delphi 下如何使用对象数组 和 将数组与dbgrid绑定 最近在做维护时，发现传了多少代的程序使用delphi开发，之前没有用过，在对程序优化的时候发现dbgrid控件全部都是直接跟数据库相连，有些数据将远程数据库和本地数据库连查，远程数据库数据量在百万级别，本地数据库...
tdbgrid_使用TDBGrid组件 tdbgrid Contrary to most other Delphi data-aware controls, the DBGrid component has many nice features and is more powerful than you might think. 与大多数其他Delphi数据感知控件相反，DBGrid组件具有...
