Alle Komponenten aus ScrollBox wieder freigeben

[Christian18]

Hallo,

ich habe diverse Komponenten in einer ScrollBox. Wie kann ich alle Komponenten die ich in der ScrollBox habe Freigeben.

Ich habe Labels, Images und Panels in dieser Scrollbox

MFG Christian18

[Mr_G]

Ich meine da wäre so Eigenschaften wie Controls[] und ControlCount gewesen. Einfach durchlaufen und freigeben.

[Christian18]

Hi,

Hast du evtl. ein Bsp??? weil so funktioniert es nicht:

Delphi-Quellcode:

for j:=1 to s.ControlCount do
  begin
    s.Controls[j].Free;
  end;

MFG Christian18

[mkinzler]

Oder einfach ScrollBox freigeben und dann neu Erzeugen.

[Christian18]

Ich würde gerne alle Kompoenten einzeln Freigebe, da es zu viel Au´fwand wäre eine neue Scrollbox zu erzeugen. (Zu viele Parameter geändert.)

[mkinzler]

Falsche Grenzen:

Delphi-Quellcode:

for j:=0 to s.ControlCount-1 do
  begin
    s.Controls[j].Free;
  end;

[Christian18]

Zitat von mkinzler:

Falsche Grenzen:

Delphi-Quellcode:

for j:=0 to s.ControlCount-1 do
  begin
    s.Controls[j].Free;
  end;

das habe ich auch schon probiert. es kommt eine Fehlermeldung:

Meldung: Listenindex überschreitet das Maximum (2)

[mkinzler]

Welchen wert hat j beim Auslösen des Fehlers?

[Hawkeye219]

Zitat von mkinzler:

Falsche Grenzen:

Delphi-Quellcode:

for j:=0 to s.ControlCount-1 do
  begin
    s.Controls[j].Free;
  end;

Falsche Richtung!

Delphi-Quellcode:

//for j:=0 to s.ControlCount-1 do
for j:=s.ControlCount-1 downto 0 do
  begin
    s.Controls[j].Free;
  end;

Gruß Hawkeye

[Christian18]

Zitat von Hawkeye219:

Zitat von mkinzler:

Falsche Grenzen:

Delphi-Quellcode:

for j:=0 to s.ControlCount-1 do
  begin
    s.Controls[j].Free;
  end;

Falsche Richtung!

Delphi-Quellcode:

//for j:=0 to s.ControlCount-1 do
for j:=s.ControlCount-1 downto 0 do
  begin
    s.Controls[j].Free;
  end;

Gruß Hawkeye

Super jetzt funktioniert es...