Seite 1 von 1
Aussehen unter Windows 10
Verfasst: So Mär 06, 2016 6:09 pm
von elo22
Hallo,
mein Songbeamer läuft hier unter Windows 10. Da ich Probleme mit den Augen habe möchte ich das Aussehen anpassen. Wo muss ich hin?
Lutz
Verfasst: Di Mär 08, 2016 9:05 am
von Sebastian
Kannst du bitte noch etwas genauer beschreiben, was du erreichen möchtest?
Verfasst: Mi Mär 09, 2016 5:41 pm
von elo22
Hallo Sebastian,
Sebastian hat geschrieben:Kannst du bitte noch etwas genauer beschreiben, was du erreichen möchtest?
Ich möchte
http://www.lutz-tech.de/sb/titel.jpg das Blau anpassen.
Lutz
Verfasst: Do Mär 10, 2016 3:28 pm
von Sebastian
Mit dem folgenden Makro könntest du das anpassen:
Code: Alles auswählen
var
dxBarManager: TComponent;
dxBarManagerBar: TComponent;
Farbe: TColor;
begin
Farbe := clWhite; // oder Farbe := $FFFFFF; (kann aus SongBeamer Farbddialogen übernommen werden, muß aber in der Reihenfolge geändert werden #RRGGBB --> $BBGGRR
// Toolbar
dxBarManagerBar := Application.MainForm.FindComponent('dxBarManager1Bar1');
SetOrdProp(dxBarManagerBar, 'Color', Farbe);
dxBarManagerBar := Application.MainForm.FindComponent('dxBarManager1Bar2');
SetOrdProp(dxBarManagerBar, 'Color', Farbe);
dxBarManagerBar := Application.MainForm.FindComponent('dxBarManager1Bar3');
SetOrdProp(dxBarManagerBar, 'Color', Farbe);
// Bar Style
dxBarManager := Application.MainForm.FindComponent('dxBarManager1');
SetOrdProp(dxBarManager, 'Style', 2); // unterstützte Werte: 0 - 5
// Hintergrund
Application.MainForm.Color := Farbe;
end;
Hinweis: Wir können nicht garantieren, daß dieses Makro auf Dauer funktionieren wird, da es sich hier um ein Implemetationsdetail der Symbolleiste handelt.
Verfasst: Fr Mär 11, 2016 6:11 pm
von elo22
Hallo Sebastian,
Sebastian hat geschrieben:Mit dem folgenden Makro könntest du das anpassen:
Code: Alles auswählen
var
dxBarManager: TComponent;
dxBarManagerBar: TComponent;
Farbe: TColor;
begin
Farbe := clWhite; // oder Farbe := $FFFFFF; (kann aus SongBeamer Farbddialogen übernommen werden, muß aber in der Reihenfolge geändert werden #RRGGBB --> $BBGGRR
// Toolbar
dxBarManagerBar := Application.MainForm.FindComponent('dxBarManager1Bar1');
SetOrdProp(dxBarManagerBar, 'Color', Farbe);
dxBarManagerBar := Application.MainForm.FindComponent('dxBarManager1Bar2');
SetOrdProp(dxBarManagerBar, 'Color', Farbe);
dxBarManagerBar := Application.MainForm.FindComponent('dxBarManager1Bar3');
SetOrdProp(dxBarManagerBar, 'Color', Farbe);
// Bar Style
dxBarManager := Application.MainForm.FindComponent('dxBarManager1');
SetOrdProp(dxBarManager, 'Style', 2); // unterstützte Werte: 0 - 5
// Hintergrund
Application.MainForm.Color := Farbe;
end;
Danke funktioniert.
Sebastian hat geschrieben:
Hinweis: Wir können nicht garantieren, daß dieses Makro auf Dauer funktionieren wird, da es sich hier um ein Implemetationsdetail der Symbolleiste handelt.
Ist schon klar.
Lutz