mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-25 18:52:15 -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:
parent
49b18d677a
commit
de0d448ca1
@ -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.
|
||||||
|
Loading…
Reference in New Issue
Block a user