OK, ich habe meine "Procedur" anders geschrieben:
Delphi-Quellcode:
function tform1.meineproc(pname:string):tnotifyevent;
begin
showmessage(pname);
result:=onClick;
end;
So nun kann ich auch das Project compilieren.
Ich rufe die Procedure, die das PopUpMenü erstellt bei OnFormCreate auf. Da steht ja folgendes drin:
Delphi-Quellcode:
{...}
aNewItem : array of TMenuItem;
begin
setlength(aNewItem,11);
for i:= 0 to 10 do
begin
aNewItem[i] := NewItem(listbox1.Items[i], 0, False, True, meineporc(listbox1.Items[i]), 0, 'item'+inttostr(i));
end;
{...}
so wenn ich mein Projekt jetzt starte, dann wird aber gleich meine Procedur
meineproc ausgeführt, undzwar 11 mal, klicke ich aber auf ein erzeugtes Item passiert nix
warum ?
thx hibbert