anchor.diff:    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) * 4 + 1);
  -  TrackBar_SpeedPT.ThumbText := 'x' + FloatToStr(fNetworking.NetGameOptions.SpeedPT);
  -
  -  TrackBar_SpeedAfterPT.Position  := Round((fNetworking.NetGameOptions.SpeedAfterPT - 1) * 4 + 1);
  -  TrackBar_SpeedAfterPT.ThumbText := 'x' + FloatToStr(fNetworking.NetGameOptions.SpeedAfterPT);
  +  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;
   
   
  
positive.code: 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);
  
    //Refresh the data to controls
    Lobby_OnGameOptions(nil);
  
negative.code:         TrackBar_LobbyPeacetime.Step := 5; //Round to 5min steps
          TrackBar_LobbyPeacetime.OnChange := GameOptionsChange;
  
          SpeedsCnt := Round((SPEED_MAX_VALUE - 1) / SPEED_STEP) + 1;
  
          TrackBar_SpeedPT := TKMTrackBar.Create(Panel_SetupOptions, 10, 72, 250, 1, SpeedsCnt);
          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, SpeedsCnt);
          TrackBar_SpeedAfterPT.Anchors := [anLeft,anBottom];
          TrackBar_SpeedAfterPT.Caption := gResTexts[TX_LOBBY_GAMESPEED];
          TrackBar_SpeedAfterPT.ThumbWidth := 55; //Enough to fit 'x1.25'
  