Eigener Cursor bei TPopupMenu bzw. TMainMenu...



  • Hallo,
    ich verwende in meinem Programm einen eigenen Cursor, welcher beim Start mit

    Screen->Cursors[1000] = LoadCursorA(HInstance, "my_default_cursor");
    

    geladen wird. Im Form klappt das auch wunderbar, aber jetzt würde ich gerne ein Hauptmenü machen, welches stilistisch zu dem Rest des Programms passt. In dem Moment, da ich aber mit

    popup_menu->PopUp(0, 0);
    

    das Menü aufrufe (es basiert auf einer TPopupMenu-Komponente), wird wieder der "normal" Windows-Cursor angezeigt (Gleiches auch bei einem TMainMenu).

    Wie kriege ich es hin, dass er auch dann meinen eigenen Cursor anzeigt?
    Weder TPopupMenu nocht TMainMenu haben eine Property Cursor, und auch mit

    Screen->Cursors[crDefault] = LoadCursorA(HInstance, "my_default_cursor");
    Screen->Cursors[crArrow] = LoadCursorA(HInstance, "my_default_cursor");
    

    habe ich kein besseres Ergebnis bekommen. Weiß jemand, wie das geht? Ich habe mich schon durch die FAQ gelesen.


Anmelden zum Antworten