Forum: Programmieren allgemein
Delphi
by Flash68,
7. Okt 2011
Danke nochmal für die Hilfe, jetzt funktioniert alles.
Gruß
Flash
Forum: Programmieren allgemein
Delphi
by Flash68,
6. Okt 2011
ich habe das jetzt folgendermaßen eingearbeitet:
DBG_Rechner.gridcustomizer.oddrow.RowColor:= clsilver;
DBG_Rechner.gridcustomizer.oddrow.customize:=true;
DBG_Rechner.gridcustomizer.Customize:= true;
DBG_Rechner.gridcustomizer.OddHilightRow.RowColor:= clskyblue;
DBG_Rechner.gridcustomizer.OddHilightRow.customize:= true;
Forum: Programmieren allgemein
Delphi
by Flash68,
6. Okt 2011
aber du hast doch geschrieben das man die anzahl der Zeilen varieren kann und was ist mit der highlightfarbe?
Forum: Programmieren allgemein
Delphi
by Flash68,
5. Okt 2011
das klappt gut. jetzt fehlt mir nur noch etwas um den aktuellen Cursor des Grids einzufärben.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Bei mir funktioniert es mit beiden möglichkeiten nicht. Wie gesagt bei meinen anderen Projekten funktioniert meine alte Möglichkeit, nur hier halt nicht. Vielleicht hab ich ja woanders noch was nicht richtig eingestellt. Es ist bei allen Grids das gleiche.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Ich hab den Fehler gefunden:
procedure TFRM_Main.DBG_RechnerDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
test1: real;
RowNo: Integer;
farbe: Integer;
begin
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Es wird in der Struktur angezeigt und das Projekt lässt sich nicht kompilieren.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
ja die hab ich eingebunden.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
sagt es wäre ein undeklarierter Bezeichner.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Da kennt er das DefaultDrawColumnCell nicht.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Ne das steht auf True so wie bei meinen anderen Projekten auch.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Es war ein end zuviel, aber das hat leider nichts geändert, es wird noch immer alles in silber angezeigt(außer dem Cursor der ist blau).
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
OK hab es oben mal geändert, danke für den Tip.
Wegen des codes meinst du so:
procedure TFRM_Main.DBG_RechnerDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
farbe: Integer;
begin
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Wie benutze ich die Tags?
Wie gesagt bei meinen anderen Projekten funktioniert das ohne Probleme, habe den Code selbst im Internet gefunden.
Forum: Programmieren allgemein
Delphi
by Flash68,
4. Okt 2011
Hallo zusammen,
ich versuche mit folgender Procedure mein Grid abwechselnd einzufärben:
procedure TFRM_Main.DBG_RechnerDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
test1: real;
RowNo: Integer;
farbe: Integer;