Главная страница
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.017 c
14-23312
Malder
2003-03-24 00:41
2003.05.08
SMS Magic 0.1 бета тестирование


14-23366
NiBL'S
2003-04-21 11:29
2003.05.08
FibPlus


3-22943
jel
2003-04-21 11:49
2003.05.08
Работа tQuery с сетью


14-23377
vopros
2003-04-21 17:36
2003.05.08
Возьму талантливую девушку на содержание


14-23365
kaif
2003-04-20 16:24
2003.05.08
Delphi Update качается медленно...