MouseEnterイベントのTBitBtnフォントスタイル

Question

"BitBtn1"として1つのTBitBtnを持つアプリケーションがあります。最初はBitBtn1のフォントスタイルは「[]」つまりノーマルです。コードが次のような場合：

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

エラーが発生します。 "MouseEnterイベント"で太字のTBitBtnフォントスタイルを変更できるように手伝ってください。

Answer 1

フォントスタイルはセットです。正しい構文を使用すると、たとえば

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

のために、複数のスタイルを適用できるように、それはセットです

BitBtn1.Font.Style := [fsBold]; 

です