Changeset 145 for trunk/UMap.pas


Ignore:
Timestamp:
Nov 12, 2017, 1:47:20 PM (7 years ago)
Author:
chronos
Message:
  • Modified: Do not create settings form on application start but just if form is opened.
  • Fixed: Removed various compilation warnings.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/UMap.pas

    r101 r145  
    66
    77uses
    8   Classes, SysUtils, UGame, XMLConf, XMLRead, XMLWrite, DOM;
     8  Classes, SysUtils, UGame, XMLRead, XMLWrite, DOM;
    99
    1010type
    … …  
    143143var
    144144  X, Y: Integer;
    145   I: Integer;
    146145  NewCell: TCell;
    147146  PX, PY: Double;
    … …  
    237236  Reverse: Boolean): TPointArray;
    238237begin
    239 
     238  SetLength(Result, 0);
    240239end;
    241240
    … …  
    243242var
    244243  X, Y: Integer;
    245   I, J, PI: Integer;
    246   V, VN: Integer;
    247244  NewCell: TCell;
    248   Pos: TPoint;
    249245begin
    250246  // Free previous
Note: See TracChangeset for help on using the changeset viewer.