SET PROC TO CLSHEAP ADDITIVE DECLARE SHORT GetBitmapDimensionEx IN GDI32 ; INTEGER hBitMap, ; STRING @ lpDIMENSION DECLARE INTEGER GetLastError IN Win32API cDimensionStruc = REPL(CHR(0),8) IF GetBitmapDimensionEx(nhBitMap, @cDimensionStruc) # 0 nXSize = DWORDToNum(LEFT(cDimensionStruc,4)) nYSize = DWORDToNum(RIGHT(cDimensionStruc,4)) ELSE ? 'Error: ' + TRANSFORM(GetLastError()) ENDIFYou'd have gotten nhBitmap as a return value from calling LoadImage() or some other function/object would need to provide it. LoadImage would look something like: