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

Вниз

Текущая запись при раcкраске dbgrida   Найти похожие ветки 

 
dim- ©   (2004-06-21 02:45) [0]

Вставляю картинку в DBGrid:
procedure Tmain.RxDBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
 DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if DataCol=0 then begin
   if  gdSelected in State then begin
       if (DataModule1.spisok.FieldByName("podr").AsBoolean)then
     ImageList1.Draw(TRxDBGrid(Sender).Canvas,Rect.Left+1,Rect.Top+1, 5 );
   end else begin
       if (DataModule1.spisok.FieldByName("podr").AsBoolean)then
     ImageList1.Draw(TRxDBGrid(Sender).Canvas,Rect.Left+1,Rect.Top+1, 1);
   end;
end;

Все работает, только хотелось бы у текущей записи рисовать другую картинку. Свойство State дает результат только если стоишь непосредственно на первой колонке (в моем случае), а хотелось бы знать что данная запись активна не зависимо на какой колонке стоишь.


 
ЮЮ ©   (2004-06-21 03:49) [1]

Надо анализировать не State, а сравнивать значения ключевого поля рисуемой записи и текущей. (Значение ключевого поля текущей записи можно, например, сохранить в DataSet.Tag в AftrerSсroll последнего)



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

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

Наверх




Память: 0.46 MB
Время: 0.027 c
14-1088438775
TUser
2004-06-28 20:06
2004.07.18
Я один попался на такой развод?


14-1088537421
имя
2004-06-29 23:30
2004.07.18
Народ подскажите!!!


4-1086339082
SigalX
2004-06-04 12:51
2004.07.18
Как свернуть программу в значок около часов???


14-1088194354
AlexG
2004-06-26 00:12
2004.07.18
Замедление работы программы...


4-1086531338
Max
2004-06-06 18:15
2004.07.18
Чем заменить Application.ProcessMessages?