PB中取得数据窗口所有列名以及列标题名称

string ls_column_name[]
string ls_column_text[]
integer i,li_column_count
//string ls_ii
li_column_count = long(dw_1.Describe("DataWindow.Column.Count"))

for i = 1 to li_column_count
 ls_column_name[i] = dw_1.Describe("#" + string(i) + ".name")
 ls_column_text[i] = dw_1.Describe(ls_column_name[i] + "_t.text")
// ls_ii = ls_column_name[i] + ls_column_text[i]
// mle_1.text += ls_ii + '~r~n'
next