Re[2]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい

DOBON.NETプログラミング道掲示板

■35351 / 2階層)

　TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい

□投稿者/ 魔界の仮面弁士大御所(1526回)-(2023/01/25(Wed) 20:54:52)

■No35350に追記(魔界の仮面弁士の記事)
> サンプルを書いてみました。
> https://gist.github.com/Benshi/0042cb7b23ca310181bff15c4c3a0042

上記実装を追加検証してみましたが、まだまだ不具合がありますね。

(1) スクロールバーを押しっぱなしにしていると、
　終端に到達した後も Scroll イベントが発生し続けます。

(2) 折りたたまれたノードを選択した状態で、そのノードを
上側のスクロール領域外にし、そこで[→]あるいは[Num *]を押して
ノードを展開した場合に、スクロールされるのにイベントが通知されません。

各種パターンに追従させるのも面倒ですね…。

こうなると、TopNode を Timer 監視した方が手っ取り早そうです。
垂直スクロールしか検出できないですけれどね。

Public Class Form1
　　Public Event TreeViewScroll As EventHandler

　　Private Sub Form1_TreeViewScroll(sender As Object, e As EventArgs) Handles Me.TreeViewScroll
　　　　'ListBox1.Items.Insert(0, "Scrolled at " & Now.ToString("HH:mm:ss.fff"))
　　End Sub

　　Private topNode As TreeNode = Nothing
　　Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
　　　　If TreeView1.TopNode IsNot Nothing Then
　　　　　　If topNode IsNot TreeView1.TopNode Then
　　　　　　　　topNode = TreeView1.TopNode
　　　　　　　　RaiseEvent TreeViewScroll(TreeView1, EventArgs.Empty)
　　　　　　End If
　　　　End If
　　End Sub
　　Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
　　　　Timer1.Interval = 150
　　　　Timer1.Start()
　　End Sub
End Class

あるいは、無理にスクロールを同期させようとするのではなく、
No35346 の TreeGridView のように、最初から
「ツリー表示対応のグリッドコントロール」を用いるとか。

なお、先に例示したものとは別実装のツリー対応グリッドを探したところ、
Eto.Forms の TreeGridView というのが見つかりました。
https://github.com/picoe/Eto
https://www.nuget.org/packages/Eto.Forms
https://mokake.hatenablog.com/entry/2017/01/31/184421

ただし Eto.Forms は、.NET Framework 3.5 には対応していないようです。
一応バージョン 2.3.0 以下であれば、.NET Framework 4 対応らしいので、
ギリギリ VB2010 でも動かせるかもしれませんが…。(未確認)

違反を報告

上記関連ツリー
前の記事(元になった記事)	次の記事(この記事の返信)
←Re[1]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい /魔界の仮面弁士	→Re[3]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい /炎の妖精さん →Re[3]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい /炎の妖精さん
TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい / 炎の妖精さん (23/01/25(Wed) 13:50) #35349
`└` Re[1]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい / 魔界の仮面弁士 (23/01/25(Wed) 17:59) #35350
`└` TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい / 魔界の仮面弁士 (23/01/25(Wed) 20:54) #35351 ←Now
`├` Re[3]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい / 炎の妖精さん (23/01/26(Thu) 13:57) #35353 解決済み!
`└` Re[3]: TreeViewとDataGridViewのスクロールを同期(シンクロ)させたい / 炎の妖精さん (23/01/26(Thu) 10:37) #35352 解決済み!
上記ツリーを一括表示 / 上記ツリーをトピック表示
上記の記事へ返信

入力内容にタグは利用できません。
引用部分（行頭に「>」や「■」が付いている部分）が全体の 80% 以上のコメントは投稿できません。

半角カナは使用しないでください。文字化けの原因になります。
削除キーを覚えておくと、自分の記事の編集・削除ができます。
記事中に No*** のように書くとその記事にリンクされます(No は半角英字/*** は半角数字)。
- 使用例)
- No123 → 記事No123の記事リンクになります(指定表示)。
- No123,130,134 → 記事No123/130/134 の記事リンクになります(複数表示)。
- No123-130 → 記事No123～130 の記事リンクになります(連続表示)。

投稿前に必ずお読みください

初めて投稿される方は、必ず「書き込みのルールについて（12/4/2更新）」をお読みください。読むのが面倒、ルールを守りたくないという方は、「お気楽掲示板」へ投稿してください。
質問を投稿する場合は、「質問をする際のアドバイス」を参考にしてください。
投稿は、明記のない限り、パブリックドメインになります。
マルチポストされた投稿を報告する時は匿名で投稿し、マルチポストされている場所を併記してください。以下のリンクをクリックしていただくと、自動で下のフォームが埋まりますので、その後「送信」ボタンを押してご投稿ください。
- マルチポストの報告をする
- マルチポストの報告をするが、マルチポスト先の投稿が嫌がらせである（元の投稿者とは別人が行なっている）可能性が高い（投稿日時に開きがあり、こちらの投稿の方が早い場合は、その可能性が高いです）

Name	/
E-Mail	/
Title	/
URL	/
Comment/ 通常モード->　図表モード-> (適当に改行して下さい/半角10000文字以内) ■No35351に返信(魔界の仮面弁士さんの記事) > ■No35350に追記(魔界の仮面弁士の記事) >>サンプルを書いてみました。 >>https://gist.github.com/Benshi/0042cb7b23ca310181bff15c4c3a0042 > > 上記実装を追加検証してみましたが、まだまだ不具合がありますね。 > > (1) スクロールバーを押しっぱなしにしていると、 > 　終端に到達した後も Scroll イベントが発生し続けます。 > > (2) 折りたたまれたノードを選択した状態で、そのノードを > 上側のスクロール領域外にし、そこで[→]あるいは[Num *]を押して > ノードを展開した場合に、スクロールされるのにイベントが通知されません。 > > > 各種パターンに追従させるのも面倒ですね…。 > > こうなると、TopNode を Timer 監視した方が手っ取り早そうです。 > 垂直スクロールしか検出できないですけれどね。 > > Public Class Form1 > 　　Public Event TreeViewScroll As EventHandler > > 　　Private Sub Form1_TreeViewScroll(sender As Object, e As EventArgs) Handles Me.TreeViewScroll > 　　　　'ListBox1.Items.Insert(0, "Scrolled at " & Now.ToString("HH:mm:ss.fff")) > 　　End Sub > > 　　Private topNode As TreeNode = Nothing > 　　Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick > 　　　　If TreeView1.TopNode IsNot Nothing Then > 　　　　　　If topNode IsNot TreeView1.TopNode Then > 　　　　　　　　topNode = TreeView1.TopNode > 　　　　　　　　RaiseEvent TreeViewScroll(TreeView1, EventArgs.Empty) > 　　　　　　End If > 　　　　End If > 　　End Sub > 　　Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load > 　　　　Timer1.Interval = 150 > 　　　　Timer1.Start() > 　　End Sub > End Class > > > あるいは、無理にスクロールを同期させようとするのではなく、 > No35346 の TreeGridView のように、最初から > 「ツリー表示対応のグリッドコントロール」を用いるとか。 > > > なお、先に例示したものとは別実装のツリー対応グリッドを探したところ、 > Eto.Forms の TreeGridView というのが見つかりました。 > https://github.com/picoe/Eto > https://www.nuget.org/packages/Eto.Forms > https://mokake.hatenablog.com/entry/2017/01/31/184421 > > ただし Eto.Forms は、.NET Framework 3.5 には対応していないようです。 > 一応バージョン 2.3.0 以下であれば、.NET Framework 4 対応らしいので、 > ギリギリ VB2010 でも動かせるかもしれませんが…。(未確認)
File	/ アップ可能拡張子=> /.gif/.jpg/.png/.zip 1) 太字の拡張子は画像として認識されます。 2) 画像は初期状態で縮小サイズ250×250ピクセル以下で表示されます。 3) 同名ファイルがある、またはファイル名が不適切な場合、　　ファイル名が自動変更されます。 4) アップ可能ファイルサイズは1回20KB(1KB=1024Bytes)までです。 5) ファイルアップ時はプレビューは利用できません。 6) スレッド内の合計ファイルサイズ:[0/300KB] 残り:[300KB]
Icon	/ (画像を選択/サンプル一覧)
削除キー	/ (半角8文字以内)
解決済み! BOX/ 解決したらチェックしてください!（スレッドを閉じる目的ではチェックしないでください!）
クリエイティブ・コモンズ・ライセンスを Comment の末尾に挿入するには、以下のリンクをクリックしてください。（Javascript で挿入しているだけです。）表示（CC BY） \| 表示-改変禁止（CC BY-ND） \| 表示-継承（CC BY-SA） \| 表示-非営利（CC BY-NC） \| 表示-非営利-改変禁止（CC BY-NC-ND） \| 表示-非営利-継承（CC BY-NC-SA）
プレビュー/　クッキーに保存しない/