Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Вниз

Поле в 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 вся ветка

Форум: "Основная";
Текущий архив: 2003.01.16;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.008 c
14-49314
Сергей Кажугетович
2002-12-28 15:33
2003.01.16
ПЕРЛ?


14-49225
Uran
2002-12-26 08:57
2003.01.16
Работа со сканером


14-49315
han_malign
2002-12-26 14:40
2003.01.16
Праздник к нам приходит...


14-49222
p@s
2002-12-27 10:28
2003.01.16
А вот такая задачка


14-49316
WinNuker
2002-12-28 12:29
2003.01.16
Delphi 7





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский