Стиль шрифта TBitBtn для события MouseEnter

Question

У меня есть приложение, имеющее один TBitBtn как «BitBtn1».Первоначально стиль шрифта BitBtn1 - «[]», т.е. «Нормальный».Если мой код выглядит следующим образом:

procedure TForm00001.BitBtn00003MouseEnter(Sender: TObject);
    begin
      BitBtn1.Font.Style :=fsBold;
    end;

, это дает ошибку.Помогите мне, чтобы я мог изменить стиль шрифта TBitBtn как выделенный жирным шрифтом в «Событии MouseEnter».

Answer 1

Стиль шрифта - это набор. Правильный синтаксис:

BitBtn1.Font.Style := [fsBold];

Это набор, позволяющий применять несколько стилей, например

BitBtn1.Font.Style := [fsBold, fsItalic];