diff --git a/MainForm.pas b/MainForm.pas
index f241616..5d8f0c9 100644
--- a/MainForm.pas
+++ b/MainForm.pas
@@ -6937,13 +6937,14 @@ begin
   Delta := 1;
   if WheelDelta < 0 then Delta := -1;
 
-  // Квантование (та же логика что в FreqDisplay.ChangeByDigit)
-  Base := (Round(FController.FVfoA) div Step) * Step;
+  // Квантование (та же логика что в FreqDisplay.ChangeByDigit) — от частоты
+  // АКТИВНОГО VFO, а не всегда VFO A.
+  Base := (ActiveVfoFreq div Step) * Step;
   if Delta > 0 then
     NewFreq := Base + Step
   else
   begin
-    if Round(FController.FVfoA) = Base then
+    if ActiveVfoFreq = Base then
       NewFreq := Base - Step
     else
       NewFreq := Base;   // снэп к нижней границе
@@ -6955,7 +6956,10 @@ begin
     NewFreq := Max(0, NewFreq)
   else
     NewFreq := Max(30000, Min(60000000, NewFreq));
-  ApplyVfoA(NewFreq);
+  if FController.FActiveVfo = 0 then
+    ApplyVfoA(NewFreq)
+  else
+    FController.SetVfoB(NewFreq);   // крутим активный VFO B
 
   Handled := True;
 end;