Hallo Kollegen

Ich schreibe ein kleines Programm und benutze
die relativ rudimentär erklärten WinApi funktionen von Freepascal.
Ich bin beim Menü:
Fragment:
Code :
1
2
3
4
5
6
7
8
9

    If hWindow<>0 Then Begin
        Menu := CreateMenu;
        SubMenu := CreateMenu;
        AppendMenu(Submenu,MF_STRING,101,'&New...');
        AppendMenu(Submenu,MF_STRING,102,'&Open...');
        AppendMenu(Submenu,MF_SEPARATOR,0,Nil);
        AppendMenu(SubMenu,MF_String,103,'E&xit');
        AppendMenu(Menu,MF_POPUP,SubMenu,'&File');
...
Kann ich eigentlich eine weitere Ebene einfügen?
Im Internet hab ich nichts gefunden. Auf friends_of_fpc gibts ein Tutorial von delax, was aber aufhört ohne sich weiter zu vertiefen.
Einen "Menügenerator" a lá Delphi oder Lazarus möchte ich aus Komplexitätsgründen nicht nutzen.
Vielen Dank.
jrx