IonicWind Software


$INCLUDE "windows.inc"
windowÂÃ,  w1
OPENWINDOW w1,0,0,250,150,@MINBOX|@MAXBOX|@SIZE,NULL,"Simple Window",&proc

openconsole
WAITUNTIL w1 = NULL
END

SUB proc()
ÂÃ,  ÂÃ,  ÂÃ,  SELECT @class
CASE WM_ACTIVATEÂÃ,  ÂÃ, 
SELECT @wparam
case WA_CLICKACTIVE
print "-Active"
case WA_ACTIVE
print "-Active"

case WA_INACTIVE
print "-Inactive"
ENDSELECT

ÂÃ,  ÂÃ,  ÂÃ,  ÂÃ,  ÂÃ, CASE @IDCLOSEWINDOW
CLOSEWINDOW w1
closeconsole
end
ÂÃ,  ÂÃ,  ÂÃ,  ENDSELECT
ÂÃ,  ÂÃ, RETURN
ENDSUB


which is the best way to be also notified if my window is minimized ?

select @class
      case @IDSIZECHANGED
            if @wparam = 1
                   'window was minimized
            endif
....

Thank you Paul
i solved it like thisÂÃ,  i put afterÂÃ,  SELECT @class

CASE @IDSIZE
ÂÃ,  if _IsIconic(w1.hwnd) then
ÂÃ,  ÂÃ,  print "-Inactive,Minimized"
ÂÃ,  else
ÂÃ,  ÂÃ,  print "-Active,original size"
ÂÃ,  endif


i test it also with @IDSIZECHANGED