本文整理自网络,侵删。
一直以为Label控件的caption内容不能够竖向显示,当用有此要求时,往往采用了其它控件实现,但它是能够做到的,方法:
1.在属性编辑器中,点击caption后面的小按钮,会弹出一个caption编辑器(若没有小按钮,请换成delphi2007试下)。
2.将内容按每行一个字的方式进行输入即可。在每一行结尾请敲打键盘上的Enter键进入到下一行。
3.点击保存即可实现。
实现的原理:
1.通过caption编辑器输入的内容,其实是将你的汉字转化为unicode字符进入存储并自动合并了所有的字符形成一个unicode字符串再赋予给了caption的。
2.请注意delphi的TCaption是这样定义的: TCaption = Type string;所以,如果你真的在编辑器中输入了一个unicode字符(非GB2312),那么,很可能输入的字符在caption中无效。
如果搞清了原理,那么你很容易明白:
1.在设计时,为啥直接往caption中输入内容达不到竖向显示的效果。
2.在运行时,如何动态达到效果(或在delphi7中如何做到):
label1.caption := #25105+#13#10+#33258+#13#10+#20449
来源:http://blog.csdn.net/chinmusam/article/details/8817354
相关阅读 >>
Delphi开发firemonkey应用程序时无法打开窗体的解决
更多相关阅读请进入《Delphi》频道 >>