moparisthebest/Simba
1
0
Fork 0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-22 17:22:21 -05:00
Code Issues Releases Wiki Activity

Make FreeBitmap less verbose

Browse Source
This commit is contained in:
Merlijn Wajer 2010-03-22 12:20:47 +01:00
parent d6c16560d5
commit 4697f46d39
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Units/MMLCore/bitmaps.pas
View File

@ -390,11 +390,11 @@ begin
end; end;
FreeSpots[FreeSpotsHigh] := Number; FreeSpots[FreeSpotsHigh] := Number;
end; end;
//Just for testing purposes { //Just for testing purposes
if ToDestroy.BmpName = '' then if ToDestroy.BmpName = '' then
TClient(Self.Client).Writeln(Format('BMP[%d] has been freed.',[number])) TClient(Self.Client).Writeln(Format('BMP[%d] has been freed.',[number]))
else else
TClient(Self.Client).Writeln(Format('BMP[%s] has been freed.',[ToDestroy.BmpName])); TClient(Self.Client).Writeln(Format('BMP[%s] has been freed.',[ToDestroy.BmpName])); }
ToDestroy.Free; ToDestroy.Free;
BmpArray[number] := nil; BmpArray[number] := nil;
end; end;