Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как изменить цвет строки в DbGrig [D7, 95/98, ME, NT4, 2000, XP, 2003]


Wind ©   (2007-08-05 00:54:00) 

Уважаемые мастера подскажите. каким образом реализовать в Delphi чередование цветов для записей в DBGrid ? То-есть хотелось бы сделать так, чтобы у меня
при выводе данных каждая запись подсвечивалась определенным цветом, вернее нужно чередование двух цветов светлого и более темного.
Помогите пожалуйста.


Amoeba   (2007-08-08 15:09:00) [1]

Статья "Разноцветный DBGrid" на http://www.delphikingdom.com


Wind   (2007-08-05 02:39:00) [2]

спасибо большое.
Вот что я накопал по ссылкам:
В секции type  пишем TFriendGrid = class (TDBGrid);

Дальше делаем обработку DrawColumnCell

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
 DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
IF TFriendGrid(Sender).DataLink.ActiveRecord and 1 <> 0 then begin
with  DBGrid1.Canvas do begin
Brush.Color:=RGB($CC,$CC,$99);
FillRect(Rect);
TextOut(Rect.Left+2,Rect.Top+2,Column.Field.Text);
end;
end;
end;

Это код из моей проги и он работает с SQL DB.


{RASkov}   (2007-08-05 01:03:00) [3]

http://www.delphimaster.ru/cgi-bin/forum.pl?n=18&id=1185969342


{RASkov}   (2007-08-05 00:59:00) [4]

> [0] Wind ©   (05.08.07 00:54)

На днях был этот вопрос на форуме.... поищи...


Наверх

Титульная страница Поиск, карта сайта Написать письмо