FontItalic(Labelなど)

FontItalicプロパティはフォントを斜体にします。Delphiでは TFontクラスの「Style」プロパティで設定しますが, このプロパティは集合型です。太字は Styleプロパティに fsItalicを追加します。解除する場合は fsItalicを取り除きます。

■ TLabelを斜体にする例

procedure TForm1.Button3Click(Sender: TObject); begin {スタイルに斜体が指定されているか？} if fsItalic in Label1.Font.Style then begin {スタイルから斜体だけを解除する} Label1.Font.Style := Label1.Font.Style - [fsItalic]; end else begin {スタイルに斜体を設定する} Label1.Font.Style := Label1.Font.Style + [fsItalic]; end; end;