ListBox onclick zuweisungsproblem

[Muetzi]

Hi,

habe folgendes Prob...Ich habe ne ListBox in der ich mit

listbox1.items.add(variable1);
einen Eintrag hinzufüge....


Jetzt muss ich es aber schaffen dem OnClickereignis auf dem item[0] also dem item mit dem inhalt von variable 2 ein ShowMessage mit der Variable1a zuzuweisen...

Also praktisch so...geht aber nicht:

Delphi-Quellcode:

x := 0;
while x < id do
begin
listbox1.items.add(variable1);
listbox1.items[x].onClick := ShowMessage(variable1a);
inc(x);
end;

das onClick funktioniert nicht, do wie mach ich das?



gruß

muetzi