delphi - TMemoまたはTRichEditコンポーネントにIntelliMouseサポートを追加する

Question

TMemoまたはTRichEditコンポーネントにIntelliMouseサポートを追加する方法

DelphiXEを使用しています

Answer 1

ScrollBarsプロパティをssHorizo​​ntal、ssVerticalに設定するか、ユニットをプロジェクトにssBoth 追加する必要があります。IMouse

アップデート

ユニットによって引き起こされるメモリリークを回避するには、IMouseアプリケーションを終了する前にこのコードを追加する必要があります（たとえば、finalizationメインユニットの一部で）。

  if Assigned(Mouse.PanningWindow) then
    Mouse.PanningWindow := nil;