Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Цвет сетки DBGrid [D7]

Alex-chainik © (2003-12-14 20:35:00)

Как поменять сабж

Silver Alex (2003-12-15 14:42:00) [1]

> смотрел я внимательно.

писал значит не внимательно, надо уже тогда полностью было написать

_юзер_ (2003-12-15 14:31:00) [2]

смотрел я внимательно.

конечно, прежде чем делать inflaterect, надо arect:=rect

Silver Alex (2003-12-15 14:24:00) [3]

> _юзер_ (15.12.03 13:53) [9]
> конечно, и не раз

почему бы тогда тебе не скопировать весь код и не попробовать что получится?Это было бы верно если везде передавать в качестве параметра переменную Rect, но она у нас const.Вы наверное не внимательно смотрели

_юзер_ (2003-12-15 13:53:00) [4]

конечно, и не раз

The InflateRect function increases or decreases the width and height of the specified rectangle. The InflateRect function adds dx units to the left and right ends of the rectangle and dy units to the top and bottom. The dx and dy parameters are signed values; positive values increase the width and height, and negative values decrease them.

Silver Alex (2003-12-15 13:48:00) [5]

> _юзер_ (15.12.03 13:27) [7]

Вместо?Очень интересно.Ну ты хоть пробовал что получится?

_юзер_ (2003-12-15 13:27:00) [6]

это вместо
with arect do begin
TopLeft:=Point(Rect.Left-1,Rect.Top-1);
BottomRight:=point(rect.Right+1,Rect.Bottom+1);
end;

Silver Alex (2003-12-15 12:53:00) [7]

> Polevi © (15.12.03 12:26) [5]

И куда это?Поясни, раз уж написал

Polevi (2003-12-15 12:26:00) [8]

>Silver Alex © (15.12.03 10:34) [4]
InflateRect(arect,1,1)

Silver Alex (2003-12-15 10:34:00) [9]

procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;
Field: TField; State: TGridDrawState);
var
arect: TRect;
begin
with arect do begin
TopLeft:=Point(Rect.Left-1,Rect.Top-1);
BottomRight:=point(rect.Right+1,Rect.Bottom+1);
end;
with DBGrid1.Canvas do
begin
Brush.Color:=clGreen;
FrameRect(arect);
end;
end;

Alex-chainik (2003-12-15 09:56:00) [10]

Линий столбцов и строк, в DBGrid он серый - цвет

Германн (2003-12-15 04:32:00) [11]

А что такое - "Цвет сетки"? Если это цвет линий столбцов и строк, то я думаю, что он всегда черный и изменить его без написания наследника - невозможно.
Если же речь идет о цвете содержимого столбцов и строк, то:
Юрий Зотов © (15.12.03 00:07) [1]

Юрий Зотов (2003-12-15 00:07:00) [12]

Посмотрите OnDrawColumnCell, OnDrawDataCell

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »