下面显示了默认TLabel的简单演示,其字体设置为Arial Regular 16。

单击该按钮时的代码为:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Font.Style := Label1.Font.Style + [fsItalic];
end;

当您单击按钮时,最后一个字符被截断,即:

默认情况下,TLAbel.AutoSize为true,所以应该可以,对吧?这在XE和Delphi 7中是相同的。这是一个错误吗?

最佳答案

最后,有一个额外的空间可以快速解决此问题。

10-05 22:25