DBGRIDのスクロール (ID:26467)

名前

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

本文 貼り付けた事からエラーが出始めたと言うことであれば 逆に以下のように付加したものをコメント化するなどして 確認してみたらどうですか？ (他にも何か追加されていれば同じようにコメント化) procedure TFrmSrch.GridMouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean); var Q: TPoint; begin { // コメント with Sender as TDBGrid do begin 〜中略〜 end; Handled := true; } // コメント end;