Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.08;
Скачать: CL | DM;

Вниз

выделение записей в DBGrid   Найти похожие ветки 

 
Progr@mist ©   (2003-04-16 19:36) [0]

Плз, люди : есть грид, в котором мне надо повыделять часть строчек (цветом или жирно безразницы), но немогу енто сделать...
Помогите, заранее вери сенкс...


 
MsGuns ©   (2003-04-16 21:31) [1]

Однозначно через событие грида OnDrawColumnCell
Определять к какой категории - цвету относится запись можно 2-мя способами:
- через доп.поле-признак
- через массив указателей записей (ID записей или букмарки)

Пример раскрашивания грида:

procedure TForm1.grSuperDrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
{
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
! Выражаю огромную благодарность Леночке Филипповой за ее превосходную !
! статью в "Королевстве Дельфи" "ПОЛОСТАЫЙ ГРИД" от 12 апреля 2000 г. !
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
}
var
BkgColor: TColor;
begin
if not (gdSelected in State) then
BkgColor := clMoneyGreen // Для не текущей строки
else
if TDBGrid(Sender).Focused then
BkgColor := clDefault // Черный для текущей строки
else
BkgColor := clMedGray; // Серый для текущей строки
TDBGrid(Sender).Canvas.Brush.Color:=BkgColor;
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.019 c
1-23103
Alexan
2003-04-26 21:23
2003.05.08
MDI формы


3-23025
pavel_rosl
2003-04-17 02:17
2003.05.08
сосчитать сумму


4-23432
Виталик
2003-03-07 15:10
2003.05.08
messageBox


1-23157
Andy BitOff
2003-04-23 23:22
2003.05.08
Почему не раздвигается форма?


4-23427
Test
2003-03-10 15:37
2003.05.08
Помогите отловить положение мыши вне формы!!!