topic-40821

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 03:43 PM

sysctrl2 wrote:João
MDI NO FUNCIONA

Ahora se complicó. Utilizo MDI en todos los proyectos, me perdí. jajajajaja.

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 03:48 PM

João,

Please try this:

oMetro := MakeMetroPanel( oWnd:oWndClient )

regards, saludos

Antonio Linares
www.fivetechsoft.com

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 03:49 PM

Todo iba tan bien ... Que Lástima.

https://imgur.com/s1Rqz8t

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 04:01 PM

Antonio Linares wrote:João,

Please try this:

oMetro := MakeMetroPanel( oWnd:oWndClient )

Perfecto mi amado GURU. Eres simplemente mi mayor ídolo. Me gustas más que Bill Gates. jajajajajajajajaja.

https://imgur.com/FyOHeWp

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 04:10 PM

Eliminando el MENU de la WINDOW MDI: Me gusta FiveWin the best!!

Code (fw): Select all Collapse

   // ON INIT ( oWnd:End() ) -> ELIMINA EL MENU DEL MDI. FIVEGURU.PRG
   ACTIVATE WINDOW oWnd MAXIMIZED                                   ;
      ON INIT( oWnd:oMenu:End(), oMetro:Show(), oMetro:SetFocus() ) ;
      VALID( CIERRA_METROWIN( oWnd ) )

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 04:16 PM

Asi, parece ser mejor y mas rápido:

Code (fw): Select all Collapse

   DEFINE WINDOW oWnd TITLE cTitle MDI                                       ;
      COLOR CLR_WHITE, CLR_GREEN ICON ".\TIMAO.ico"

   oWnd:oMenu:End()
   oWnd:Maximize()

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 04:32 PM

gracias Maestro Antonio !

Joao
puedes compartir el ejemplo con MDI ?
Muchas gracias !!!

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 04:48 PM

sysctrl2 wrote:gracias Maestro Antonio !

Joao
puedes compartir el ejemplo con MDI ?
Muchas gracias !!!

Aguarde más un poquito César. haciendo pruebas e cuasi loko de felicidad... jajajajajajajajajajaja.. Broma, broma, broma.

Usando MDICHILD:

https://imgur.com/hvUuuuQ

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 05:25 PM

Pronto César. METROWIN.PRG Versión: 3.0, usando MDICHILD. Very good!!

Download completo. Críticas, porfa.

https://mega.nz/file/YEFBhQjZ#Ze0YeqMG5iZen4Fe7fH705UAECzof5rI1s67VdYNJZQ

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

sysctrl2

Posts: 1144

Joined: Mon Feb 05, 2007 07:15 PM

Re: SysCtrl PANEL BLACK
Posted: Sat Sep 11, 2021 07:37 PM

Muchas gracias
hay que probar !

Cesar Cortes Cruz

SysCtrl Software

Mexico

' Sin +- FWH es mejor "

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: SysCtrl PANEL BLACK
Posted: Sun Sep 12, 2021 01:38 PM

Buén dia. Creo que hay un error aqui:

Code (fw): Select all Collapse

METHOD Destroy() CLASS TMetroBtn

   if ::oDragCursor != nil
      RELEASE CUSROR ::oDragCursor
   endif

return ::Super:Destroy()

Regards, saludos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

FiveTech Support Forums

Continue the discussion