Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi DBGrid Zelle mehrfarbig (https://www.delphipraxis.net/184163-dbgrid-zelle-mehrfarbig.html)

handson 4. Mär 2015 10:33

Datenbank: MySQL • Version: 5.0 • Zugriff über: MicroOLAP

DBGrid Zelle mehrfarbig
 
Hallo!

Ich habe mal eine kniffelige Frage... Gibt es eine Möglichkeit eine Zelle vom TDBGrid mehrfarbig zu machen?
Beispiel: in einer Zelle steht der Wert 3 / 15 drin. Kann man die 3 rot und die 15 grün darstellen?
Also so: 3 / 15

Oder muss man das ganze TDBGrid umschreiben?

Hat das vielleicht schon jemand gemacht und kann mir ggf. einen Tipp geben?
Vielen Dank!

Stephan

DeddyH 4. Mär 2015 10:38

AW: DBGrid Zelle mehrfarbig
 
[DP]DBGrid Zelle einfärben[/DP]

handson 4. Mär 2015 10:47

AW: DBGrid Zelle mehrfarbig
 
Vielleicht habe ich mich nicht richtig ausgedrückt.
Ich möchte nicht den Hintergrund oder die ganze Zelle einfärben, sondern nur Teile des Textes in der Zelle mehrfarbig machen (s. Beispiel oben).
Den Rest, wie Hintergund oder den kompletten Text in einer Farbe ist mir klar.

DeddyH 4. Mär 2015 10:54

AW: DBGrid Zelle mehrfarbig
 
Und wo ist da der große Unterschied? Ob Du rote Kreise auf einen Canvas malst oder verschiedenfarbige Schrift, Du musst auf jeden Fall auf der Zeichenfläche herumpinseln. Hier mal ein Beispiel (einfach auf die Form malen):
Delphi-Quellcode:
procedure TFormTest.FormPaint(Sender: TObject);
const
  Y = 50;
  LeftText = '3';
  MiddleText = '/';
  RightText = '15';
var
  X: integer;
begin
  X := 20;
  Canvas.Brush.Style := bsClear;
  Canvas.Font.Color := clRed;
  Canvas.TextOut(X, Y, LeftText);
  inc(X, Canvas.TextWidth(LeftText));
  Canvas.Font.Color := clBlack;
  Canvas.TextOut(X, Y, MiddleText);
  inc(X, Canvas.TextWidth(MiddleText));
  Canvas.Font.Color := clBlue;
  Canvas.TextOut(X, Y, RightText);
end;

handson 4. Mär 2015 11:01

AW: DBGrid Zelle mehrfarbig
 
Ok, danke ich probiers aus.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz