ImageSize(integer,integer,integer,integer) Method
A megadott, téglalap alakú grafikus képernyőrészlet tárolásához szükséges memóriaigényt adja meg byteok-ban.
function ImageSize(const X1, Y1, X2, Y2: integer): Int64;
Parameters
- X1
- Type: integer
A téglalap bal felső sarkának X koordinátája.
- Y1
- Type: integer
A téglalap bal felső sarkának Y koordinátája.
- X2
- Type: integer
A téglalap jobb alsó sarkának X koordinátája.
- Y2
- Type: integer
A téglalap jobb alsó sarkának Y koordinátája.
Return Value
Type: Int64
Hiba esetén a visszatérési érték 0.
procedure OffsetImage; var Image: Pointer; Size: integer; begin Size := ImageSize(100, 100, 200, 200); if Size > 0 then begin GetMem(Image, Size); GetImage(100, 100, 200, 200, Image^); PutImage(150, 150, Image^, CopyPut); FreeMem(Image, Size); end; end;