在属性选项卡中的最后一项中,选中你所用的一列,然后在其下面的属性下栏框中选中
下拉框的属性,然后在VALUE中添加值,但是这种方法比料死。
另一种,就是用TDBGRID LIST这个控件,在TDBGRID的相应的列中有一个属性好像是DropDownList还是什么的,属性选项卡中第二项第三项的Colomns中的任一列属性有的
下拉框的属性,然后在VALUE中添加值,但是这种方法比料死。
另一种,就是用TDBGRID LIST这个控件,在TDBGRID的相应的列中有一个属性好像是DropDownList还是什么的,属性选项卡中第二项第三项的Colomns中的任一列属性有的
我用的True DBGrid的列不是固定的,是要随着记录集的变化而变化的。
看样子要用写代码的方式,能够告诉我代码如何写?
还有一个就是要添加一个引用:XArrayDB,好象也是与TDBGrid相对应的一个东西。
首先将TDBDropdown添加上数据
dim Sql as string
dim Rst as adodb.recordsetsql="select Name from Student"
.....把值写入Rst
x.clerar
x.redim 0,rst.recordcount-1,0,0
rst.movefirst
do while not rst.eof
就是用TDBGRID LIST这个控件,在TDBGRID的相应的列中有一个属性好像是DropDownList还是什么的,属性选项卡中第二项第三项的Colomns中的任一列属性有的
还有一个就是要添加一个引用:XArrayDB,好象也是与TDBGrid相对应的一个东西。
首先将TDBDropdown添加上数据
dim Sql as string
dim Rst as adodb.recordsetsql="select Name from Student"
.....把值写入Rst
x.clerar
x.redim 0,rst.recordcount-1,0,0
rst.movefirst
i=0
do while not rst.eof
x(i,0)=rst("Name").value
rst.movenext
i=i+1
loop
set tdbgdropdown1=x
tdbgdropdown1.rebind
tdbgdropdown1.refresh在TDBGRID的属性分页框中的第二项,选中要使用的列,在其中有一个属性是DropDown的,将tdbgdropdown1选择进去。测试
如何用代码实现 :在TDBGRID的属性分页框中的第二项,选中要使用的列,在其中有一个属性是DropDown的,将tdbgdropdown1选择进去。