GetWindowRect

[Adaz]

Hi kevin,

What did I wrong? PB crashes if I run this:

PlayBASIC Code: [Select]

type RECT
  Left
  Right
  Top
  Bottom
endtype

dim lpRect as RECT

LinkDll "user32.dll"
   GetWindowRect (hwnd, lprect1) alias "GetWindowRect" As integer
EndLinkDll


err=GetWindowRect(getscreenhandle(), lpRect)

print lpRect.Left
print lpRect.Right
print lpRect.Top
print lpRect.Bottom

sync
waitkey

[kevin]

PlayBASIC Code: [Select]

type RECT
  Left
  Right
  Top
  Bottom
endtype

dim lpRect as RECT pointer
lprect = new rect

LinkDll "user32.dll"
   GetWindowRect (hwnd, lprect1) alias "GetWindowRect" As integer
EndLinkDll


err=GetWindowRect(getscreenhandle(), Int(lpRect))

if err

   print lpRect.Left
   print lpRect.Right
   print lpRect.Top
   print lpRect.Bottom
endif

sync
waitkey

[Adaz]

Thank you very much!