Zitat von
himitsu:
du nimmst Names[i].OnClick und weißt diesem einfach eine passende Methode (Prozedur) zu
Hallo nochmal.
Das funktioniert so leider nicht. Aber warscheinlich mache ich auch etwas verkehrt.
Zitat:
Incompatible types: 'method pointer and regular procedure'
Delphi-Quellcode:
procedure DoStuffs;
begin
//work to do
end;
procedure MyProcedure;
var
Names : Array [0..5] of TLabel;
begin
//Objekte erzeugen
for i:=0 to high(names) do
begin
Names[i] := TLabel.Create(Form1);
Names[i].OnClick := DoStuffs;
end;
//anzeigen
for i:=0 to high(names) do
Names[i].Parent:=Form1;