MenuItem neu zeichnen ohne ganzes Menü neu zu zeichnen

[EWeiss]

Sollte selbst erklärend sein.

  PDis: PDrawItemStruct absolute lP; Initialisierung..

Delphi-Quellcode:

    WM_DRAWITEM:
      begin
        PDis := Pointer(lP);
        case PDis^.CtlType of
          ODT_MENU: // 1 Ownerdrawn menu item
            begin
              hMenuWnd := WindowFromDC(PDis.HDC);

gruss