new.item.Onclick verzweiflung

[tom1002]

Hallo zusammen,

ich komm hier einfach nicht weiter. Hab schon auf zig seiten(auf hier) verschiedene lösungen gefunden, aber nichts funktioniert.
hier mein problem;

ich erstelle aus eine datenbank menüeinträge:

Delphi-Quellcode:

bilder.First;
while not bilder.eof do
  begin
    NewItem := TMenuItem.Create(Self);
    NewItem.Caption :=bilderbeschreibung.asstring;
    newItem.onClick:= untere procedur übergabe der variable 'weg';
    mbilder.add(NewItem);
    bilder.Next;
  end;

bei onclick soll eine variable weitergegeben werden an folgende procedure

Delphi-Quellcode:

procedure TForm1.bilderklick(sender: TObject; weg:string);
begin
if sender = TMainMenu
ShellExecute(Application.Handle,'OPEN',PCHar('http://www....index.php?weg='+weg),nil,nil,sw_ShowNormal);
end;

ich habe irgendwo was von tnotifyevent gelesen
weiß aber nicht wo genau was hin kommt z.b. procedure bilderklick(Sender: TObject; weg:string);

hier kann mir bestimmt jemand weiterhelfen. schon mal besten dank

[edit=MrSpock]Delphi Tags eingefügt. Mfg, MrSpock[/edit]