Изменение шрифта TLabel Delphi на Italic отрубает хвост - почему?

Ниже показана простая демонстрация TLabel по умолчанию с установленным шрифтом Arial Regular 16. enter image description here

Код при нажатии кнопки:

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

Когда вы нажимаете кнопку, последний символ обрезается, а именно:

enter image description here

По умолчанию TLAbel.AutoSize имеет значение true, так что все должно быть в порядке, верно? Это в XE и Delphi 7 то же самое. Это ошибка?

9
задан Brian Frost 26 May 2011 в 15:46
поделиться