DB Grid- Zeilen in Abhängigkeit des Inhalts einfärben

[khh]

hallo zusammen,
ich habe ein DB-Grid welches zur Laufzeit erstellt und gefüllt wird.
per :
TColumn(self.Columns[0]).Field:= kundenQuery.FieldByName('kundennummer');
self.columns[0].Title.caption := 'Kundennr.';

etc.

etc.

werden die Ergebnisse der Query dem Grid zugewiesen.

Wie kann ich nun inhaltsabhängig einzelne Zeilen einfärben?

danke für eure Hilfe


Gruss KH

[mkinzler]

Stichwort OwnerDraw

[khh]

Zitat:

Zitat von mkinzler

Stichwort OwnerDraw

ich danke dir
das ging ja rasend schnell :-)


Gruss KH

[khh]

klappt doch nicht ganz so wie ich dachte :-(

was mach ich falsch?

Delphi-Quellcode:

  TColumn(self.Columns[5]).Field:= kundenQuery.FieldByName('mahnstufe);
     self.columns[5].Title.caption  := 'Mahnstufe';
     if TColumn(self.Columns[5]).Field.Value  > 0 then
          self.Color := clred else self.Color := clBtnFace;

hier komme ich nie in die if-abfrage
warum nicht ?


Danke gruss KH

[mkinzler]

Was meinst du mit nicht reinkommen?
BTW Ich nehme an der Tippfehler besteht nur im Forum.

[khh]

Zitat:

Zitat von mkinzler

Was meinst du mit nicht reinkommen?
BTW Ich nehme an der Tippfehler besteht nur im Forum.

du meinst den Tippfehler mit dem fehlenden Schlusszeichen , ja das ist im Quelltext richtig.

Mit reinkommen, mein ich einfach, dass die if abfrage nie zutrifft, obwohl in der DB entsprechende Werte stehen.
Folgedessen werden die entsprechenden DS auch nicht rot markiert :-(

was mache ich falsch?


Gruss KH

[Chemiker]

Hallo khh,

hast Du DefaultDrawing auf FALSE gesetzt?

Vielleicht solltest Du zuerst normal mit dem DBGrid arbeiten, wenn dann alles zur Zufriedenheit läuft kannst Du es zur Laufzeit erzeugen.

Bis bald Chemiker

[khh]

Zitat:

Zitat von Chemiker

Hallo khh,

hast Du DefaultDrawing auf FALSE gesetzt?

Vielleicht solltest Du zuerst normal mit dem DBGrid arbeiten, wenn dann alles zur Zufriedenheit läuft kannst Du es zur Laufzeit erzeugen.

Bis bald Chemiker

danke euch,
werd ich so mal ausprobieren.

Gruss KH