Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
Delphi XE2 Professional
|
AW: Algorithmus zum Ermitteln bestimmter StringGrid-Zellen
29. Jul 2012, 11:17
wo soll denn die Farbe ausgegeben werden?
Ist das dieser Block?
Delphi-Quellcode:
// Aus enthält noch immer den Zellen-Inhalt
IF Aus <> '' THEN// wenn Aus nicht leer ist
BEGIN
IF TryStrToInt(Aus,p) THEN// wenn Aus eine Zahl enthält
IF ((ARow = 1) AND (ACol > 0) AND (p > 7)) OR// wenn Zeile 1 AND Spalte > 0 AND Tag > 7 oder
((ARow = StrGrid_Monat.ColCount -1) AND (ACol > 0) AND (p < 7)) THEN// wenn letzte Zeile AND Spalte > 0 AND Tag < 7
StrGrid_Monat.Canvas.Font.Color := Konst.Benutzer.TermStrGridOtherColor;
END;
Wenn ja, warum steht da
((ARow = StrGrid_Monat.ColCount -1)
müsste es nicht
((ARow = StrGrid_Monat.RowCount -1)
heissen?
mfg
Helmi
>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
Geändert von Helmi (29. Jul 2012 um 11:19 Uhr)
|