注册 登录
编程论坛 VFP论坛

vfp表单中,如何让grid标题行里边的文字写成两行

雨花石568 发布于 3 天前 11:08, 160 次点击
在my.scx中插入grid1,grid1过程init中代码如下:
WITH thisform.grid1
    .gridlinecolor = RGB(192, 192, 192)

    .column1.header1.caption = "类别"
    .column1.header1.fontsize=12
    .column1.header1.fontbold= .t.
    .column1.header1.alignment = 2
    .column1.header1.forecolor = RGB(64, 0, 64)
    .column1.text1.alignment = 2

    .column2.header1.caption = "品名"
    .column2.header1.fontsize=12
    .column2.header1.fontbold= .t.
    .column2.header1.alignment = 2
    .column2.header1.forecolor = RGB(64, 0, 64)
    .column2.text1.alignment = 2

    .column3.header1.caption = "初期"  + CHR(13) +  "库存数量"
    .column3.header1.fontsize=12
    .column3.header1.fontbold= .t.
    .column3.header1.alignment = 2
    .column3.header1.forecolor = RGB(64, 0, 64)
    .column3.text1.alignment = 2

    .refresh
    .readonly = .T.
ENDWITH
这个方法只显示一行 初期库存数量。想让它显示两行:第一行 初期 第二行 库存数量
请高手们不吝赐教,菜鸟在此拜谢啦。
10 回复
#2
sych3 天前 12:11
chr(10)
#3
雨花石5683 天前 16:31
回复 2楼 sych
不行,还是显示一行
#4
sych3 天前 16:39
.HeaderHeight=30
.column3.header1.WordWrap=.t.



[此贴子已经被作者于2025-10-15 16:42编辑过]

#5
雨花石5683 天前 16:50
回复 4楼 sych
可以了。感谢大神
#6
雨花石5683 天前 17:04
回复 4楼 sych
大神,又出现新问题了。
这两行代码
Thisform.Grid1.Refresh
Thisform.Grid1.AutoFit()
失效了。现在的自动宽度是一行时的宽度,能让自动宽度改成两行时的自动宽度吗?
#7
kangss3 天前 18:56
回复 6楼 雨花石568
试试: .column1.header1.caption = "类" + chr(13) + chr(10) + "别"
#8
sam_jiang3 天前 20:00
回复 6楼 雨花石568
用一个变量记住那个宽度,刷新完表格后,再次给那个宽度赋值。
#9
雨花石568昨天 10:53
回复 7楼 kangss
.column3.header1.WordWrap=.t.
这行代码就行了
#10
雨花石568昨天 10:58
回复 8楼 sam_jiang
宽度要根据标题和标题列下面填写的内容自动生成。
如果数据量大,比较所有内容的宽度,会不会拖慢速度

#11
sam_jiang昨晚 21:21
回复 10楼 雨花石568
正常你绑定了数据,就已经知道整个column的宽度了,不存在你说的那个问题。
1