Z
zfmich
Unregistered / Unconfirmed
GUEST, unregistred user!
在用MESSAGEBOX时,如果提示语有多行的话,为什么用后补空格的问题不能使字符串对齐?具体见下所示:<br><br>var<br> s1, s2, s :string<br>begin<br> s1 := '第一' ; s2 := '第二行' ;<br><br> s := s1 + StringOfChar(' ', 20 - Length(s1)) + '88' + #13#10 +<br> s2 + StringOfChar(' ', 20 - Length(s2)) + '99' ;<br> Application.MessageBox(pChar(s), '', 0) ;<br>end ;<br><br>用上述方法为什么总是不能对齐,请问这是字体的缘故?还是PCHAR变量存放引起的?谢谢!<br>