Changeset 302
- Timestamp:
- Aug 11, 2019, 11:06:54 AM (5 years ago)
- Location:
- trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/UFormClient.pas
r291 r302 148 148 if Update then FormMove.SpinEditOnce.MaxValue := CellFrom.GetAvialPower + CountOnce 149 149 else FormMove.SpinEditOnce.MaxValue := CellFrom.GetAvialPower; 150 FormMove.TrackBarOnce.Max := FormMove.SpinEditOnce.MaxValue; 150 151 FormMove.SpinEditOnce.Value := CountOnce; 151 FormMove.TrackBarOnce.Max := FormMove.SpinEditOnce.MaxValue;152 152 FormMove.TrackBarOnce.Position := FormMove.SpinEditOnce.Value; 153 153 FormMove.SpinEditRepeat.MaxValue := Client.Game.Map.MaxPower; 154 FormMove.TrackBarRepeat.Max := FormMove.SpinEditRepeat.MaxValue; 154 155 FormMove.SpinEditRepeat.Value := CountRepeat; 155 FormMove.TrackBarRepeat.Max := FormMove.SpinEditRepeat.MaxValue;156 156 FormMove.TrackBarRepeat.Position := FormMove.SpinEditRepeat.Value; 157 157 -
trunk/UPlayer.pas
r300 r302 6 6 7 7 uses 8 Classes, SysUtils, Graphics, UMap, DOM, fgl , XMLConf, UXMLUtils, Math,8 Classes, SysUtils, Graphics, UMap, DOM, fgl2, XMLConf, UXMLUtils, Math, 9 9 UGeometry, UUnit, UNation, UItemList; 10 10 … … 943 943 if not Assigned(CellTo.MapCell.OneUnit) then begin 944 944 CellTo.MapCell.OneUnit := TGame(Game).Units.AddNew(CellFrom.MapCell.OneUnit.Kind, 0); 945 CellTo.MapCell.OneUnit.Player := Self; 945 946 CellTo.MapCell.Player := Self; 946 947 end;
Note:
See TracChangeset
for help on using the changeset viewer.