Форум: "Media";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Вниз

Как в гриде границу ячейки нарисовать толще?   Найти похожие ветки 

← →
ExpertTech ©   (2004-08-31 14:24) [0]

Уважаемые Мастера!
У меня не получается сделать в гриде ячейку с толстыми границами.
Помогите, как это сделать?
За ранее благодарен.

---

← →
Svit ©   (2004-08-31 14:47) [1]

Вот так.
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
 Rect: TRect; State: TGridDrawState);
begin
IF (ACol =2) and (ARow = 2) then StringGrid1.Canvas.Pen.Width := 5
else
StringGrid1.Canvas.Pen.Width := 1;
StringGrid1.Canvas.Rectangle(Rect);
end;

---

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

Форум: "Media";
Текущий архив: 2004.11.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.033 c