A quick attempt at fixing frame scrolling up with wheel. Not perfect, but better.

This commit is contained in:
Suuper 2015-07-15 15:11:32 -05:00
parent b9865db397
commit 46e8bdeefa
1 changed files with 16 additions and 3 deletions

View File

@ -502,13 +502,26 @@ namespace BizHawk.Client.EmuHawk
if (TasView.RightButtonHeld && TasView.CurrentCell.RowIndex.HasValue)
{
_supressContextMenu = true;
if (e.Delta < 0)
if (GlobalWin.MainForm.IsSeeking)
{
GoToNextFrame();
if (e.Delta < 0)
GlobalWin.MainForm.PauseOnFrame++;
else
{
GlobalWin.MainForm.PauseOnFrame--;
if (Global.Emulator.Frame == GlobalWin.MainForm.PauseOnFrame)
{
GlobalWin.MainForm.PauseEmulator();
GlobalWin.MainForm.PauseOnFrame = null;
}
}
}
else
{
GoToPreviousFrame();
if (e.Delta < 0)
GoToNextFrame();
else
GoToPreviousFrame();
}
}