掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
グリッドのスクロールについて (ID：20651)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ありがとうございました。ばっちりでした。 しかし、何故動作するのかよくわからないでいます＾＾； （リンク先のコードは以下です） type T_StringGrid = class(TStringGrid); procedure TForm1.StringGrid1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if T_StringGrid(Sender).FGridState = gsSelecting then T_StringGrid(Sender).FGridState := gsNormal; end; StringGrid1 のプロパティとしては FGridState は未定義となっています。 そこで、Grids ユニットで調べると、以下のように定義されていました。 TCustomGrid = class(TCustomControl) ・・・ protected FGridState: TGridState; ということは、protected で定義されているプロパティは上記の方法で アクセスすればいいということでしょうか？ 長年Delphiを使用していて初めて出くわしたので、驚いています。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.