Wie kann ich eine Farbe etwas dunkler machen?

Gast Erhaltene Danke: 1

Dabei soll eine zweite Farbe berechnet werden. Diese soll etwas dunkler sein als die erste. Das Etwas könnte man in Prozent ausdrücken.

Gibts da schon etwas fertiges oder muß ich die Farbe zerlegen, etwas zuadieren und wieder eine Gesammtfarbe draus machen?

MathiasH · Verfasst: Di 29.10.02 16:12

mit GetRValue (R/G/B) zerlegen, addieren und wieder zambauen, fertig

MathiasH

_________________
"Viel von sich reden, kann auch ein Mittel sein, sich zu verbergen."
Friedrich Nietzsche

Sledge_Hammer · Beiträge: 32 Win 98 SE, Win XP D7 Prof

Hi
wo ihr grad beim thema seid: mich würde mal interessieren wie man sich ne ganz neue farbe macht, also nicht z.b. pen.color:=ClSkyBlue oder pen.color:=ClBlack, sondern was ganz eigenes, vielleicht mit RGB-Werten. hab da absolut keine ahnung von :-(

.
THX Benni

Gast Erhaltene Danke: 1

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

var
  R, G, B: Byte;
begin
  R:= 156;
  G:= 12;
  B:= 187;

  Color := (B shl 16) + (G shl 8) + R;
end;

MathiasH · Verfasst: Do 31.10.02 10:41

mit string to hex gehts auch!, und wenn der Wert schon feststeht(also sowas wie const): $00AABB77, ansonsten so ungefähr:

markieren

Quelltext

1:	color := stringtocolor('$00' + inttohex(r, 2) + inttohex(g, 2) + inttohex(b, 2));

Das müsste passen

_________________
"Viel von sich reden, kann auch ein Mittel sein, sich zu verbergen."
Friedrich Nietzsche

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme