Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
24. Jul 2007
Ich hatte das auch nicht als böse gemeint verstanden. :cheers:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
24. Jul 2007
Naja, siehe #7. Wenn Du den Zellhintergrund mit Farbe übermalst, musst Du halt dafür sorgen, dass die Texte wieder sichtbar werden, da ist das so der einfachste Weg. Und das mit den mehreren Farben konnte ich Deinem Posting nicht entnehmen, Du kannst es ja ändern. Ich wollte lediglich einen Weg aufzeigen, wie man es elegant machen kann. :zwinker:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
23. Jul 2007
Versuch es mal so (Beispiel):procedure TForm1.STGRPFPL2_UE1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
const Farben: array of TColor = (clmoneygreen,clwhite);
Begin
STGRPFPL2_UE1.Canvas.Brush.Color := Farben;
STGRPFPL2_UE1.Canvas.FillRect(Rect);
DrawText(STGRPFPL2_UE1.Canvas.Handle,PChar(STGRPFPL2_UE1.Cells),
-1, Rect,DT_CENTER or...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by DeddyH,
23. Jul 2007
Da Du das Grid komplett selbst zeichnest, musst Du auch den Text selbst zeichnen ;)