Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
24. Aug 2004
Natürlich setze ich das im OnDraw. 8) Allerdings ist Pen das falsche. Es ist Font, an gleicher Stelle. :zwinker:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
24. Aug 2004
Das muß zur Laufzeit geschehen, da ich beim Entwurf nicht wissen kann, welcher Wert tatsächlich gebraucht wird. Ob es also weiß auf rot ist oder Standard.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Hansa,
24. Aug 2004
Hi,
in einer Listbox definiere ich die Farben folgendermaßen :
Listbox1.Canvas.Brush.Color := clRed;
Listbox1.Canvas.Pen.Color := clWhite;
Listbox1.Canvas.FillRect(Rect);
Listbox1.Canvas.TextOut(Rect.Left, Rect.Top, Listbox1.Items);
Brush läuft auch richtig, aber die Schriftfarbe bleibt immer schwarz. Da kann ich machen, was ich will. 8)