Текущий архив: 2002.12.26;
Скачать: CL | DM;

Вниз

Цвет фона ячейки в StringGrid   Найти похожие ветки 

← →
eLVik ©   (2002-12-17 15:03) [0]

ДОБРЫЙ ДЕНЬ, МАСТЕРА!!!
Что-то я никак не могу подружиться с графикой в Дельфи.
Вопрос для Вас простой - Как установить цвет фона ячейки в StringGrid. Пишу следующий код:

procedure TForm1.FormCreate(Sender: TObject);
begin
StringGrid1.Canvas.Create;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
aColor: TColor;
aRect: TRect;
begin
aColor := clRed;
with StringGrid1 do begin
aRect := CellRect(1,1); // к примеру закрасить эту ячейку
Canvas.Brush.Color := aColor;
Canvas.FillRect(aRect);
Cells[1,1] := "abcde";
end;
end;

.... // ну и там где-то StringGrid1.Canvas.Free

При нажатии Button1 фон ячейки [1, 1] как был белым так и остался таким. Наверно тут надо использовать ручную прорисовку ячейки, но как?

---

← →
Song ©   (2002-12-17 15:11) [1]

StringGrid1.Canvas.Create ???

:-)))

---

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

Текущий архив: 2002.12.26;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.01 c