[Hallo,
ich würde folgendes machen. Ich würde zusätzlich zum Objektnamen die passende
Objektreferenz in der Objects-property speichern. Dann hast Du ausgewählten
Namen immer gleich das passende Objekt zur Hand.
Delphi-Quellcode:
NewShape:= TShape.Create(Self);
with NewShape as TShape do
Name := 'Objekt_' + IntToStr(max); //max fängt bei 0 an und geht dann immer Weiter. halt zur Unterscheidung der Objekte
ComboBox1.Items.AddObject(NewShape.Name,NewShape);
procedure TForm1.Button3Click(Sender: TObject);
begin
If ComboBox1.ItemIndex>-1 then
begin
TObject(ComboBox1.Items.Objects[ComboBox1.ItemIndex]).Free;
ComboBox1.Items.Objects[ComboBox1.ItemIndex]:=Nil;
end;
end;
end.