ACTIVATE DIALOG oDlg AS MDICHILD
Posted: Tue May 03, 2022 11:29 am
How I can maximized the dialog ?
On Init( oDlg : Maximize() )
Saludos
FiveTech Software tech support forums
www.FiveTechSoft.com
https://forums.fivetechsupport.com/~fivetec1/forums/
ACTIVATE DIALOG oDlg AS MDICHILD
https://forums.fivetechsupport.com/~fivetec1/forums/viewtopic.php?t=41723
Page 1 of 1
Re: ACTIVATE DIALOG oDlg AS MDICHILD
Posted: Tue May 03, 2022 3:22 pm
Re: ACTIVATE DIALOG oDlg AS MDICHILD
Posted: Wed May 04, 2022 11:35 am
horacio wrote:On Init( oDlg : Maximize() )
Saludos
ok but there is some error because when I maximize the dialog it is over the width of the main window look this
Code: Select all | Expand
#include "fivewin.ch"
#define AS_MDICHILD 1
#define AS_DIALOG 2
//----------------------------------------------------------------------------//
function Main()
local oWnd, oBar, oMenu
SetGetColorFocus()
DEFINE WINDOW oWnd MDI TITLE "test" VSCROLL HSCROLL
DEFINE BUTTONBAR oBar OF oWnd SIZE 100,32 2007
DEFINE BUTTON OF oBar PROMPT "test" CENTER ACTION test()
ACTIVATE WINDOW oWnd
return nil
//----------------------------------------------------------------------------//
static function test()
local oDlg, oBar, oFont
DEFINE FONT oFont NAME "Segoe UI" SIZE 0,-14
DEFINE DIALOG oDlg FONT oFont TITLE "Test Mdi" BRUSH oBrush
ACTIVATE DIALOG oDlg AS MDICHILD ;
ON INIT ( oDlg :Maximize())
return oDlg
Re: ACTIVATE DIALOG oDlg AS MDICHILD
Posted: Sun May 08, 2022 11:48 am
Code: Select all | Expand
#Include "FiveWin.ch"
#Define AS_MDICHILD 1
#Define AS_DIALOG 2
STATIC oWnd
FUNCTION Main()
LOCAL oBar, oMenu
SkinButtons()
SetGetColorFocus()
DEFINE WINDOW oWnd MDI TITLE "test" VSCROLL HSCROLL
DEFINE BUTTONBAR oBar OF oWnd SIZE 100, 32 2007
DEFINE BUTTON OF oBar PROMPT "test" CENTER ACTION test()
ACTIVATE WINDOW oWnd CENTERED
RETURN NIL
STATIC FUNCTION test()
LOCAL oDlg, oBar, oFont, oBrush
DEFINE BRUSH oBrush FILE "..\bitmaps\sea.bmp" RESIZE
DEFINE FONT oFont NAME "Segoe UI" SIZE 0, - 14
DEFINE DIALOG oDlg FONT oFont TITLE "Test Mdi" BRUSH oBrush
ACTIVATE DIALOG oDlg CENTERED AS MDICHILD ON INIT( oDlg:Maximize() )
oBrush:End()
oFont:End()
RETURN NIL
// FIN / END - kapiabafwh@gmail.com
Regards, saludos.
Re: ACTIVATE DIALOG oDlg AS MDICHILD
Posted: Sun May 08, 2022 7:14 pm
karinha wrote:Code: Select all | Expand
#Include "FiveWin.ch"
#Define AS_MDICHILD 1
#Define AS_DIALOG 2
STATIC oWnd
FUNCTION Main()
LOCAL oBar, oMenu
SkinButtons()
SetGetColorFocus()
DEFINE WINDOW oWnd MDI TITLE "test" VSCROLL HSCROLL
DEFINE BUTTONBAR oBar OF oWnd SIZE 100, 32 2007
DEFINE BUTTON OF oBar PROMPT "test" CENTER ACTION test()
ACTIVATE WINDOW oWnd CENTERED
RETURN NIL
STATIC FUNCTION test()
LOCAL oDlg, oBar, oFont, oBrush
DEFINE BRUSH oBrush FILE "..\bitmaps\sea.bmp" RESIZE
DEFINE FONT oFont NAME "Segoe UI" SIZE 0, - 14
DEFINE DIALOG oDlg FONT oFont TITLE "Test Mdi" BRUSH oBrush
ACTIVATE DIALOG oDlg CENTERED AS MDICHILD ON INIT( oDlg:Maximize() )
oBrush:End()
oFont:End()
RETURN NIL
// FIN / END - kapiabafwh@gmail.com
Regards, saludos.
pls
viewtopic.php?f=3&t=41750&start=0
I tried odlg:maximize() but not run ok
Re: ACTIVATE DIALOG oDlg AS MDICHILD
Posted: Wed Jun 22, 2022 2:57 am
oDlg:bMdiSetup := { |oMdiChild| oMdiChild:Maximize() }
ACTIVATE DIALOG AS MDICHILD
ACTIVATE DIALOG AS MDICHILD