Thread Rating:
  • 211 Vote(s) - 2.82 Average
  • 1
  • 2
  • 3
  • 4
  • 5
RecordGridColumn の文字を太字ではなくさせたい
08-01-2011, 09:45 PM, (This post was last modified: 08-01-2011, 09:46 PM by umemura.)
#1
RecordGridColumn の文字を太字ではなくさせたい
RecordGrid のカラム(RecordGridColumn)の文字列は、通常太字ですが、
これを普通の太さにするにはどうすればいいですか?


RecordGridRowOptions の halign を "center" に設定しても太字のままでした。
Reply
08-01-2011, 09:48 PM,
#2
RE: RecordGridColumn の文字を太字ではなくさせたい
header-spec を指定すれば普通の太さの文字列を表示できました。

Code:
{let people:RecordSet =
    {RecordSet
        {RecordFields
            {RecordField
                "First", caption = "First Name", domain = String
            },
            {RecordField
                "Last", caption = "Last Name", domain = String
            },
            {RecordField "Age", domain = int}
        },
        {RecordData First = "John", Last = "Smith", Age = 25},
        {RecordData First = "Jane", Last = "Smith", Age = 29},
        {RecordData First = "Jane", Last = "Jones", Age = 28}
    }
}
{let header:RecordGridRowOptions =
    {RecordGridRowOptions
        font-weight = "normal",
        halign = "center"
    }
}
{define-proc public {make-header
                        rgc:RecordGridColumn
                    }:Graphic
    set rgc.halign = "center"
    {return
        {TextFlowBox
            font-weight = "normal",
            rgc.field.caption
        }
    }
}  
{let rg:RecordGrid =
    {RecordGrid
        ||header-options = header,
        header-spec = make-header,
        record-source = people
    }
}
{value rg}


しかし、なんで RecordGridRowOptions だと効果がないんでしょうかね?
直接RecordGridColun の中で指定してもダメでした。

Reply
08-03-2011, 03:57 PM,
#3
RE: RecordGridColumn の文字を太字ではなくさせたい
(08-01-2011, 09:48 PM)umemura Wrote: しかし、なんで RecordGridRowOptions だと効果がないんでしょうかね?
直接RecordGridColun の中で指定してもダメでした。

header-optionsは行に設定されています。
header-specはセルのラベルを直接作ります。

一般の太字optionはセルとラベルの間のGraphicに設定されているから、header-specの設定はブロックされています。

確かにちょっと分りづらいです。
Reply

Forum Jump:


Users browsing this thread:
1 Guest(s)