DECLARE SHORT CloseHandle IN Win32API INTEGER DECLARE INTEGER LoadImage IN USER32 ; INTEGER, ; STRING @, ; INTEGER, ; INTEGER, ; INTEGER, ; INTEGER DECLARE INTEGER GetObject IN Win32API AS GetO1 INTEGER, INTEGER, STRING @ hBitMap = LoadImage( 0, GETPICT(), 0, 0, 0, 0x50) && load a bitmap from file default size tbitmap=repl(chr(0),24000) && leaves lots of space for the bitmap ? GetO1(hBitMap,24000,@tbitmap) && read bitmap structure from object SET PROC TO clsheap ? DWORDtoNum(subst(tbitmap,5)), DWORDtoNUM(subst(tbitmap,9)) && pull width, height =CloseHandle(hBitMap)Size is in pixels