Menüeinträge während das Programm läuft hinzufügen

[magoo2002de]

Hallo,
ich habe in meinem Programm ein Hauptmenü-Eintrag namens 'Templates'. Darunter befindet sich ein Eintrag 'Standard' und ein Break. Nun wird bei CreateForm die unten stehende Prozedur aufgerufen. Es soll nun für jede Datei, die durch die Prozedur gefunden wird ein weiterer Eintrag im Menü hinzugefügt werden. Es soll dann so aussehen, wie es in diesem Screenshot aussieht.

Delphi-Quellcode:

procedure TMainForm.GetTemplates(Sender: TObject);
var
 I: Integer;
 AppName, AppVersion: String;
 Ini: TiniFile;
begin
 FileListBox1.Directory := MyPath+'Templates\';
  for I:=0 to FileListBox1.Items.Count-1 do
   Ini:=TIniFile.Create(MyPath+'Templates\'+FileListBox1.Items.Strings[I]);
    try
     AppName := Ini.ReadString('Info','Program','');
     AppVersion := Ini.ReadString('Info','Version','');
    finally
     Ini.Free;
    end;
   if (Appname='58745521456') and (AppVersion='1.0') then
    begin
     //Hier sollte dann die Menü-Einträge erstellt werden...
    end;
end;

Ich hoffe, das mir jemand dabei helfen kann. Ich habe hier zwar schon im Forum gesucht, aber irgendwie hab ich nicht das Richtige gefunden. Oder ich habe es gefunden, aber nicht so richtig verstanden.
Vielen Dank schon mal für euere Hilfe.