掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
StringGridでホマウスイールでスクロールの際、選択セルを固定したままにする方法は？ (ID:49585)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ちょこっと試してみただけで、正しく動作するかわかりませんが・・・ procedure TForm1.StringGrid1MouseWheelDown(Sender: TObject; Shift: TShiftState; MousePos: TPoint; var Handled: Boolean); begin with StringGrid1 do if TopRow < RowCount - VisibleRowCount then TopRow := TopRow + 1; Handled := True; end; procedure TForm1.StringGrid1MouseWheelUp(Sender: TObject; Shift: TShiftState; MousePos: TPoint; var Handled: Boolean); begin with StringGrid1 do if TopRow > FixedRows then TopRow := TopRow - 1; Handled := True; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.