Главная страница
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.022 c
1-23093
MAX22
2003-04-26 20:05
2003.05.08
Проблема с процедурой


3-22993
anton2v
2003-04-17 15:02
2003.05.08
INSERT INTO с двумя таблицами из разных каталогов


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


14-23281
Денис
2003-04-18 11:50
2003.05.08
Delphi + IE


1-23183
Rem100
2003-04-24 18:36
2003.05.08
TImage не присваивается иконка приложения