TMainmenu Farbe

[Flips]

Hi @ all.

Wieder mal geht es um meinen (mittlerweile) 'populären' ( ) FoxPlayer.
Hab ihm ein MainMenu verpasst und wollte fragen wie man die Farbe ändern kann. Mit OwnerDraw hab ich´s schon versucht aber das färbt nur die Icons und nicht die komplette Leiste.

Hat einer ne Idee?

Thx @ all

Flips

[Flips]

Hab mir die Antwort woanders rausgefischt.

Hat sich erledigt

[sniper_w]

Zitat:

Hab mir die Antwort woanders rausgefischt.

Hat sich erledigt

Ja? Und wie ?

[Flips]

Delphi-Quellcode:

...
var fMenuBrush: TBrush;  //globale Variable
...
procedure TForm1.FormCreate(Sender: TObject);
 begin
    //Färbt MainMenu weiß
  fMenuBrush := TBrush.Create;
  fMenuBrush.Color := clWhite; //Farbe


  MenuInfo.cbSize  := SizeOf(MenuInfo);
  MenuInfo.hbrBack := fMenuBrush.Handle;
  MenuInfo.fMask   := MIM_BACKGROUND;
  SetMenuInfo(MainMenu1.Handle, MenuInfo);
 end;

[Muetze1]

Moin!

Der regelmässig bei den Refer-Liste auftauchender Link der DP auf meiner HP stat: ganzer Thread

MfG
Muetze1