Brush en TDockPnel

[leandro]

Cristóbal buenas tardes, que pena molestar.

Pero quería saber si se puede usar una imagen "brush" como fondo en un panel de tu clase.

De antemano gracias.

[cnavarro]

Leandro, no es molestia. Es muy sencillo

Code: Select all  Expand view

      :SetCtrlsPnel( { | o, nT, nL, nH, nW, nR | o:SetBrush( oBrush ), ;
                                                                    XBrowsePnel( o, cArt, nR + 110, nL, nH - 158, nW ) } )

      :Activate()
 

[leandro]

Amigo, muchas gracias por responder.

Funciona de maravilla, era lo que necesitaba.

Pero ahora me surge otra pregunta

Puedo también emular de alguna manera el ON INIT de un dialogo, en un TDockPnel?

De antemano gracias.

[cnavarro]

Leandro, prueba con esto a ver

Code: Select all  Expand view

      :SetCtrlsPnel( { | o, nT, nL, nH, nW, nR | o:bInit := { || MyFunction() }, ;
                                                                    XBrowsePnel( o, cArt, nR + 110, nL, nH - 158, nW ) } )

      :Activate()