首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > PB >

怎么获得pb数据窗口中的所有列的名字,包括隐藏和几计算的列

2012-02-15 
如何获得pb数据窗口中的所有列的名字,包括隐藏和几计算的列如何获得pb数据窗口中的所有列的名字,包括隐藏

如何获得pb数据窗口中的所有列的名字,包括隐藏和几计算的列
如何获得pb数据窗口中的所有列的名字,包括隐藏和几计算的列

[解决办法]
hehe
[解决办法]
你可以参考下:
//-------------------------//
// 功能说明:根据数据窗口idw_data设定可组合项,供组合查询选择
// 注意事项:数据窗口idw_data的对象中text命名须用默认值,
// 即:列名+ _t
//-----------------------------------//
longll_column_count,ll_i
stringls_column,ls_column_name

this.reset()
this.insertrow(0)
this.setredraw(false)
ll_column_count = long(idw_data.Describe( "DataWindow.Column.Count ")) //总列数

this.ClearValues( "column_name ")

for ll_i = 1 to ll_column_count
if idw_data.Describe( "# "+string(ll_i)+ ".Visible ") = '1 ' then
ls_column = idw_data.Describe( "# "+string(ll_i)+ ".Name ") //列名

ls_column_name = idw_data.Describe(ls_column + "_t.text ") //列名对应文本
is_name_array[ll_i] = ls_column
is_dbname_array[ll_i] = idw_data.Describe( "# "+string(ll_i)+ ".dbName ")
if ls_column_name = '? ' or ls_column_name = '! ' or isnull(ls_column_name) then continue

this.SetValue( "column_name ", ll_i , ls_column_name + "~t " + is_dbname_array[ll_i])//ls_column)
end if
next
this.setredraw(true)

热点排行