delphi 5 有纵向书写汉字的功能或组件吗? 谢谢

Question

我记得深度立宪有一个竖写的label.

Answer 1

这样写也能竖起来：
  label1.Caption:='爱'+#13+'我'+#13+'中'+#13+'华';
很有规律可循。

Answer 2

我是这样实现的，把LABEL组件的宽度设为1个汉字的宽度，高度设为要写汉字的个数，在填写Caption时把每个汉字后面加一个回车换行符即可。例如要纵向显示“大家好”，只要把Caption设为“大”+Chr($0d)+Chr($0a)+“家”+Chr($0d)+Chr($0a)+“好”就行了。

Answer 3

竖立的Lable好找，竖立的Memo就难找一点了