Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-12-2023
Drummer Drummer is offline
Miembro
 
Registrado: jul 2022
Posts: 18
Poder: 0
Drummer Va por buen camino
Recorrer componentes padres (contenedores) desde el último elemento al Primero (c++)

Hola

Como ejemplo creo un formulario con tres componentes TRectangle, cada uno de ellos contiene otro componente TRectangle excepto el último (TRectangle3) que tiene el foco:

Form1
I
Trectangle1
I
TRectangle2
I
TRectangle3


Pretendo ir componente por componente desde TRectangle3 hasta el Form1 inicial y modificar alguna propiedad del componente "activo" en ese momento.


He intentado usar:

Código:
this->Root->GetObject();
Pero no consigo que funcione (programo en C++)

Alguna idea gracias.
Responder Con Cita
  #2  
Antiguo 27-12-2023
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
Sólo para aclarar, ¿VCL o FMX?
De todas formas yo probaría con el Parent (propiedad) de cada componente/objeto.
__________________
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.

Última edición por Neftali [Germán.Estévez] fecha: 27-12-2023 a las 13:34:07.
Responder Con Cita
  #3  
Antiguo 28-12-2023
Drummer Drummer is offline
Miembro
 
Registrado: jul 2022
Posts: 18
Poder: 0
Drummer Va por buen camino
Gracias por contestar.

Cita:
Sólo para aclarar, ¿VCL o FMX?
FMX.

Ok, correcto.. TFmxObjec tienen la propiedad FMX asociada Parent.

Intentare implementarla en un bucle para recorrer conponente a componente. y os cuento...

Última edición por Drummer fecha: 28-12-2023 a las 09:34:14.
Responder Con Cita
  #4  
Antiguo 29-12-2023
Drummer Drummer is offline
Miembro
 
Registrado: jul 2022
Posts: 18
Poder: 0
Drummer Va por buen camino
Hola

La Solución seria:

Código:
TControl* obj = TRectangle3;
 
ShowMessage(obj->Name); // Rectangle3
 
while (obj->HasParent()) {
 
    obj = (TControl*)obj->GetParentComponent();
 
    ShowMessage(obj->Name); // Rectangle2, Rectangle1, Form1
 
}
Responder Con Cita
  #5  
Antiguo 29-12-2023
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
Gracias por el código.
__________________
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
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
Componentes Dinamicos (contenedores) JULIOCTORRESG Varios 7 22-11-2020 00:48:39
Recorrer un arreglo hasta el ultimo kirios OOP 1 28-06-2011 21:43:42
recorrer componentes NEG1414 C++ Builder 12 11-12-2007 05:50:43
Borrar Ultimo Elemento En Tabla Paradox Mario1980 Varios 5 14-12-2004 22:59:15
Visualizar ultimo elemento en TListView Novás Varios 1 22-04-2004 11:33:39


La franja horaria es GMT +2. Ahora son las 23:08:52.


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