Komponente zur Laufzeit löschen

Millo · Beiträge: 147

Moin,

ich hätte nur mal kurz ne frage wie ich eine Komponente zur Laufzeit Löschen kann ich habs so probiert:

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

var Z : Integer;
    C : TComponent;
begin
  for Z := ComponentCount - 1 downto 0 do
  begin
    C:= Components[Z];
    if (C is TLabel) then
    begin
      RemoveComponent(C);
    end;
  end;
end;

Aber das haut nicht hin ich hab es auch mit Free versucht und dann Destroy aber das wollt auch nicht. Vielleicht wird die Form auch nicht aktuallisiert zumindest verschwinden das Label net,

Gast Erhaltene Danke: 1

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

var Z : Integer; 
    C : TComponent; 
begin 
  for Z := ComponentCount - 1 downto 0 do 
  begin 
    C:= Components[Z]; 
    if (C is TLabel) then 
    begin 
      TLabel(C).Free; 
      //das gleiche wie (C as TLabel).Free;
    end; 
  end; 
end;

Millo · Beiträge: 147

THX das klapp prima.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme