Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 06-02-2009
ferra99 ferra99 is offline
Registrado
 
Registrado: jun 2008
Posts: 6
Poder: 0
ferra99 Va por buen camino
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;
Responder Con Cita
  #2  
Antiguo 06-02-2009
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.275
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
¿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.
Responder Con Cita
  #3  
Antiguo 06-02-2009
ferra99 ferra99 is offline
Registrado
 
Registrado: jun 2008
Posts: 6
Poder: 0
ferra99 Va por buen camino
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;
Responder Con Cita
  #4  
Antiguo 06-02-2009
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.275
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
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:

Código Delphi [-]
  bot := TmyButton(form2.components[i]);
__________________
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.
Responder Con Cita
  #5  
Antiguo 06-02-2009
ferra99 ferra99 is offline
Registrado
 
Registrado: jun 2008
Posts: 6
Poder: 0
ferra99 Va por buen camino
pues.... FUNCIONO!!!! Muchas gracias
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

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


La franja horaria es GMT +2. Ahora son las 22:32:05.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi