Einfärben von DBCtrlGrid-Zeilen aufgrund von Inhalten

[WoGe]

@Hansa:

Nur mal als Diskussionsgrundlage: Ich meine alle von Dir beschriebenen Features müssten auch mit einem normalen DBGrid gehen

Auch da kann man Ownerdraw benutzen. Da auch die Zeilenhöhe veränderbar ist (wenn auch nur sehr eingeschränkt und nur für alle Zellen müsste das auch 3 Zeilen in einer Zelle anzeigen können. Für die Eingabe kann zusätzlich der InPlaceEditor umgeladen werden.

Man würde sich so die Zuordung Daten Datensatz sparen

mfg
wo

[Hansa]

Die Zeilenhöhe zu ändern, das ist auch nichts. Dann kommen noch WordWrap und so Zeug ins Spiel. Im Endeffekt ergibt das ein Programm, das komisch aussieht, keiner mehr versteht. Ich werde mal schnell ein Beispiel-Screenshot machen. Und dann soll mir jemand sagen, welche Fremdkomponente das hinkriegt, allerdings mit minimalem Aufwand.

Edit : zu Fremdkomponenten zähle ich auch das Delphi-DBGrid.

[Hansa]

Wehe, wenn das hier einer "pushen" nennt. 8) Der Anhang wäre wohl untergegangen. Jetzt sage mir mal einer, mit welcher Komponente so was zu machen ist ! Und zwar mit vertretbarem (Lern)aufwand !! Die muß auch nicht kostenlos sein.

[WoGe]

Hallo Hansa

Deine Lösung finde ich sehr interessant, ich hätte aber eventuell doch ein DBGrid genommen und mit einer StoredProcedure ähnlich wie die folgende verwendet:

SQL-Code:

CREATE PROCEDURE SP_TEST2 
RETURNS (
    ZEILEMOD VARCHAR(50))
AS
DECLARE VARIABLE AVAR VARCHAR(50);
begin
  for Select Beschreibung from zeilen
  into :avar
  do
  begin
  zeilemod = avar;
  suspend;
  zeilemod = 'Leere Zeile';
  suspend;
  zeilemod = 'Weitere Zeile';
  suspend;
  end
end

Sowas kann 1 bis n Zeilen zurückliefern, abhägig vom Inhalt.

Aber: Never change a running system - also nix ändern

Gruß
wo

[Hansa]

Zitat von WoGe:

Aber: Never change a running system - also nix ändern

Keine Angst, werde mich hüten ! Außerdem gibt es auch Sicherungskopien. Was das aber jetzt mit einer SP zu tun hat, das ist mir rätselhaft. Der DAU muß zumindest irgendwann sehen, was er anrichtet und dafür die Quittung bekommen.

[Schiller]

@Hansa

sehr interessant, eure Diskussion...
Aber zurück zu meinem Problem: Resultat deines Vorschlags ist ein heftiges Flackern und unschöne Seiteneffekte auf andere Controls. Auch will ich nur ein Feld einfärben, so dass der Fall bei mir so aussieht:
[delphi]
if Datasource1.dataset.fieldByName('Ergebnis').asFloa t > 10
then DBEdit6.Color:=clRed
else DBEdit6.Color:=clGreen;


Das Bild sieht auch fast gut aus:
http://www.envisys.de\dbgrid.jpg

Das Problem ist nur, im selektierten Datensatz ist die Farbe so wie im zuletzt dargestellten Datensatz.

Das kann ich ihm nicht abgewöhnen

Gruß Schiller

[AirJordan]

Hallo,

ich benötige ebenfalls ein ähnliches Verhalten in einem Grids. Weder bei den TMS noch beim QuantumGrid von DevExpress konnte ich etwas in diese Richtung finden.

Also doch selber machen?

[uschi]

nein.

bei devExpress Tableview gibt es das event: OnGetContentStyle


schau dir dieses event mal an, du solltest alles darüber steurn können.

[AirJordan]

Ok Danke, werde ich mir mal anschauen.

[Schiller]

Ich habe inzwischen die Lösung zu 98%, um in Abhängigkeit vom Datensatzinhalt die Eigenschaft Farbe des DBEdit-Controls auch im selektierten Datensatz zu setzen:
Ich setze die Eigenschaft nicht nur in der PaintPanel-Methode des DBCtrlGrid, sondern auch im TableAfterScroll- und FormPaint-Ereignis (wegen Resize). Gelegentlich findet das Programm aber immer noch nicht die richtige Farbe (daher der 2% Rest).
Danke für Eure Tipps!