RichEditを透明にした場合のスクロールバーを表示 (ID:40099)

名前

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

本文 with RichEdit1 do begin BorderStyle := bsNone; ScrollBars := ssBoth; HideScrollBars := False; Brush.Style := BsClear; SetWindowLong(Handle, GWL_EXSTYLE, WS_EX_TRANSPARENT); end; 上記コードでRichEditの背景を透明にして使っていますが、 スクロールバーまで消えてしまい、スクロールバーのある位置にカーソルを 持っていくと、現れます。 スクロールバーのみ表示したまま背景を透明にするか、 スクロールバーごと透明にした後に、スクロールバーだけ再絵画したいと 思うのですが、思うようにいかないものでｗ 何か良い手はないものでしょうか？ Windows 7 + Delphi 2010 です。 よろしくお願いします。