Q&A
反省してますとのことですので削除しました。
お世話になっております。
今作っているWindowsFormsApplicationで、以下の画像のようにフォームよりも大きなサイズの
panelを配置していて、その中にいくつかのボタンを並べて配置しています。
〇やりたいこと
・panel1のみのスクロールバーを表示して、それをスクロールすることで、
ボタンのみがスクロールされるようにしたい。（panel1外のコントロールはスクロールされない）
・できればスクロールバーのタッチではなく、スマートフォンのように指で「サッ」とスクロールしたい
（WindowsFormsApplicationでこれは実現可能なのでしょうか。）
〇やったこと
・panel1のAutoScrollプロパティはTrue、form1のAutoScrollプロパティはFalse
→panel1にスクロールバーが表示されない。指でスクロールもできない
・panel1のAutoScrollプロパティはFalse、form1のAutoScrollプロパティはTrue
・panel1のAutoScrollプロパティはTrue、form1のAutoScrollプロパティはTrue
→form1だけにスクロールバーが表示される。指でスクロールはできない。
どうすれば目的の動作が実現できるようになるでしょうか。
ご教授いただければ嬉しいです。宜しくお願いします。
情報が不足していれば申し訳ありませんがご指摘願います。
回答2件
0
自己解決
デザイナー上でpanelの幅を超えたところにボタンを動かすことで目的の動作が実現できました。
ご回答ありがとうございました。
投稿2021/03/28 08:12
総合スコア52
0
Panelの AutoScroll が true で AutoSize が False でいけると思うのですが。
追記
以下コードを動かしてみて何かヒントになりますか？
素のProjectでForm1にPanel1を貼って、Panel1上にButton1を１つ置いて、
"Panelの AutoScroll が true で AutoSize が False"の設定のみして実行。
Button1 をClickするたび横幅が伸びて、Form1幅を越えたら水平スクロールバーが自動的に出る。
VB
1 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 2 Dim btnX As New Button 3 btnX.Size = sender.Size 4 btnX.Top = sender.Top 5 btnX.Left = sender.Width * Panel1.Controls.Count + Panel1.Controls(0).Left 6 btnX.Text = sender.Text 7 AddHandler btnX.Click, AddressOf Button1_Click 8 Panel1.Controls.Add(btnX) 9 End Sub
投稿2021/03/27 11:53
編集2021/03/27 12:44
総合スコア496
うまくいかないんですよね、、、。
検証コードを追加してみました。
回答ありがとうございます。
本当にクリックしたら水平スクロールバーがパネルに出ました。
これはform1幅が広すぎるということなんですかね、、、。
”Button1 をClickするたび横幅が伸びて、Form1幅を越えたら水平スクロールバーが自動的に出る。 ”
は不正確な書き方でした。
”Button1 をClickするたび、右端に1個増殖して、Button群全体幅が現状Panel1幅を越えたら、水平スクロールバーが自動的に出る。”で、Form1幅は関係ないですね。
制作中のProjectで"Panelの AutoScroll が true で AutoSize が False"にしてダメなのは、どこかのなにかの設定が邪魔してるということなのかな。もうそれは正常動作しているコードを土台にロジックを段階的に追加していってドコでダメになるかで突き止めるしかないですね。
なるほど。このコードは強制的にpanel1幅を超えさせるものだったということですね。
そうですか、、、一応デフォルトのForm1からpanelとボタンを配置して、プロパティを変えただけだと思っているんですが、正常動作ではないかもしれないのですね。。。
質問と同じデザインなのであれば、ただ単にパネルの大きさが大きいだけでしょう。
AutoScrollははみ出したときにスクロールできるようになりますが、パネルの大きさが大きくてボタンがパネルの大きさからはみ出してないだけじゃないですか？
YamaGNZ様、回答ありがとうございます。
どうやらそんな感じがしますね。。。
FromMZ1500様、ありがとうございました。
あなたの回答
tips
プレビュー
