FIX: SetFocus to activeframe after next\prev tab commands

foptions.pas

@@ -966,7 +966,7 @@ begin
          end
        else
          begin
-            Brush.Color := cbBackColor1.Color;
+            Brush.Color := cbBackColor.Color;
             Font.Color := cbMarkColor.Color;
             sText := 'Mark';
          end;

uacts.pas

@@ -591,6 +591,7 @@ with frmMain do
                  nbRight.PageIndex:=nbRight.PageIndex+1;
              end;
     end;
+   ActiveFrame.SetFocus;
   end;
 end;
 
@@ -613,6 +614,7 @@ with frmMain do
                  nbRight.PageIndex:=nbRight.PageIndex-1;
              end;
     end;
+  ActiveFrame.SetFocus;
   end;
 end;