Changeset 25 for trunk/UFormMain.pas
- Timestamp:
- Mar 3, 2014, 12:42:16 AM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/UFormMain.pas
r23 r25 73 73 procedure TFormMain.PaintBox1Paint(Sender: TObject); 74 74 begin 75 if Core.Game.Running then 75 //if Core.Game.Running then 76 if Assigned(Core.Game.CurrentPlayer) then 76 77 with Core.Game.CurrentPlayer do begin 77 78 View.DestRect := Bounds(0, 0, PaintBox1.Width, PaintBox1.Height);
Note:
See TracChangeset
for help on using the changeset viewer.