Zitat von
QuickAndDirty:
Zitat von
tomate007:
Delphi-Quellcode:
if pruefung = true then begin
for i:= 1 to AnzahlSpalten-1 do begin
TEdit(Scrollbox1.FindComponent('Edit'+ IntToStr(i))).Free;
TLabel(Scrollbox1.FindComponent('Label'+ IntToStr(i))).Free;
end;
end;
SO GEHT DAS NICHT
wenn du die erste gelöscht hast gibt es die letze schon nicht mehr.
Oh doch das geht. Nur weil man "Edit1" freigibt, bleibt "Edit5" immer noch "Edit5"
Er greift ja nicht über einen Index auf die Komponente zu, sondern über den Namen ...