下面那张帖子有问题，请看这个：学做工资管理程序，遇到难题，请多多指教，一定送分！！！！

[morningdew]

正在练习做一个工资管理程序，遇到了难题，我做了两个表，一个是工资表，一个是工资项目表，工资表上的各个项目都是从工资项目表里提取出来的。
表结构如下：
工资项目表：20列，a1-a20，字符串型
工资表：20列，a1-a20，数字型
针对这两个表在窗体上建了两个数据窗口，工资表的数据窗口名为：dw_dealsalary，工资项目表的数据窗口名为：dw_1，下面是我写的代码，虽然可以解决问题，但是总觉得这么做有点不对劲，好像用循环就可以达到这个功能，请各位高手指教，另外我已经关了数据窗口的屏幕刷新，但是提取工资项目名称时，数据窗口还是有闪烁。不知为什么？请多多帮忙，一定给分。谢谢！！！！
dw_dealsalary.settransobject(sqlca)
dw_dealsalary.retrieve()
dw_1.settransobject(sqlca)
dw_1.retrieve()

string ls_getstring[20]
integer li_dealcolcount

for li_dealcolcount=1 to 20
ls_getstring[li_dealcolcount]=dw_1.getitemstring(1,li_dealcolcount)
next
dw_dealsalary.setredraw(false)
dw_dealsalary.object.a1_t.text=ls_getstring[1]
dw_dealsalary.object.a2_t.text=ls_getstring[2]
dw_dealsalary.object.a3_t.text=ls_getstring[3]
dw_dealsalary.object.a4_t.text=ls_getstring[4]
dw_dealsalary.object.a5_t.text=ls_getstring[5]
dw_dealsalary.object.a6_t.text=ls_getstring[6]
dw_dealsalary.object.a7_t.text=ls_getstring[7]
dw_dealsalary.object.a8_t.text=ls_getstring[8]
dw_dealsalary.object.a9_t.text=ls_getstring[9]
dw_dealsalary.object.a10_t.text=ls_getstring[10]
dw_dealsalary.object.a11_t.text=ls_getstring[11]
dw_dealsalary.object.a12_t.text=ls_getstring[12]
dw_dealsalary.object.a13_t.text=ls_getstring[13]
dw_dealsalary.object.a14_t.text=ls_getstring[14]
dw_dealsalary.object.a15_t.text=ls_getstring[15]
dw_dealsalary.object.a16_t.text=ls_getstring[16]
dw_dealsalary.object.a17_t.text=ls_getstring[17]
dw_dealsalary.object.a18_t.text=ls_getstring[18]
dw_dealsalary.object.a19_t.text=ls_getstring[19]
dw_dealsalary.object.a20_t.text=ls_getstring[20]
dw_dealsalary.setredraw(true)