Page 1 of 1

Tasktray "minimize" -> ShowWindow(hWndDlg, SW_RESTORE) ?

Posted: Tue Mar 15, 2022 8:33 pm
by AUGE_OHR
hi,

i do use

Code: Select all

   ON NOTIFYCLICK HideShow()
to "minimize" App to Tray-Icon only

but App itself have

Code: Select all

   ON MINIMIZE nil // HideShow() ;
when click on upper right of App to "minimize" it will not show "normal" again
it will show Icon in Tasklist and SW_NORMAL or SW_RESTORE seems not to work :?:

so how can i modify this Code ... need Idea :idea:

Code: Select all

STATIC PROCEDURE HideShow()
LOCAL cTitle  := "IPTV " + cVersion
LOCAL hWndDlg := getproperty( 'IPTVMAIN', 'handle' )

   IF IsWindowVisible( GetFormHandle( "IPTVMAIN" ) )
*      ShowWindow(hWndDlg, SW_HIDE)
      DoMethod( "IPTVMAIN", "Hide" )
   ELSE
      DoMethod( "IPTVMAIN", "Show" )
*      ShowWindow(hWndDlg, SW_RESTORE)      
      ShowWindow(hWndDlg, SW_NORMAL)
   ENDIF
RETURN

Re: Tasktray "minimize" -> ShowWindow(hWndDlg, SW_RESTORE) ?

Posted: Tue Mar 15, 2022 9:50 pm
by andyglezl
Maybe...

Code: Select all

IF IsWindowVisible( GetFormHandle( "IPTVMAIN" ) )
	IPTVMAIN.Minimize
ELSE
	IPTVMAIN.Restore
ENDIF