Borrar lo que esta dentro de un scrollbox
 

De qué manera se podría borrar los TLabel, Button, CheckBox que se encuentran dentro de un scrollbox en tiempo de ejecución?

Puedes recorrer todos los componentes del formulario utilizando los métodos componentCount y Componentes[i].
Una vez que hagas el recorrido, se trata de preguntar cuales están dentro del scrollbox para borrarlos; Para ello puedes utilizar la propiedad Parent. Algo así:

Código Delphi [-]
 var
   i:Integer;
   ctrl:TControl;
 begin
 
   // recorrer la lista de componentes (al revés)
   for i := (Self.ComponentCount - 1) downto 0 do begin
     // Es un TControl ?
     if (Self.Components[i] is tControl) then begin
       ctrl := TControl(Self.Components[i]);
       // Está en el Scrolll?
       if (ctrl.Parent = ScrollBox1) then begin
         MessageDlg('Se va a borrar: ' + ctrl.Name, mtWarning, [mbOK], 0);
         FreeAndNil(ctrl);
       end;
     end;
   end;

Otra salución
 

Hola, por qué no usar las propiedades controls y controlcount del propio TScrollBox, de esta forma solo recorremos los elementos que nos interesa (controles del ScrollBox1) y simplemente los destruimos.

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
   i : integer;
begin
  for i := ScrollBox1.ControlCount -1  downto 0 do
      ScrollBox1.Controls[i].Free;
end;

Bueno pues ahora tienes dos vías:)

Saludos Yusnerqui

Efectívamente, porqué no usarlas... (se me pasó...)

A usar preferiblemente la de yusnerqui, ya que es más clara y eficiente.

ok Probaré apenas llegue a casa. Muchas gracias.....

Una pregunta: ¿Por qué se hace el recorrido al revés?. Gracias....

Como los vas borrando, si empiezas por el principio te dará error (antes o después).
Por ejempo, si la lista tiene 20 elementos, al eliminar el 0, el que antes era el 1 pasa al 0 y al intentar eliminar el 1, realmente has borrado el dos.

Espero haberme explicado.:p

¡Ahh! Entonces podemos ahorrarnos una variable:

Código Delphi [-]
while ScrollBox1.ControlCount > 0 do
  ScrollBox1.Controls[0].Free;

// Saludos

SaludosWow :eek: Muy acertada y eficiente tu técnica

Hola,

¡Eso no es nada! Dale a roman cinco minutos más y hasta el bucle se hará innecesario... :) :D :cool:

Eso es fácil:

Application.Terminate;

:D

// Saludos

Voy a buscar un poquito de pelea contradiciendo esto :D, en lo que refiere a optimización de código, es mucho mas eficiente la opción del for, ya que consulta solo una vez la propiedad ControlCount, en cambio el while ejecutará el código de la propiedad para cada iteración.
Sería muy fino evaluar según el tamaño de la lista que código nos conviene.

PD: Siempre suponiendo que la ejecución es lineal, que solo "nosotros" eliminamos estos componentes.

Saludos!

En un ciclo for también hay una comparación en cada vuelta. Aunque no escrita explícitamente en el código, sí en el código ensamblado.

:p

// Saludos

Ya entendí a lo que te refieres. Sí tienes razón. :)

// Saludos

Noo.. pero sabes a lo que me refiero!... la comparación siempre esta, pero en el caso de la propiedad se ejecuta el código propio de la propiedad (en este caso TWinControl.GetControlCount). Sin lugar a dudas va a ser mucho mas "económico" un entero mas en memoria, a no ser que solo tengas un ítem en la lista :D.

Hola,

Nunca te acostarás... etc. :D

Mi exposición:
 

A todos mi agradecimiento, muchisimas gracias, me gusta sentirme parte de este maravilloso equipo, cada vez siempre, pero siempre se aprende más. De nuevo muchas gracias.:D

Ahora la pregunta es:
 

Tengo varios TImage, TLabel, TdxButton y TdxCheckBox dentro del ScrollBox1, ahora ¿ Cómo hago para chequear la propiedad Checked del TdxCheckBox y ejecutar otro proceso?. Gracias.:confused:

¿Qué tiene que ver esto con el tema del hilo?

// Saludos

EL tema inicial era como eliminar los componentes que se encuentran dentro del scrollbox, pero tengo la necesidad de que dentro del scrolbox tengo varios componentes y uno de ellos son checkbox del tipo tdxcheckbox y quiero verificar si la propiedad checked está true y depende de ello ejecutar un proceso xxxx, por eso la pregunta ¿ cómo se accede a las propiedades de los componentes dentro del scrollbox creados en tiempo de ejecución?