anchor.diff:  begin
     //Update the game options
     fNetworking.UpdateGameOptions(EnsureRange(TrackBar_LobbyPeacetime.Position, 0, 300),
  -                                (TrackBar_SpeedPT.Position - 1) / 4 + 1,
  -                                (TrackBar_SpeedAfterPT.Position - 1) / 4 + 1);
  +                                (TrackBar_SpeedPT.Position - 1) * SPEED_STEP + 1,
  +                                (TrackBar_SpeedAfterPT.Position - 1) * SPEED_STEP + 1);
   
     //Refresh the data to controls
     Lobby_OnGameOptions(nil);
  
positive.code:         TrackBar_LobbyPeacetime.Step := 5; //Round to 5min steps
          TrackBar_LobbyPeacetime.OnChange := GameOptionsChange;
  
          TrackBar_SpeedPT := TKMTrackBar.Create(Panel_SetupOptions, 10, 72, 250, 1, 5);
          TrackBar_SpeedPT.Anchors := [anLeft,anBottom];
          TrackBar_SpeedPT.Caption := gResTexts[TX_LOBBY_GAMESPEED_PEACETIME];
          TrackBar_SpeedPT.ThumbWidth := 55; //Enough to fit 'x1.25'
          TrackBar_SpeedPT.OnChange := GameOptionsChange;
  
          TrackBar_SpeedAfterPT := TKMTrackBar.Create(Panel_SetupOptions, 10, 116, 250, 1, 5);
          TrackBar_SpeedAfterPT.Anchors := [anLeft,anBottom];
          TrackBar_SpeedAfterPT.Caption := gResTexts[TX_LOBBY_GAMESPEED];
          TrackBar_SpeedAfterPT.ThumbWidth := 55; //Enough to fit 'x1.25'
  
negative.code:   TrackBar_LobbyPeacetime.Position := fNetworking.NetGameOptions.Peacetime;
  
    TrackBar_SpeedPT.Enabled   := (TrackBar_LobbyPeacetime.Position > 0) and TrackBar_SpeedAfterPT.Enabled;
    TrackBar_SpeedPT.Position  := Round((fNetworking.NetGameOptions.SpeedPT - 1) / SPEED_STEP) + 1;
    TrackBar_SpeedPT.ThumbText := 'x' + FormatFloat('##0.##', fNetworking.NetGameOptions.SpeedPT);
  
    TrackBar_SpeedAfterPT.Position  := Round((fNetworking.NetGameOptions.SpeedAfterPT - 1) / SPEED_STEP) + 1;
    TrackBar_SpeedAfterPT.ThumbText := 'x' + FormatFloat('##0.##', fNetworking.NetGameOptions.SpeedAfterPT);
  end;
  
  
  