OnClick zur Runtime zuweisen

[Gehstock]

Das begreif ich nicht

Delphi-Quellcode:

for HC  := 0 to 10 do
    begin
    vName := TMenuItem(Menu);
    b := IniFile.ReadString('History',InttoStr(HC),b);
    with vName do begin
    Visible := true;
    vName.Caption:=GetToken(b, '@', 3);  // Entry
    Name := 'Item1'+InttoStr(HC); //Das Item Muss schon Existieren?
//    Parent := frmMain;
    frmMain.Item11.OnClick :=showmessage('test');//das Onclick ereignis existiert bereits und soll mit Showmessage.. überschrieben werden? weil ich zum jetzigen zeitpunkt ja noch nicht weiß was es machen soll
     frmMain.History1.Add(vName);