FiveTech Software tech support forums

... que tenían los diálogos" al momento en que se minimiza la pantalla principal: oPublic:oVentPrin:bResized := { || Iif( !oPublic:oVentPrin:IsIconic(), oPublic:oDoIt:oChat:RestauraDlg(), NIL ) } y el método quedó asi: ///////////////////////////////////////////////////////////////////////////////////////////////////////////// ...

... el efecto: ///////////////////////////////////////////////////////////////////////////////////////////////// FUNCTION Parpadeo( oWnd ) If oWnd:IsIconic() .and. oWnd:lNewMsg FlashWnd( oWnd:hWnd, 1 ) Tone( 2000, .1 ) else oWnd:lNewMsg := .F. EndIf Return .T. //////////////////////////////////////////////////////////////////////////////// ...

... Another solution with the same effect. FUNCTION TOP_CLOSE(nType) hWnd := FindWnd( "Keeping at top" ) // Title !!! IF hWnd != NIL IF ISICONIC( hWnd ) SHOWWINDOW( hWnd, SW_RESTORE ) ENDIF IF nType = 1 SETFOREGROUNDWINDOW( hWnd ) ENDIF IF nType = 2 SENDMESSAGE( hWnd, WM_CLOSE ) ENDIF ...

Antonio buenos dias, gracias por la ayuda Agrego la VM.LIB (xharbour), y me manda estos errorres :( :( Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex)...

... 2 #define SW_RESTORE 9 ,,, ,,, FUNCTION TOP_CLOSE(nType) hWnd := FindWnd( "COLOR-PICKER 1.1" ) // Title !!! IF hWnd != NIL IF ISICONIC( hWnd ) SHOWWINDOW( hWnd, SW_RESTORE ) ENDIF IF nType = 1 SETFOREGROUNDWINDOW( hWnd ) ENDIF IF nType = 2 SENDMESSAGE( hWnd, WM_CLOSE ) ENDIF ...

... Exe... MsgBox( "El programa " + APP_TITLE + " ya esta siendo ejecutado!" ) hWnd := FindWindow( APP_TITLE ) IF hWnd > 0 IF IsIconic( hWnd ) Restore( hWnd ) ELSE SetForeGroundWindow( hWnd ) ENDIF ELSE * MsgStop( "No es possible encontrar el programa !", "Error", ...

...  WINDOW.PRG      769 ISCHILD()              (function  in ?)    WINDOW.PRG     3142 ISDERIVEDFROM()        (function  in ?)    WINDOW.PRG     2074 ISICONIC()             (function  in ?)    WINDOW.PRG      659   659   754  2913 ISKINDOF()             (function  in ?)    WINDOW.PRG     2140  2614 ...

Marco


change by IsIconic( oDlg:hWnd )

... bytes Time from start: 0 hours 0 mins 2 secs Error occurred at: 07/10/11, 13:33:51 Error description: Warning BASE/1004 Message not found: TDIALOG:ISICONIC Args: 11/09/2009 10:15 543 readme.txt 29/09/2009 16:34 423.424 Fivehc.lib 18/10/2009 08:20 716.296 Fivehcm.lib 26/10/2009 07:47 1.880.576 Fiveh.lib ...

... = IDOK oWnd:Iconize() ELSE oWnd:end() ENDIF RETURN NIL FUNCTION RESIZE_DLG() oDlg:end( IDOK ) RETURN NIL FUNCTION RESIZE_WND() IF .NOT. IsIconic( oWnd:hWnd ) dialogo() ENDIF RETURN NIL

Not
IsIconic( oWnd )
It should be
IsIconic( oWnd:hWnd )

Anser, IF you run this sample You never listen the sharp sound (IsIconic) #include "Fivewin.ch" REQUEST HB_GT_GUI_DEFAULT FUNCTION MAIN() LOCAL oWnd DEFINE WINDOW oWnd FROM 100 , 100 TO 500 , 500 PIXEL oWnd:bResized = { || IIF(IsIconic( oWnd ), ...

How can I test iconized state OF a Dialog or Window?

IsIconic( <hWnd> ) –> lIconic

The below given fuction may also be useful for you.

To check whether a Window is in maximised state or not
IsZoomed( <hWnd> ) –> lMaximized

Regards
Anser

Sorry, when I changed the search I found IsIconic( oWnd:hWnd ) IsZoomed( oWnd:hWnd ) http://forums.fivetechsupport.com/viewtopic.php?f=3&t=17990&p=94046&hilit=window+minimized#p94046 http://forums.fivetechsupport.com/viewtopic.php?f=6&t=4848&p=21415&hilit=window+minimized#p21415

Lailton

IsZoomed( hWnd )
IsIconic( hWnd )