... 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: ///////////////////////////////////////////////////////////////////////////////////////////////////////////// ...
... 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)...
... 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", ...
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 ), ...
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