0

Word、ブラウザー、その他の多くのアプリケーションと同様に、パネルの表示領域を超えてオブジェクトをドラッグするときに、パネルのコンテンツを上下にスクロールするにはどうすればよいでしょうか?

これは私が探しているものに最も近いものですが、まだ完全ではありません。

private void Werkorders_DragOver(object sender, DragEventArgs e)
{
    grpWerkorders.AutoScrollPosition = grpWerkorders.PointToClient(new Point(e.X, e.Y));
}
4

1 に答える 1

1

これは、WinForms タイマーで実行できます。コード例:

private Timer scrollTimer = new Timer();
private int scrollJump = 0;

public Form1() {
  InitializeComponent();
  panel1.AllowDrop = true;
  panel1.AutoScroll = false;
  panel1.AutoScrollMinSize = new Size(0, 1000);
  panel1.MouseMove += panel1_MouseMove;
  panel1.DragEnter += panel1_DragEnter;
  panel1.DragOver += panel1_DragOver;
  panel1.QueryContinueDrag += panel1_QueryContinueDrag;
  scrollTimer.Tick += scrollTimer_Tick;
}

ドラッグ イベント:

void panel1_MouseMove(object sender, MouseEventArgs e) {
  if (e.Button == MouseButtons.Left) {
    panel1.DoDragDrop("test", DragDropEffects.Move);
  }
}

void panel1_DragEnter(object sender, DragEventArgs e) {
  e.Effect = DragDropEffects.Move;
}

void panel1_DragOver(object sender, DragEventArgs e) {
  Point p = panel1.PointToClient(new Point(e.X, e.Y));
  if (p.Y < 16) {
    scrollJump = -20;
    if (!scrollTimer.Enabled) {
      scrollTimer.Start();
    }
  } else if (p.Y > panel1.ClientSize.Height - 16) {
    scrollJump = 20;
    if (!scrollTimer.Enabled) {
      scrollTimer.Start();
    }
  } else {
    if (scrollTimer.Enabled) {
      scrollTimer.Stop();
    }
  }
}

void panel1_QueryContinueDrag(object sender, QueryContinueDragEventArgs e) {
  if (e.Action != DragAction.Continue) {
    scrollTimer.Stop();
  }
}

タイマーコード:

void scrollTimer_Tick(object sender, EventArgs e) {
  if (panel1.ClientRectangle.Contains(panel1.PointToClient(MousePosition))) {
    Point p = panel1.AutoScrollPosition;
    panel1.AutoScrollPosition = new Point(-p.X, -p.Y + scrollJump);
  } else {
    scrollTimer.Stop();
  }
}

scrollJump 値を調整して、スクロールバーの変化量を増減したり、タイマーの間隔量を調整したりできます。デフォルトは 100 ミリ秒です。

于 2014-02-28T19:57:17.460 に答える