FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Crear TPanel como contenedor
Posts: 458
Joined: Tue Mar 14, 2006 07:26 PM
Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 12:13 PM

Hola,

¿ Alguien sabe como tengo que crear en workshop y luego redefinir un contro TPanel ?

La idea es usarlo en un diálogo para contener otros controles. Sólo he encontrado crearlo desde
código fuente, pero no desde recursos.

O Si no es la TPanel, me valdría cualquier control básico para contener a otros.

Un Saludo,

Joaquín Martínez
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 01:54 PM

Joaquín,

Crea el panel desde la cláusula ON INIT del diálogo

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 01:56 PM

Si me indicas lo que deseas hacer, te puedo ayudar de forma más concreta, gracias

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 458
Joined: Tue Mar 14, 2006 07:26 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 02:03 PM

La idea es hacer una especie de groupbox desde recursos
Y dentro poder crear un treeview desde còdigo y ajustarlo al cliente.

He pensado crear un control heredado desde tcontrol y crearle
El new y el redefine, creo que sería una base para posicionamiento o agrupaciòn
De otros controles.

Un Saludo,

Joaquín Martínez
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 03:00 PM

Joaquín,

Revisa los ejemplos layout*.prg en FWH\samples, igual es lo que buscas :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 458
Joined: Tue Mar 14, 2006 07:26 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 03:28 PM
Antonio,

Eso es más complejo de lo que yo buscaba, además no se define en recursos.

Era más fácil, he creado un control heredado de la TCONTROL, la he creado en WorkShop como TContenedor y luego le he incrustado en el INIT desde código
el TTreeview. Funciona!!! lo que significa que no funciona el REDEFINE del TTreeview o tengo que ponerle algo al Custom Control del WorkShop para que funcione
y yo no sé lo que es.

Esto es un poco chapuza porque no me funciona el redefine, pero también sirve para solucionarlo provisionalmente.

oContenedorTree := TContenedor():Redefine( 108, oDlgarbol )

En el On INIT del Diálogo llamo a:

oTree := TTreeView():New( 0, 0, oContenedorTree, CLR_BLACK,CLR_WHITE, , , 0, 0)

Y Así queda:



Espero encontrar la solución al Redefine...
Un Saludo,

Joaquín Martínez
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 05:35 PM

Una pregunta: esto lo estas haciendo porque no te funcionaba el REDEFINE del oTreeView?
Porque lo normal seria crear el TPanel por código y después hacer el REDEFINE del oTree tomando como oParent el TPanel, no?
Te lo digo porque como contenedor considero que el TPanel es un buen control, aunque no se pueda hacer el REDEFINE

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 458
Joined: Tue Mar 14, 2006 07:26 PM
Re: Crear TPanel como contenedor
Posted: Fri Sep 19, 2014 05:47 PM

Hola Cristobal,

No es posible lo que dices. El Redefine del TreeView No me funciona, no salen las líneas y los + -.
Entonces lo que tú comentas, no funcionaría.

Necesito usar el contenedor con redefine y no me sirve la Tpanel porque no se puede, precisamente porque
si diseño el diálogo con el workshop, el cuadro que va a ocupar el control treeview quiero diseñarlo visualmente
también, NO por código.

Gracias,

Un Saludo,

Joaquín Martínez

Continue the discussion