以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何窗口上的临时表的多级表头的单元格和行的样式?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=194748)

--  作者:lin98
--  发布时间:2025/1/10 9:00:00
--  如何窗口上的临时表的多级表头的单元格和行的样式?
如何窗口上的临时表的多级表头的单元格和行的样式?
1、计划数不空时,单元格清绿色,如果完成数小于计划数,单元格为黄色,如果完成数等于计划数,单元格为绿色,
2.如果欠数为负数或小于0,行为黄色,如果欠数为0时,行为绿色,如果欠数为大于0时,行为蓝色,


帮助大部分是正表,临时表没找到

--  作者:有点蓝
--  发布时间:2025/1/10 9:11:00
--  

改为sqltable,到窗口表DrawCell事件处理

或者到全局表DrawCell事件处理:http://www.foxtable.com/webhelp/topics/0671.htm

--  作者:lin98
--  发布时间:2025/1/10 10:00:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:临时表的样式 .jpg
图片点击可在新窗口打开查看

改为sqltable,到窗口表DrawCell事件处理
执行后,没有报错,也没效果,如何处理?上面图的效果,如何实现?

\'If e.Col.Name = "计划数_*" Then
\'    If e.Row("计划数_*") = 0 Then
\'        e.Style = "w" \'白色
\'    ElseIf e.Row("计划数_*") = 1 Then
\'        e.Style = "f" \'如蓝色
\'    ElseIf e.Row("计划数_*") >= e.Row("完成数_*") Then
\'        e.Style = "g" \'如绿色
\'    ElseIf e.Row("计划数_*") < e.Row("完成数_*") Then
\'        e.Style = "y" \'如黄色      
\'    End If 
\'End If


\'If e.Col.Name = "_计划数" Then
\'    If e.Row("_计划数") = 0 Then
\'        e.Style = "w" \'白色
\'    ElseIf e.Row("_计划数") = 1 Then
\'        e.Style = "f" \'如蓝色
\'    ElseIf e.Row("_计划数") >= e.Row("_完成数") Then
\'        e.Style = "g" \'如绿色
\'    ElseIf e.Row("_计划数") < e.Row("_完成数") Then
\'        e.Style = "y" \'如黄色      
\'    End If 
\'End If

--  作者:有点蓝
--  发布时间:2025/1/10 10:14:00
--  
\'If e.Col.Name like "*_计划数" Then
\'    If e.Row(e.Col.Name) = 0 Then

--  作者:lin98
--  发布时间:2025/1/10 11:34:00
--  
\'DataTables("窗口2_Table2").AddUserStyle("w", Color.White, Color.White)
\'DataTables("窗口2_Table2").AddUserStyle("g", Color.Lime, Color.Black)

If e.Col.Name Like "*_计划数" Then
    If e.Row(e.Col.Name) = 0 Then
        e.Style = "w" \'
    ElseIf e.Row(e.Col.Name) > 1 Then
        e.Style = "g" \'如
    ElseIf e.Row(e.Col.Name) >= e.Row("*_完成数") Then
        e.Style = "g" \'如
    ElseIf e.Row(e.Col.Name) < e.Row("*_完成数") Then
        e.Style = "g" \'如      
    End If 
End If

执行后,对多级标头也是无效,没颜色标识,
[此贴子已经被作者于2025/1/10 12:59:06编辑过]

--  作者:有点蓝
--  发布时间:2025/1/10 13:28:00
--  
请上传实例说明
--  作者:lin98
--  发布时间:2025/1/10 14:18:00
--  
If e.Col.Name Like "*_计划数" Then
    If e.Row(e.Col.Name) = 0 Then
        e.Style = "w" \'

"*_计划数"是一级表头,"*_*_*_*_计划数"是四级表头,

If e.Col.Name Like "*_*_*_*_计划数" Then
    If e.Row(e.Col.Name) = 0 Then
        e.Style = "w" \'

如实现3楼,2025-1-2星期四计划数、完成数的样式是如何实现?按上面红代码实现?

--  作者:有点蓝
--  发布时间:2025/1/10 14:20:00
--  
和多少级没有任何关系,like也不是这样用的:http://www.foxtable.com/webhelp/topics/0222.htm