topic-15373

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Dialog
Posted: Thu Apr 23, 2009 10:04 PM

Estimados

Se puede hacer que en una Dialog se pueda minimizar cuando se presione en su ventana principal, sin ser MDI

Necesito ya que aveces uno requiere minimizar y no se puede ya que existe el dialogo, y hay que presionar el boton escritorio, pero este minimiza todo

ejemplo

Code (fw): Select all Collapse

    DEFINE WINDOW _oWnd TITLE "Ventana principal"                               ;
        COLOR Rgb( 130, 130, 130 ), Rgb( 130, 130, 130 )                    ;
        MENU BuildMenu()                                                                ;
        MENUINFO 2                                                                      ;
        ICON oIco                                                                       ;
        MDI

    ACTIVATE WINDOW _oWnd MAXIMIZED                                     


static function BuildMenu()
    local oMenu

    MENU oMenu  2007
        MENUITEM "&Administración" ACTION xFuncion()
    ENDMENU

return( oMenu )


function xFuncion()
local oAbt
DEFINE DIALOG oAbt TITLE "Acerca de..." RESOURCE "ABOUT"
ACTIVATE DIALOG oAbt CENTERED
return( nil )

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

wmormar

Posts: 1076

Joined: Fri Oct 07, 2005 10:41 PM

Re: Dialog
Posted: Fri Apr 24, 2009 03:21 AM

Patricio,

Se puede hacer que se minimize el dialogo, pero con eso no dejará hagas otra cosa en la ventana principal.

O hacerlo de la siguiente manera:

Code (fw): Select all Collapse

    DEFINE WINDOW _oWnd TITLE "Ventana principal"                               ;
        COLOR Rgb( 130, 130, 130 ), Rgb( 130, 130, 130 )                    ;
        MENU BuildMenu()                                                                ;
        MENUINFO 2                                                                      ;
        ICON oIco                                                                       ;
        MDI

    ACTIVATE WINDOW _oWnd MAXIMIZED                                     


static function BuildMenu()
    local oMenu

    MENU oMenu  2007
        MENUITEM "&Administración" ACTION xFuncion()
    ENDMENU

return( oMenu )


function xFuncion()
local oAbt
DEFINE DIALOG oAbt TITLE "Acerca de..." RESOURCE "ABOUT"
ACTIVATE DIALOG oAbt CENTERED NOWAIT
return( nil )

William, Morales

Saludos

méxico.sureste

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Re: Dialog
Posted: Fri Apr 24, 2009 01:34 PM

Gracias por responder

funciona con la opcion NOWAIT, pero este puede entrar a otros módulos, lo cual no quiero, solo que pueda minimizar

se podra hacer sin la opcion NOWAIT, una vez lei algo de "parent", pero no logro ubicarlo

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

FiveTech Support Forums

Continue the discussion