Question

如何实现label里面的字体竖着？（delphi）

如何实现label里面的字体竖着？

Answer 1

5月8日 15:28 因为这里使用了with语句。

With语句是一种用于简化代码的语句。如你要访问一个记录类型变量（或一个对象），用With语句就不必每次重复变量的名字。例如对于以下的记录类型代码：

type
Date = record
Year: Integer;
Month: Byte;
Day: Byte;
end;

var
BirthDay: Date;

begin
BirthDay.Year := 1997;
BirthDay.Month := 2;
BirthDay.Day := 14;

可以用with语句改进后半部分代码，如下：

begin
with BirthDay do
begin
Year := 1995;
Month := 2;
Day := 14;
end;

在Delphi程序中，这种方法能用于访问控件和类变量。