OnClick bei zur Laufzeit erstellten Objekten

[Delphi-Narr]

Also ich habe schon mehrfach hier gesucht, hab das nur nicht richtig verstanden.

Wenn ich das Objekt nun auf der Form aufziehe, soll onMouseUp dem Objekt eine Prozedur zugewiesen werden. Die soll dann ungefähr so aussehen:

Delphi-Quellcode:

var i:integer;

begin
i:=0;
Sender.destroy //oder .free???
while SL[i]<>Sender.name do
begin
     i:=i+4;
end;

//Alle Einträge zum Objekt aus der Liste löschen

end;

Was muss ich denn jetzt genau bei MouseUp eintragen.

Benennung der Shapes:

TypA_{Zufallsstring aus 5 Buchstaben}_{fortlaufende Nummer}

TypB_{Zufallsstring aus 5 Buchstaben}_{fortlaufende Nummer}


In der Liste SL ist jedes Element folgendermaßen eingetragen:

{Name}
{Wert1}
{Wert2}
{Wert3}
{Wert4}
{Name}
{Wert1}
{Wert2}
{Wert3}
{Wert4}

...