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

Updated testfile

Browse Source 
git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@341 3f818213-9676-44b0-a9b4-5e4c4e03d09d
This commit is contained in:
Raymond 2009-12-26 00:00:27 +00:00
parent 49b18d677a
commit de0d448ca1
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Tests/PS/debugimageform.mufa
View File

@ -1,6 +1,7 @@
program new; program new;
var var
Bmp,x,y : integer; Bmp,x,y : integer;
DebugBmp : integer;
begin begin
Bmp := createbItmap(100,100); Bmp := createbItmap(100,100);
CopyClientToBitmap(Bmp,0,0,99,99); CopyClientToBitmap(Bmp,0,0,99,99);
@ -15,4 +16,6 @@ begin
end; end;
DisplayDebugImgWindow(100,100); DisplayDebugImgWindow(100,100);
DrawBitmapDebugImg(bmp); DrawBitmapDebugImg(bmp);
DebugBMP := GetDebugBitmap;
SaveBitmap(DebugBmp,ScriptPath + 'debugimage.bmp');
end. end.