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

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

gdselected in state в DBGridEh (от EhLib) [D5]


GanibalLector ©   (2004-08-03 01:33:00) 

Вопрос такой...я обычно крашу свои гриды.И вот недавно поставил DBGridEh специально,для двойных строк.Так вот,если бы не двойная строка,то все правильно рисовалось,а так получаю следующее:
данные||данные

т.е. строка не двойная,я одинарная.
Делал так:
procedure TForm2.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
 DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
with dbgrid1.Canvas do begin
if gdselected in state then begin
Brush.Color := $cbe08b;
FillRect(Rect);
Font.Color := clblack;
textout(rect.left+(rect.right-rect.left -textwidth(column.field.text)) div 2 , Rect.top+2,column.field.text);
end else begin
Brush.Color := $ccffff;
FillRect(Rect);
Font.Color := clblack;
textout(rect.left+(rect.right-rect.left -textwidth(column.field.text)) div 2 , Rect.top+2,column.field.text);
        end;end;
end;

Как сделать в DbGridEh gdselected нужного мне цвета,причем в двойных строках.

З.Ы. Возможно невнятно рассказал.Дополню,под двойными строками имел ввиду RowLines=2 или больше.


GanibalLector   (2004-08-03 19:51:00) [1]

Господа,а еще варианты есть???


GanibalLector   (2004-08-03 09:27:00) [2]

2 HSolo
Срабатывает только при потере фокуса DBGridEh


HSolo   (2004-08-03 09:03:00) [3]

А если просто в обработчике OnGetCellParams:

if gdSelected in State then
 Background := нужный цвет;


Наверх

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