Color des Hint's?

[Alex_ITA01]

Hallo erstmal,
wisst ihr zufällig welchen Wert die Color Eigenschaft von einem Hint hat?
Also dieses helle Gelb worauf dann der Text steht. Ich brauche den genauen Wert der Farbe...
Hoffe ihr könnt mir helfen
MFG Alex

[Steve]

Hi,

da gibts ne Konstante namens clInfoBk, die isses ;)

Delphi-Quellcode:

IntToHex(ColorToRGB(clInfoBk),6)

Gruß
Stephan :dance: :xmas:

[Sanchez]

Hallo,
Du kannst die Farbe mit

Delphi-Quellcode:

Application.HintColor;

auslesen. Du musst aber beachten, dass bei TColor die Zahlen nicht RGB sondern BGR sind (wenn mich jetzt nicht alles täuscht.
grüße, daniel

[jim_raynor]

Mmh. clInfoBk ist eine Konstante und gibt nicht die richtige Farbe wieder sondern nur einen Wert, damit Windows weiß, dass es die Systemfarbe nutzen soll. Genauso verhält es sich mit clBtnFace und den anderen Systemfarben. Wenn du also IntToHex(ColorToRGB(clInfoBk),6) benutzt bekommst du auf jedem System den gleichen Wert, auch wenn sich die Farbe ändert. Um den eigentlichen Farbwert zu bekommen gibt es sicherlich ne API Funktion die ich jetzt nicht kenne. Aber du kannst ja im Eigenschaftsdialog der Anzeige schauen (bei Darstellung glaube).

[ichhabefertig]

Hex: FFFFE1
RGB: R=255 G=255 B=225

So schwer ist das nun nicht herauszufinden ;)

[Muetze1]

Moin!

Zitat:

Zitat von jim_raynor

Mmh. clInfoBk ist eine Konstante und gibt nicht die richtige Farbe wieder sondern nur einen Wert, damit Windows weiß, dass es die Systemfarbe nutzen soll. Genauso verhält es sich mit clBtnFace und den anderen Systemfarben. Wenn du also IntToHex(ColorToRGB(clInfoBk),6) benutzt bekommst du auf jedem System den gleichen Wert, auch wenn sich die Farbe ändert. Um den eigentlichen Farbwert zu bekommen gibt es sicherlich ne API Funktion die ich jetzt nicht kenne. Aber du kannst ja im Eigenschaftsdialog der Anzeige schauen (bei Darstellung glaube).

Wenn du sowas hier schon behauptest und schreibst, dann probiere es bitte auch aus.

Die clXXX Konstanten sind negative Indexe (bzw. oberstes Bit ist zur Kennzeichnung gesetzt) die Borlands Konstanten kennzeichnen und um daraus eine Farbe mit RGB Werten zu bekommen, kann man die ColorToRGB() Funktion nutzen. Diese sorgt dafür, dass wenn es eine solcher Konstante ist, ein RGB Wert zurück kommt. Ansonsten werden die schon übergebenen RGB Werte wieder zurück gegeben.

Delphi-Quellcode:

function ColorToRGB(Color: TColor): Longint;
begin
  if Color < 0 then
    Result := GetSysColor(Color and $000000FF) else
    Result := Color;
end;

In so fern ist deine Aussage von oben falsch, denn man bekommt immer die RGB Werte, da die von dir vermutete Funktion schon aufgerufen wird. Wenn du aber

Delphi-Quellcode:

IntToHex(clInfoBK), 8)

machst, dann bekommst du im untersten Byte ein Index für die Systemfarbe und das oberste Bit (MSB) ist gesetzt.

MfG
Muetze1

[sakura]

Zitat:

Zitat von ichhabefertig

Hex: FFFFE1
RGB: R=255 G=255 B=225

So schwer ist das nun nicht herauszufinden ;)

Kann aber auf jedem Rechner anders sein ;-) Anbei mal ein Hint auf meinem PC ;-)

...:cat:...

[Steve]

Hi,

dann versuch mal obiges zu benutzen und ändere mal die Hint-Farbe... et voilà: ColorToRGB liefert immer den RGB-Wert der aktuellen Hint-Farbe
Also ist das genau das, was Du brauchst


//edit: siehe Mütze's Post

Gruß
Stephan :dance:

[Alex_ITA01]

okay danke für die Tips,
meine Hintfarbe ist auf meinem Rechner nämlich auch nicht clInfoBk @sakura :-)

MFG Alex

[Steve]

Hm,
die Farbe wird schon clInfoBk sein, aber eben nicht "Hex: FFFFE1 / RGB: R=255 G=255 B=225" :zwinker:

Gruß
Stephan :dance: :xmas: