SelFontSize(RichTextなど)

SelFontSizeプロパティは選択しているテキストのフォントサイズを取得, または設定します。Delphiでは 「SelAttributes」プロパティ(TTextAttributes型)の 「Size」プロパティで設定可能です。(RichEditの Font.Charsetプロパティを DEFAULT_CHARSETに設定すると英字のフォントも設定可能になります。)

■ TRichEditのフォントサイズを設定する例

procedure TForm1.TrackBar1Change(Sender: TObject); begin {フォントサイズを変更する} RichEdit1.SelAttributes.Size := TrackBar1.Position; end;