FiveTech Software tech support forums

Gracias, my dear friend. Excelent!

Regards, saludos.

Joao aquí está , se puede mejorar Saludos https://i.postimg.cc/gjFW5yc9/xBrw.png #include <FiveWin.ch>#include <XBrowse.ch>*--------------------------------------*TEST.PRG* Windows MDI + Windows Child + Dialog + xBrowse* 21/09/2023*--------------------------------------ST...

sysctrl2 wrote:ok Joao lo hago y te lo comparto,
saludos.

Great!! Gracias my dear friend.

Regards, saludos.

ok Joao lo hago y te lo comparto,
saludos.

Hello Cesar Cortes Cruz, tiens un ejemplo simples para un amigo en Brasil?

Muchas gracias.

Regards, saludos.

este es con puros array


saludos

Holá, Algun ejemplo práctico? como en este ejemplo?

http://fivewin.com.br/index.php?/topic/38005-dashboard-metropanel/

Gracias.

Regards, saludos.

Joao, no crees que el problema está en que tienes la clausula MDICHILD y MDI en la misma definición?, quizás tu problema vaya por ahi DEFINE WINDOW oWndBrow ; MDICHILD ; FROM 00, 00 TO 36.7, 160.3 ; COLOR CLR_CYAN, CLR_WHITE TITLE cTitle ; MDI ; BORDER NONE NOMAXIMIZE No maestro Navarro el problema...

Joao, no crees que el problema está en que tienes la clausula MDICHILD y MDI en la misma definición?, quizás tu problema vaya por ahi DEFINE WINDOW oWndBrow ; MDICHILD ; FROM 00, 00 TO 36.7, 160.3 ; COLOR CLR_CYAN, CLR_WHITE TITLE cTitle ; MDI ; BORDER NONE NOMAXIMIZE

Ejemplo simple que muestra que una ventana secundaria con WINDOW MDI no minimiza ni cierra la ventana secundaria.

Lo uso mucho con un menú normal y una ventana MDI.

Por favor Mestre Navarro eche un vistazo al problema.

Gracias.

regards, saludos.

Editado by João Santos.

MDICHILD No se cierra con METROPANEL. Que hago mal? STATIC oWndBrow   PUBLIC lFechaJan   lFechaJan := .F.   DEFINE METROBUTTON oBtnEmp OF oMetro                ;  ...

... FREEIMAGE aImage := oWnd:ReadImage( cImage, , .t. ) oWnd:DrawImage( aImage, aRect, nil, 1 ) it doesn't work for a METRO-image-background DEFINE METROPANEL oMetro OF oWnd TITLE "Stammdaten" ; COLOR aVal[8], CLR_BLUE aRect := GETCLIENTRECT( oMetro:hWnd ) aImage := oMetro:ReadImage( cImage, ...

The following should be added to metropnel.ch:

#xcommand ACTIVATE METROPANEL <oMtr> => <oMtr>:Show()

or something similar

... FREEIMAGE aImage := oWnd:ReadImage( cImage, , .t. ) oWnd:DrawImage( aImage, aRect, nil, 1 ) it doesn't work for a METRO-image-background DEFINE METROPANEL oMetro OF oWnd TITLE "Stammdaten" ; COLOR aVal[8], CLR_BLUE aRect := GETCLIENTRECT( oMetro:hWnd ) aImage := oMetro:ReadImage( cImage, ...

Usage inside METROPANEL ( works as well ) : http://www.pflegeplus.com/IMAGES/Metrofont1.jpg //----------------------------------- FUNCTION BUILDMETRO(oWnd, nDStyle) LOCAL oMetro, oHScroll, oBtn[30], oBrush, oVSlider ...