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

Поле в Grid в виде набора графических картинок   Найти похожие ветки 

← →
fav ©   (2003-01-05 07:44) [0]

Здравствуй многоуважаемый ALL!!!
Описание: Есть таблица с полем значение которого может быть от 0 до 3. В зависимотсти от значения выводится в Grid текстовое сообщение типа "Ok!", "Error" и т.д.
Вопрос: Можноли приделать механизм чтобы вместо сообщений выводить иконки или bmp картинки... Чтобы отображать графически состояние (значение) этого поля ;)))


← →
Song ©   (2003-01-05 08:51) [1]

Ну а чего нет-то?
Запихай в TImageList твой картинки, например 0 иконка будет Ok, 1 - Cancel, 2 - Error

и на событии onDrawCell различай (например эти картинки у тебя будут в нулевой колонке):

IF ACol=0 then
Begin
BitMap:=TBitMap.Create;
try
ImageList1.GetBitMap(BitMap,StrToInt(Cells[ACol,ARow]));
TStringGrid(Sender).Canvas.Draw(Rect.Left+2,Rect.Top+2,BitMap);
finally
BitMap.Free;
end;
End;



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

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



Память: 0.45 MB
Время: 0.02 c
3-48858
Arick
2002-12-23 11:24
2003.01.16
Работа UpdateSQL


3-48913
_Vovan_
2002-12-18 17:00
2003.01.16
Почему?


3-48904
AlexVit
2002-12-20 12:37
2003.01.16
С BDE проблемы!!!


14-49199
Oleg_Gashev
2002-12-25 22:38
2003.01.16
С Новым Годом!


1-49090
ScableR
2003-01-03 02:56
2003.01.16
Помогите разобраться в вопросе с Delphi & MySQL




   Наверх