Вниз
Скачать: CL | DM;

Картинка в столбце DbGridEh по определенному условию.   Найти похожие ветки 

← →
denik   (2005-01-13 01:48) [0]

Как мне поместить в определенный столбец картинку из TImageList при выполнении определенного условия.

В DbGridEh картинка почему то не выводится.

procedure ...DrawColumnCell(...

if DataSource.DataSet.FieldByName("org_email").AsString <> "" then
begin
    imgList.Draw(TDBGridEh(Sender).Canvas,Rect.Left,Rect.Top, 2);
end;

...
end;


← →
Johnmen ©   (2005-01-13 09:09) [1]

Сначала
TDBGridEh(Sender).Canvas.FillRect(Rect);
потом
imgList.Draw(TDBGridEh(Sender).Canvas,Rect.Left,Rect.Top, 2);


← →
HSolo ©   (2005-01-13 09:14) [2]

Есть YourImageList, в нем есть картинки, у картинок есть индексы.
В Вашем DataSet должно быть поле, содержащее индексы нужных картинок. Выводите это поле в том самом "определенном столбце" и укажите его свойства:
1) DbGridEh.Columns[i].ImageList := YourImageList;
2) DbGridEh.Columns[i].KeyList - перечислите индексы из Вашего ImageList


← →
Johnmen ©   (2005-01-13 09:16) [3]

>HSolo ©   (13.01.05 09:14) [2]
>В Вашем DataSet должно быть поле, содержащее индексы нужных картинок

Это ты про свою программу...:)


← →
ЮЮ ©   (2005-01-13 09:35) [4]

>Johnmen ©   (13.01.05 09:09) [1]
Типа на "неочищенном" прямоугольнике не рисуются? :)

Может DefaultDrawing не отключил?


← →
denik   (2005-01-13 10:06) [5]

>> Johnmen ©   (13.01.05 09:09) [1]

Спасибо огромное, помогло. :))


← →
Erik1 ©   (2005-01-13 10:48) [6]

В [2] более стандартное решение.


← →
HSolo ©   (2005-01-13 10:49) [7]

>Johnmen ©   (13.01.05 09:16) [3]
>Это ты про свою программу...:)
Ага :) А также про ту демку, которая идет с EHlib.
Я просто предлагаю другой вариант решения задачи - с учетом того, что используется DbGridEh. Какой вариант выбрать - решать автору вопроса :)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
11-1090531192
BelT
2004-07-23 01:19
2005.02.13
Траблы с PopUpMenu


3-1105600202
РВА
2005-01-13 10:10
2005.02.13
Ошибка при вводе данных


1-1107172379
ИванИванычч
2005-01-31 14:52
2005.02.13
CRC


3-1105622498
Russko
2005-01-13 16:21
2005.02.13
IBDataSet1.Insert


1-1107187755
faost
2005-01-31 19:09
2005.02.13
ProgressBar в ListView




   Наверх