本帖最后由 天生天杀 于 2015-8-7 04:08 编辑
设计界面复制10个表格 ,,运行打开等待 的时间 tc5版本比4版本时间多很多,而且用线程启动的话,表格不正常.
变量 行高=18
变量 列宽=18
功能 表格()
变量 r_row=0
变量 r_col=0
变量 u,r,i
var bg
遍历(r = 0; r < 9; r++)
bg="表格"&r
表格设置大小(bg,100,100)
表格获取大小(bg,r_row,r_col)
遍历(i=0;i<r_row;i++)
遍历(u=0;u<r_col;u++)
表格设置行高(bg,i,行高)
表格设置列宽(bg,u,列宽)
表格设置内容(bg,0,u,u)
表格设置内容(bg,i,0,i)
//
结束
结束
结束
结束
功能 xx_初始化()
线程开启("表格","")
// 表格()
结束
|