1
0
mirror of https://github.com/moparisthebest/Simba synced 2024-11-25 10:42:20 -05:00

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

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.