首先建立一个exteranl类型的freeform,并在窗体中dw控件引用它。
这里用一个自定义的长字符串作为它的数据源。
freeform中各列的列名情况如图:
赋值代码:
string rtnStr //注意pb中不能声明的同时赋值
rtnStr = '0123456789012012345678901234567于学波 01234567890123456711970-01-01孙子关系 01234567890123456789012345678901234567王忠诚 01234567890123456711970-01-01孙子关系 01234567890123456789012345678901234567王圣武 01234567890123456711970-01-01孙子关系 01234567890123456789012345678901234567武保栋 01234567890123456711970-01-01孙子关系 01234567890123456789'
int strlen, n
strlen = Len(rtnStr)
n = strlen/117 //117为每一行各列的长度综合 得出总行数
//必须先插入空行,否则会赋值失败,差一行赋一行似乎也不可行,必须一次性插入足够的空行,再赋值
for i = 1 to n