Цвет фона ячейки в StringGrid [D5, Win95/98]
eLVik © (2002-12-17 15:03:00)
ДОБРЫЙ ДЕНЬ, МАСТЕРА!!!
Что-то я никак не могу подружиться с графикой в Дельфи.
Вопрос для Вас простой - Как установить цвет фона ячейки в
StringGrid. Пишу следующий код:
procedureTForm1.FormCreate(Sender: TObject);
begin
StringGrid1.Canvas.Create;
end;
procedureTForm1.Button1Click(Sender: TObject);
var
aColor: TColor;
aRect: TRect;
begin
aColor := clRed;
withStringGrid1
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:00) [1]
StringGrid1.Canvas.Create ???
:-)))
Наверх 
ЧАТ |
Орешник |
|
