Changeset 7 for trunk/class/mazepainter.pas
- Timestamp:
- Nov 22, 2012, 7:09:17 AM (11 years ago)
- Location:
- trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk
- Property svn:ignore
-
old new 3 3 Lazes.lps 4 4 Lazes.dbg 5 Lazes
-
- Property svn:ignore
-
trunk/class/mazepainter.pas
r6 r7 70 70 constructor TMazePainter.Create(const pMaze: TMaze; pCanvas: TCanvas); 71 71 begin 72 Bmp := TBitMap.Create; 73 72 74 // Init the default drawing width and height 73 75 FCellDrawWidth := 15; … … 91 93 destructor TMazePainter.Destroy; 92 94 begin 93 bmp.Free;95 FreeAndNil(Bmp); 94 96 inherited Destroy; 95 97 end; … … 122 124 if isDirty then 123 125 begin 124 //FreeAndNil(bmp);125 //bmp := TBitMap.Create;126 126 bmp.SetSize(Width + 1, Height + 1); 127 127 Canvas := bmp.Canvas;
Note:
See TracChangeset
for help on using the changeset viewer.