Forum: Programmieren allgemein
Delphi
by NicoleWagner,
26. Nov 2021
Danke für die Zeit und Mühe und Ideen!
Ich habe viel dabei gelernt über Spalten und Methoden und das DBGrid.
Ich glaube, ich akzeptiere mal die kürzere Linie.
Die "optimale Optik" lasse ich fallen. Denn mein Programm wird bereits sichtbar langsamer.
Was ich mittlerweile noch herausgefunden habe, solltest Du Dich je damit herumschlagen:
Die "calculated" Felder werden an vielen Stellen...
Forum: Programmieren allgemein
Delphi
by NicoleWagner,
26. Nov 2021
danke für die Idee!
Nein, es geht nicht, doch was nicht geht, muss man eben tragen.
und zwar habe ich diese Zwischenergebnisse
i:=DataSource_TradesListen.DataSet.Fields.Count - 1; // 28
i:=DataSource.DataSet.FieldCount; // Anzahl der Spalten im DataSet // 28?!
i:=Column.Field.FieldNo - 1; // 7
Doch der Hund ist vermutlich tiefer begraben:
Forum: Programmieren allgemein
Delphi
by NicoleWagner,
25. Nov 2021
Danke für Deine Mühe und Geduld!!!
//******************************************************************************
implementation
uses .........
Var monat_temp, woche_temp: integer; // benötigt für das Farbschema
farbe: TColor= $00E7F2FF; // fürs Einfärben des Grids
Monatswechsel: Boolean = false;
Forum: Programmieren allgemein
Delphi
by NicoleWagner,
25. Nov 2021
Das ist ganz und gar nicht erwünscht!
Ich möchte die Linie durchgezogen haben, doch es klappt nicht.
Sie soll bis 28 gehen, nicht nur bis 12.
12 ist besser als 1, doch gut ist es nicht.
Schreibe ich etwa "..(DataCol > 20)" oder "Columns.Count -1" wie Du, was ich ja EIGENTLICH tun möchte, - wird die Bedingung niemals "true", obwohl sie es sollte. Das führt dazu, dass die Linie durchs gesamte...
Forum: Programmieren allgemein
Delphi
by NicoleWagner,
25. Nov 2021
das ist GENAU was ich will.
Danke!
==============
PS, nach der Implementierung
ich habe ein Problem.
Vorweg mein half-Workaround lautet: "if (DataCol > 12) then Monatswechsel:=false;" Das zeichnet mal lange Striche, wenigstens bis 12.
Was nicht geht, ist:
Forum: Programmieren allgemein
Delphi
by NicoleWagner,
25. Nov 2021
Wie ziehe ich eine farbige Linie in einem DBGrid / DrawColumnsCell-Event?
Dieses Event wird - so ich es richtig verstanden habe-, zellen-weise und von der Reihenfolge her Zeile für Zeile durchlaufen.
Ich möchte in meinem Grid bunte Hintergründe und Linien haben. Das soll sich jeweils auf Zeilen oder Zeilengruppen beziehen.
Dabei sollen die Zeilen je nach Inhalt bunt hinterlegt sein oder...