Dialog NOWAIT does not go to background

[reinaldocrespo]

Hi.

When a dialog is activated with the NOWAIT clause, it always stays on the foreground even if it looses focus. How can I make the dialog go to the background when it looses focus?

Thank you,


Reinaldo.

[ukoenig]

Reinaldo,

You can use oDlg:Hide() and oDlg:Show()
I use it, to switch between Window- and Dialog-preview :
Maybe there is still another possible Solution, but it works fine for me.

// Shows the hidden Dialog from a Main-window-action ( Button )

...
...
DEFINE WINDOW oWnd ;
TITLE 'Background-, Title-, xBrowse-, Logo-, Border- and Font-editor => Release 1.1 / June 2011'

@ nSHeight - 130, nSWidth - 260 BTNBMP oBtn1 OF oWnd ;
SIZE 100, 50 PIXEL 2007 ;
NOBORDER ;
PROMPT " &Tools" ;
FILENAME c_path + "\Bitmaps\Select.Bmp" ;
ACTION oDlg:Show() ;
FONT oFont1 ;
LEFT
oBtn1:lTransparent := .t.
oBtn1:cToolTip = { "Exit " + CRLF + "Title and Border","EXIT", 1, CLR_BLACK, 14089979 }
oBtn1:SetColor( 0, )

...
...
// The Main-window is visible
// The Dialog is called ON INIT, oDlg is defined in the Main-window

ACTIVATE WINDOW oWnd MAXIMIZED ;
ON INIT ( WND_BRUSH( nWStyle, lWGrad, nWColorF, nWColorB, nWPos, cWBrush, cWImage ) , ;
SHOW_DLG(oDlg) , oDlg:Hide() ) ;
ON PAINT ( ABPaint( hDC, 50, 50, oLogo, 255 ), ;
NEW_LOGO(hDC) )

oLogo:End()
oWndLogo:End()
oFont1:End()
oBrwFont:End()
oTitleFont:End()

RETURN NIL

// -----

FUNCTION SHOW_DLG(oDlg)
Local oBtn1, oBtn2

DEFINE DIALOG oDlg SIZE 950, 600 OF oWnd PIXEL TRANSPARENT ;
FONT oFont1 TITLE 'Title- / xBrowse- and Border-painter'
...
...
...
// Hide the Dialog and show the Main-window

@ 265, 355 BTNBMP oBtn1 OF oDlg ;
SIZE 60, 30 PIXEL 2007 ;
NOBORDER ;
PROMPT " &Close" + CRLF + " Painter" ;
FILENAME c_path + "\Bitmaps\Quit.Bmp" ;
ACTION ( oDlg:Hide(),oWnd:Refresh() ) ;
FONT oFont1 ;
LEFT
oBtn1:lTransparent := .t.
oBtn1:cToolTip = { "Switch to " + CRLF + "Main-window","SWITCH-Preview", 1, CLR_BLACK, 14089979 }
oBtn1:SetColor( 0, )

@ 265, 423 BTNBMP oBtn16 OF oDlg ;
SIZE 45, 30 PIXEL 2007 ;
NOBORDER ;
PROMPT " Exit" ;
FILENAME c_path + "\Bitmaps\Quit.Bmp" ;
ACTION ( oDlg:End(), oWnd:End() ) ;
FONT oFont1 ;
LEFT
oBtn16:lTransparent := .t.
oBtn16:cToolTip = { "Exit " + CRLF + "Title and Border","EXIT", 1, CLR_BLACK, 14089979 }
oBtn16:SetColor( 0, )

ACTIVATE DIALOG oDlg CENTERED NOWAIT

RETURN NIL

Hides the Dialog ( Visible on Button-action ) :

Something about the new Tool :
The Userlogo ( Olga.jpg ) is converted to a Alphablended BMP with Pixelformer,
to show a transparent-level.
From inside the Tool, the BMP is resized ( possible from -50% to + 20% ) and a transparent-level is defined.
As well it is possible, to adjust the Position on Screen.



Best Regards
Uwe

[reinaldocrespo]

Uko;

Thank you for the reply. It is enlightening. However, I would much rather not hide the dialog. I only want it to go to the background and still show any part not covered by the dialog that gains new focus. and by clicking on any exposed area of the dialog it will again gain focus and move to the foreground. Help?



Reinaldo.

[ukoenig]

Reinaldo,

another Solution :
using a Window instead of a Dialog.
Please have a look at Sample : Testwnds.prg
( shows 2 Windows )

or using a Dialog ( the Dialog will be always on Top of the Window ) :
instead of oDlg:Hide() / oDlg:Show(), You could use :

ACTIVATE WINDOW oWnd MAXIMIZED ;
ON INIT ( SHOW_DLG(), oDlg:Move( 50, 50, 200, 150, .T. ) ) // Resize to any Size on a defined Screenposition

and for the Dialog :

oDlg:bLClicked :={|| oDlg:Move( 20, 20, 950, 600, .T. ) } // on Click restore to the original Position and Size
ACTIVATE DIALOG oDlg CENTERED NOWAIT

Best regards
Uwe

[Natter]

DEFINE WINDOW oWnd

@ 0,0 SAY oSy PROMPT "" OF oWnd PIXEL

DEFINE DIALOG oDlg FROM 0,0 TO 0,0 PIXEL OF oSy ;
STYLE nOr( WS_VISIBLE, WS_CHILD)

ACTIVATE WINDOW oWnd MAXIMIZED ON INIT My_Ini()

procedure My_Ini
ACTIVATE DIALOG oDlg NOWAIT VALID .F.
return

If I understand right

[ukoenig]

I think, that is what he means :

On start, the Dialog is shown behind the Mainwindow :



A click somewhere on the Dialog visible Area, brings it on Top :
( switching between Window and Dialog )



Iconize Main-Window and keep Dialog visible :



Best Regards
Uwe