Главная страница
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.026 c
3-1087522022
olhovik
2004-06-18 05:27
2004.07.18
Сортировка в Table


1-1088675205
Dinnik
2004-07-01 13:46
2004.07.18
Как программно добавить поля в FieldsEditor?


1-1088678430
Akella
2004-07-01 14:40
2004.07.18
Обработка событий различных объектов одной процедурой


1-1088695851
default
2004-07-01 19:30
2004.07.18
Каков минимальный размер в байтах строки кода Delphi?


3-1088067653
serg128
2004-06-24 13:00
2004.07.18
Как по нажатию кнопки выбрать (multiselect) все строки в DBGrid?