表格设置类型bug

ctvftv

表格设置了类型=1之后想换成类型=0就用 获得类型确实也是0 但是表格就是不能输入内容

忆辰辅助

有没有设置只读属性?表格这个控件没太用过

21522282

功能 编辑框02_内容改变()
    如果(编辑框.获得文本("编辑框02")=="零售业务")
        z = 辅助.读配置("商品列表","1","d:\\账目系统\\config.ini")
        如果(z == "")
            跳转 标记a
        如果结束
        返回串,w
        源串=z,分隔符=":"
        字符串.分割(源串,分隔符,返回串)
        数组空间.大小(返回串,w)
        y = w/3
        x = 3
        a = y
        b = x
        i = 0
        表格.设置大小("表格000",y+1,x)
        如果(y+1 >= 16)
            表格.设置列宽("表格000",0,130)
            表格.设置列宽("表格000",1,130)
        否则
            表格.设置列宽("表格000",0,138)
            表格.设置列宽("表格000",1,138)
        如果结束
        循环(a)
            循环(b)
                表格.设置内容("表格000",a,b-1,返回串)
                如果(b-1==1)
                    表格.设置内容("表格000",a,b-1,返回串+0.5)
                如果结束
                表格.设置类型("表格000",a,b-1,1)
                i = i+1
                b = b-1
            循环结束
            b = x
            a =a-1
        循环结束   
标记a:
        z = 辅助.读配置("商品列表","2","d:\\账目系统\\config.ini")
        如果(z == "")
            跳转 标记b
        如果结束
        返回串,w
        源串=z,分隔符=":"
        字符串.分割(源串,分隔符,返回串)
        数组空间.大小(返回串,w)
        y = w/3
        x = 3
        a = y
        b = x
        i = 0
        表格.设置大小("表格001",y+1,x)
        如果(y+1 >= 16)
            表格.设置列宽("表格001",0,130)
            表格.设置列宽("表格001",1,130)
        否则
            表格.设置列宽("表格001",0,138)
            表格.设置列宽("表格001",1,138)
        如果结束
        循环(a)
            循环(b)
                表格.设置内容("表格001",a,b-1,返回串)
                如果(b-1==1)
                    表格.设置内容("表格001",a,b-1,((返回串)+1))
                如果结束
                表格.设置类型("表格001",a,b-1,1)
                i = i+1
                b = b-1
            循环结束
            b = x
            a =a-1
        循环结束   
标记b:
        z = 辅助.读配置("商品列表","3","d:\\账目系统\\config.ini")
        如果(z == "")
            跳转 标记c
        如果结束
        返回串,w
        源串=z,分隔符=":"
        字符串.分割(源串,分隔符,返回串)
        数组空间.大小(返回串,w)
        y = w/3
        x = 3
        a = y
        b = x
        i = 0
        表格.设置大小("表格002",y+1,x)
        如果(y+1 >= 16)
            表格.设置列宽("表格002",0,130)
            表格.设置列宽("表格002",1,130)
        否则
            表格.设置列宽("表格002",0,138)
            表格.设置列宽("表格002",1,138)
        如果结束
        循环(a)
            循环(b)
                表格.设置内容("表格002",a,b-1,返回串)
                如果(b-1==1)
                    表格.设置内容("表格002",a,b-1,((返回串)+2))
                如果结束
                表格.设置类型("表格002",a,b-1,1)
                i = i+1
                b = b-1
            循环结束
            b = x
            a =a-1
        循环结束   
标记c:
    否则
        z = 辅助.读配置("商品列表","1","d:\\账目系统\\config.ini")
        如果(z == "")
            跳转 标记d
        如果结束
        返回串,w
        源串=z,分隔符=":"
        字符串.分割(源串,分隔符,返回串)
        数组空间.大小(返回串,w)
        y = w/3
        x = 3
        a = y
        b = x
        i = 0
        表格.设置大小("表格000",1,3)
        表格.设置大小("表格000",y+1,x)
        如果(y+1 >= 16)
            表格.设置列宽("表格000",0,130)
            表格.设置列宽("表格000",1,130)
        否则
            表格.设置列宽("表格000",0,138)
            表格.设置列宽("表格000",1,138)
        如果结束
        循环(a)
            循环(b)
                表格.设置内容("表格000",a,b-1,返回串)
                i = i+1
                b = b-1
            循环结束
            b = x
            a =a-1
        循环结束   
标记d:
        z = 辅助.读配置("商品列表","2","d:\\账目系统\\config.ini")
        如果(z == "")
            跳转 标记e
        如果结束
        返回串,w
        源串=z,分隔符=":"
        字符串.分割(源串,分隔符,返回串)
        数组空间.大小(返回串,w)
        y = w/3
        x = 3
        a = y
        b = x
        i = 0
       表格.设置大小("表格001",y+1,x)
        如果(y+1 >= 16)
            表格.设置列宽("表格001",0,130)
            表格.设置列宽("表格001",1,130)
        否则
            表格.设置列宽("表格001",0,138)
            表格.设置列宽("表格001",1,138)
        如果结束
        循环(a)
            循环(b)
                表格.设置类型("表格001",a,b-1,0)
                表格.设置内容("表格001",a,b-1,返回串)
                i = i+1
                b = b-1
            循环结束
            b = x
            a =a-1
        循环结束   
标记e:
        z = 辅助.读配置("商品列表","3","d:\\账目系统\\config.ini")
        如果(z == "")
            跳转 标记f
        如果结束
        返回串,w
        源串=z,分隔符=":"
        字符串.分割(源串,分隔符,返回串)
        数组空间.大小(返回串,w)
        y = w/3
        x = 3
        a = y
        b = x
        i = 0
        表格.设置大小("表格002",y+1,x)
        如果(y+1 >= 16)
            表格.设置列宽("表格002",0,130)
            表格.设置列宽("表格002",1,130)
        否则
            表格.设置列宽("表格002",0,138)
            表格.设置列宽("表格002",1,138)
        如果结束
        循环(a)
            循环(b)
                表格.设置类型("表格002",a,b-1,0)
                表格.设置内容("表格002",a,b-1,返回串)
                i = i+1
                b = b-1
            循环结束
            b = x
            a =a-1
        循环结束   
标记f:
    如果结束
功能结束

注意对比红色区域，我就是这样解决这个问题的

21522282

删除原来的行，再重新添加行，再读入表格数据