RichEdit の表示について (ID:17266)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 画面上のRichEditで現在何行表示されているのか。 を求める方法がわからないのですが //画面表示されている一番上のIndexを求める function GetTopIndex: Integer; begin Result := RichEdit.Perform(EM_GETFIRSTVISIBLELINE, 0, 0); end; //画面最上位表示される行を指定してスクロール procedure SetTopIndex(const Value: Integer); var LineCount: Integer; begin LineCount := Value - GetTopIndex; //差を求めてスクロール RichEdit.Perform(EM_LINESCROLL,0,LineCount); end; これで、行数を数値指定して その行をRichEditの一番上(もしくは数行下)に表示 はできると思います。 ご参考にどうぞ