moparisthebest
/
Simba
mirror of https://github.com/moparisthebest/Simba
1
0
Fork 0
Code Issues Releases Wiki Activity

Updated testfile 

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