GetMenuItemInfo -> falscher Parameter

[Luckie]

Auf meine Anwendung angepass:

Delphi-Quellcode:

        hMenu := GetMenu(hDlg);
        hSubMenu := GetSubMenu(hMenu, 3);
        hSubMenu := GetSubMenu(hSubMenu, 0);
        AppendMenu(hSubMenu, MF_STRING, 0815, 'Test');
        DrawMenuBar(hDlg);

Aber auch jetzt ist nach dem zweiten Aufruf von GetSubMenu hSubMenu immer 0.