Zitat von
atgis:
Wie kann ich mit den "-" Button die jeweils letzten beiden Objekte löschen?
Die einfache aber unschöne Variante wäre mit
FindComponent
Delphi-Quellcode:
var
Edt: TEdit;
begin
Edt:= TEdit(self.FindComponent('
Edit'+IntToStr(i)));
if System.Assigned(Edt)
then
begin
dec(i);
Edt.Free;
end;
besser wäre jedoch wenn du deine dynamisch erzeugten Komponenten in einer
TComponentList oder zumindest in einem Array verwaltest, als sie jedesmal erst zu suchen.