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 04-12-2017
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
Hola...

En algunas partes tienes que hacer "casteo" de clases para que tu código funcione...

Código Delphi [-]
for I := 0 to sbPreguntas.ControlCount - 1 do
begin
  vGroupBox := sbPreguntas.Controls[i] as TGroupBox: // o puedes hacer TGroupBox(sbPreguntas.Controls[i]);
  for J := 0 to vGroupBox.ControlCount - 1 do
  begin
    if vGroupBox.Controls[J] is TCheckBox then
    begin
      vCheckBox := vGroupBox.Controls[J] as TCheckBox;
      if vCheckBox.Checked then
        // Lo que haya que hacer para eliminarlo...
    end
  end
end;


Saludos...
__________________
Lee la Guía de Estilo antes que cualquier cosa. - Twitter
Responder Con Cita
  #2  
Antiguo 04-12-2017
strelok strelok is offline
Miembro
 
Registrado: sep 2017
Posts: 181
Poder: 7
strelok Va por buen camino
Gracias

Aún estoy teniendo problemas al eliminar (en algunos casos), cuando elimino alguna pregunta que está en medio, pues en realidad el problema no es eliminarla, es crear una nueva luego de haber eliminado una del medio. ¿Cuál sería en Index de la última? Ya que al eliminar una parece ser que cambia ¿ CountItems -1 ?.
Responder Con Cita
  #3  
Antiguo 04-12-2017
WHILENOTEOF WHILENOTEOF is offline
Miembro
 
Registrado: mar 2008
Posts: 229
Poder: 17
WHILENOTEOF Va camino a la fama
Imagino que cuando quieras borrar algo en la propiedad Controls, tendrá que ser de uno en uno, ya que cuando recorres con un índice la lista, y borras, el contador de la lista cambia. es decir tendrías que crear un método BorraGrupo(ID: integer) y lo llamas tantas veces como grupos quieras borrar, todo lo que hay dentro del grupo, si has puesto los controles como hijos (que su padre es el grupo), se borrarán automáticamente. Respecto a lo de colocar en medio, dependiendo de la versión que tengas de Delphi, yo utilizaría el GridPanel para organizarlo (creo que está desde Delphi XE2). Puedes organizar los grupbox en filas y columnas y les asignas la propiedad Row y Column del grid donde quieras situarlo. Ten en cuidado con el TabOrder, porque necesitarás asignarlo de nuevo para que se posicione en forma secuencial en el formulario (si es que utilizas el tab order).
Responder Con Cita
  #4  
Antiguo 05-12-2017
strelok strelok is offline
Miembro
 
Registrado: sep 2017
Posts: 181
Poder: 7
strelok Va por buen camino
Lo hice de otra forma, eliminando N, pero desde el último al primero, y una vez eliminados, llamo a una función "reordenar()" que asigna los "top" correctamente
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
Borrar objetos creados dinámicamente Angel.Matilla C++ Builder 6 11-05-2017 21:15:22
Frames creados dinamicamente no se ven duilioisola OOP 2 11-03-2011 12:39:12
Campos creados dinámicamente clientdataset sur-se Varios 6 18-10-2010 08:43:33
cerrar formularios creados dinamicamente ctronx Varios 5 17-06-2004 18:25:17
Campos creados dinámicamente vs creados estáticamente Jose_Pérez Conexión con bases de datos 2 14-04-2004 11:34:03


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


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