用DrawText的DT_VCenter怎么实现竖排文字居中?(10分)

J

jdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-06

• #1

procedure TForm1.Button1Click(Sender: TObject);<br>var<br>&nbsp; ss:string;<br>&nbsp; re:trect;<br>begin<br>&nbsp; ss:='你好,欢迎光临';<br>&nbsp; re:=rect(5,5,20,500);<br>&nbsp; DrawText(Canvas.handle,pchar(ss),length(ss),re,dt_singleline or dt_vcenter);<br>end;<br>显示还是横的

 

L

lld

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-06

• #2

dt_vcenter控制的是纵向居中，不是竖排

 

J

jdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-06

• #3

那么怎么实现使文字竖排并能够纵向居中呢?

 

S

sygzch

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-07

• #4

procedure TForm1.Button1Click(Sender: TObject);<br>var<br>&nbsp; ss:string;<br>&nbsp; re:trect;<br>begin<br>&nbsp; ss:='你好,欢迎光临';<br>&nbsp; re:=rect(5,5,20,500);<br>&nbsp; DrawText(Canvas.handle,pchar(ss),length(ss),re,DT_WORDBREAK or DT_CENTER);<br>end;<br>

 

L

lld

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-08

• #5

应该从字体的方向、角度方面去考虑

 

J

jdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-11

• #6

多人接受答案了。