FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
conversor a tcomponent
hola a todos, estoy haciendo un boton llamado tmybutton que hereda de tbutton, pero al quererle cambiar el parent no me deja por no ser del mismo tipo y he oido que existe un conversor a tcomponent, sabeis como es?¿
Gracias el codigo es este: Código:
procedure TForm2.Button3Click(Sender: TObject); var i:integer; bot:tmybutton; begin for i:=0 to form2.ComponentCount -1 do begin bot:=form2.components[i]; bot.Parent:=form3; end; |
#2
|
||||
|
||||
¿Puedes explicar exactamente qué quieres hacer?
¿Cambiarle el parent a los TButton para qué? En el código que has pasado, por ejemlpo, intentas cambiar el parent, entre otros, al propio botón que has pulsado, a parte de que el owner sigue siendo el propio form (eso no creo que le siente bien al Delphi). En ese código además estás cambiando el parent a todos los componentes, no sólo los TButton.
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
|||
|
|||
Buenas, es un simple ejercicio de clase en el que al hacer click a un boton, cambiamos de ventana los botones a traves de parent, la propiedad owner se cambia a traves de otro boton:
Código:
procedure tform2.CanviarPropietari (Component, NewOwner : TComponent); begin Component.Owner.RemoveComponent (Component); NewOwner.InsertComponent (Component); end; |
#4
|
||||
|
||||
Ok, entendido.
Además he de decir que también había leído una cosa mal en el enunciado y estaba pensando que era otra cosa. Supongo que al error que te refieres es que te falta hacer el "CAST" al asignar valor a bot. Prueba con esto:
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#5
|
|||
|
|||
pues.... FUNCIONO!!!! Muchas gracias
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Conversor de € a PTS | REHome | .NET | 3 | 04-01-2008 21:03:32 |
TComponent y Handle | ixMike | OOP | 5 | 12-10-2007 13:45:52 |
Ayuda con el procedimiento Notification de Tcomponent | Punzo | OOP | 6 | 11-05-2006 23:52:42 |
Casting de TComponent en TEdit | jamonete2 | Varios | 2 | 12-06-2005 15:56:19 |
WM_DEVICECHANGE en un TComponent | NeWNeO | API de Windows | 5 | 28-05-2004 16:12:07 |
|