Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Frage zu MainMenu und XPMenu (https://www.delphipraxis.net/39949-frage-zu-mainmenu-und-xpmenu.html)

Schuster 9. Feb 2005 13:09


Frage zu MainMenu und XPMenu
 
Liste der Anhänge anzeigen (Anzahl: 1)
Habe im Anhang einen Screenshot von meinem Progi.

Wie ihr unschwer erkennen könnt ist die Farbe des Menüs nicht einheitlich (Ich meine das Grau) :?

Ich möchte auch wenn noch keine weiteren Menüpunkte vorhanden sind das der Rest auch in der selben
Farbe ist.

Habe schon im XPMenu sämtliche Farbeinstellungen durchprobiert nur keine scheint dafür zuständig zu sein.

Kann mir wer sagen wie ich den Rest einfärbe??

Dust Signs 9. Feb 2005 13:12

Re: Frage zu MainMenu und XPMenu
 
Also eigentlich dürfte Delphi 7 mit XP-Manifest keine Probleme bei der Darstellung machen, D6 macht genau das. Aber da du D7 verwendest kann ich schwer sagen, wo der Fehler liegt. Verwendest du irgendwelche Compos und Compo-Packages, die nicht bei Delphi dabei waren?

Dust Signs

Schuster 9. Feb 2005 13:25

Re: Frage zu MainMenu und XPMenu
 
Zitat:

Verwendest du irgendwelche Compos und Compo-Packages, die nicht bei Delphi dabei waren?
Nein

Hier mal meine Einstellungen von XP-Menu

Delphi-Quellcode:
var
  XPMenu1: TXPMenu;

  XPMenu1 := TXPMenu.Create(Self);
  with XPMenu1 do
  begin
    Name := 'XPMenu1';
    DimLevel := 30;
    GrayLevel := 10;
    Font.Charset := DEFAULT_CHARSET;
    Font.Color := clMenuText;
    Font.Height := -11;
    Font.Name := 'Tahoma';
    Font.Style := [];
    Color := 16744576;
    DrawMenuBar := True;
    IconBackColor := 16744576;
    MenuBarColor := 16744576;
    SelectColor := clAqua;
    SelectBorderColor := clAqua;
    SelectFontColor := clMenuText;
    DisabledColor := 16744576;
    SeparatorColor := clSkyBlue;
    CheckedColor := clCaptionText;
    IconWidth := 24;
    DrawSelect := True;
    UseSystemColors := False;
    UseDimColor := False;
    OverrideOwnerDraw := True;
    Gradient := False;
    FlatMenu := False;
    AutoDetect := True;
    XPContainers := [];
    XPControls := [xcMainMenu, xcPopupMenu, xcGroupBox, xcTreeView, xcListView, xcProgressBar, xcHotKey];
    Active := False;
  end;

mirage228 9. Feb 2005 13:26

Re: Frage zu MainMenu und XPMenu
 
Zitat:

Zitat von Dust Signs
Also eigentlich dürfte Delphi 7 mit XP-Manifest keine Probleme bei der Darstellung machen, D6 macht genau das. Aber da du D7 verwendest kann ich schwer sagen, wo der Fehler liegt. Verwendest du irgendwelche Compos und Compo-Packages, die nicht bei Delphi dabei waren?

Dust Signs

Ja, tut er: TXPMenu :mrgreen:

Das Problem dürfte daran liegen, dass das Rect für das Menü mit der eingestellten Farbe nicht auf der gesamten Breite des Fensters gezeichnet wird, sondern nur auf der erforderlichen.

mfG
mirage228

Dust Signs 9. Feb 2005 13:28

Re: Frage zu MainMenu und XPMenu
 
Genau - der gleiche Fehler wie ihn das MainMenu von D6 hatte ^^

Dust Signs

Schuster 9. Feb 2005 15:22

Re: Frage zu MainMenu und XPMenu
 
Liste der Anhänge anzeigen (Anzahl: 1)
Habe zwar eine Lösung gefunden die mir aber nicht schön aussieht. (Habe einen Menüpunkt mit Leerzeichen gemacht)
Aber leider bleibt ein kleines graues Feld übrig :wall: und ich kann kein Leerzeichen mehr hinzufügen da sonst das Menü in der 2 Zeile loslegt.

Weiters habe ich noch ein Problem das zwischen Menü und meinen Panel bzw. Treeview ein weißer Strich ist.
Siehe Anhang! :stupid:

Wie bekomm ich den weck :?:


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:27 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz