FiveTech Support Forums

Hola foro,

Estoy manejando 2 formularios o ventanas. Una tiene el MAIN del programa y el otro es llamado en forma NO MODAL.

Como podria hacer para que cuando el formulario que contiene el MAIN se minimize pueda minimizar los otros formularios abiertos. LO que quiero hacer es algo parecido a lo que se hace cuado el formulario es MDI pero sin utlilizarlos como tal

Atento a sus comentarios

karinha wrote:Podrias poner una imagen para mejor comprender?

Creo que la mejor forma sea usando MDICHILD tipo asi:



saludos.

Mira a ver si te ayuda a implementarlo

viewtopic.php?f=3t=36244start=0hilit=dialog+mdichild

&&&

cnavarro wrote:Mira a ver si te ayuda a implementarlo

viewtopic.php?f=3&t=36244&start=0&hilit=dialog+mdichild

No Modal es, si no no se prodría hacer
Pero, lo has probado?

cnavarro wrote:No Modal es, si no no se prodría hacer
Pero, lo has probado?

nageswaragunupudi wrote:Add this code to the main window, before activating it.

Code (fw): Select all Collapse

   oWnd:bResized  := <|nType|
      local aWnd  := GetAllWin()
      if nType == 1
         AEval( aWnd, { |o| If( o:ClassName == "TWINDOW" .and. o:hWnd != oWnd:hWnd, ;
                            o:Iconize(), nil ) } )
      endif
      return nil
      >

#include "fivewin.ch"

#define AS_DIALOG

function Main()

   local oWnd, oBar, oMenu

   SetGetColorFocus()

   DEFINE WINDOW oWnd MDI TITLE "DIALOG IN WINDOW"
   DEFINE BUTTONBAR oBar OF oWnd SIZE 100,32 2007

   DEFINE BUTTON OF oBar PROMPT "DIALOG"     CENTER ACTION CreateDialog( AS_DIALOG )

   ACTIVATE WINDOW oWnd

return nil


static function CreateDialog( nAs )

   local oDlg

   DEFINE DIALOG oDlg TITLE "DIALOGO" ;
   STYLE nOr( WS_POPUP, WS_VISIBLE, WS_CAPTION, WS_SYSMENU, WS_THICKFRAME,;
                               WS_MINIMIZEBOX )


   ACTIVATE DIALOG oDlg CENTERED NOWAIT

return oDlg

nageswaragunupudi wrote:Non modal resizable dialogs are always minimized when the main window is minimized.
You do not have to write any special code to do that.
Test this program:

Code (fw): Select all Collapse

#include "fivewin.ch"

function TestMin()

   local oWnd, oBar

   DEFINE WINDOW oWnd
   DEFINE BUTTONBAR oBar OF oWnd SIZE 100,32 2007
   DEFINE BUTTON OF oBar PROMPT "Dialog" ACTION OpenDlg()

   oWnd:nWidth    := 800
   oWnd:nHeight   := 600

   ACTIVATE WINDOW oWnd CENTERED

return nil

function OpenDlg()

   local oDlg

   DEFINE DIALOG oDlg RESIZABLE
   ACTIVATE DIALOG oDlg CENTERED NOMODAL

return nil

If the main window is minimized, the non-modal dialog also is minimized.

That is Windows' behavior.
But when the main window is restored, the non-modal dialogs are also restored.

nageswaragunupudi wrote:That is Windows' behavior.
But when the main window is restored, the non-modal dialogs are also restored.