changeset 3055 | f542a36ef6c0 |
parent 3048 | 755f484d0f62 |
child 3058 | 2ebc20485344 |
3054:3b6b57d8b7cd | 3055:f542a36ef6c0 |
---|---|
855 end; |
855 end; |
856 |
856 |
857 procedure initModule; |
857 procedure initModule; |
858 begin |
858 begin |
859 LandBackSurface:= nil; |
859 LandBackSurface:= nil; |
860 FillChar(LandPixels, sizeof(TLandArray), 0); |
|
860 end; |
861 end; |
861 |
862 |
862 procedure freeModule; |
863 procedure freeModule; |
863 begin |
864 begin |
864 FillChar(LandPixels, sizeof(TLandArray), 0) |
865 |
865 end; |
866 end; |
866 |
867 |
867 end. |
868 end. |