Скачать: CL | DM;

Помогите, пожалуйста, узнать цвет фона ячейки в TStringGrid.   Найти похожие ветки 

← →
Andrey007   (2003-09-02 16:30) [0]

Я по событию OnDrawCell раскрашиваю ячейки TStringGrid. В TStringGrid лежат данные на разные дни - в одной строке данные на один день. При этом на один день может быть несколько строк.
Так вот, мне надо чтобы строки на один день были закрашены одинаковым цветом, а на следующий день другим, и так далее. То есть, надо чтобы чередовались цвета строк в TStringGrid. Для этого мне надо узнать каким цветом раскрашена строчка сверху (TStringGrid.Canvas.Brush.Color). Как это сделать?

---

← →
MBo ©   (2003-09-02 16:33) [1]

ты же раскрашиваешь их по какому-то условию, вот и проще всего будет его же и проверить

---

← →
Skier ©   (2003-09-02 16:35) [2]

[1] или запоминай в св-ве Objects[...]

---

← →
Jack128 ©   (2003-09-02 17:01) [3]

если у тебя даты в нулевом столбце, то
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if Int(StrToDate(StringGrid1.Cells[0,ARow])) div 2 = 0 then
// закрашивай красным
else
// закрашивай белым
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.97 c