◆◆◆救急:那里有这样一个字符.在字母X上加一横.

比如说一个Label的Caption设为:?X. 也就是要在X上弄一个短横线的字符.

谢谢大家.急用啊

17 个解决方案

#1

Label1.Font.Style :=[fsStrikeOut ];

如果觉得不行，只有自己画了

#2

我是只在X这一个字母上出现.比如说X+2SD.只是在X上出现.
因为它在专业上表示一个平均值.
大家有没有会的.继续啊.
谢谢

#3

在X上面有一个横线是吧？
没有好的办法，你另外加一个Label，内容是一个下划线_，算好位置放在X的上面。

#4

KAO,大风的答案还不如自己画一个

#5

谢谢楼上的两位老大,但我很多地方都会用到啊.
表单中,报表中到处都是.并且它不是单独出现的,它是连同其它字母一起的,如:23sX+12.
还有没有更好的办法啊?

#6

可以自己画啊，先搜索有没有X，如果有，就先得到TextWidth，再乘以第N个字符，就得到要画的位置

#7

饭桶^_^ 兄:
谢谢了.但是要怎样才能得到它的准确位置呢?我要那一横在X的上面.并且画出来会不会不协调呢?

#8

应该没有更好的办法了。

#9

#10

要么试试这样：
Label.Caption := ' _ '#13+
' 23sX +12';

#11

我哭啊^_^..
我的程序中至少都有100个这样的玩意儿,要弄到何年啊!!!

#12

好办
写一个函数自动转换一下：）

#13

谢谢上面的老大些.
决定采用:
Label.Caption := ' _ '#13+
' 23sX +12';

#14

为了防止有更好的方法出现,些贴决定明天结^_^

#15

回复人： GoldShield(金盾☆正直人) ( ) 信誉：100  2004-09-02 18:03:00  得分: 0

   谢谢上面的老大些.
决定采用:
  Label.Caption := '      _   '#13+
                 '     23sX +12';



**************
还不如加“&”：
  Label.Caption := '23s&X +12';

#16

God Damn it

#17

自己写个Label空间，重载他的DoDrawText方法
参照那种带&之后有下划线的方法，实现你的上划，呵呵。

#1