Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Бази";
Поточний архів: 2002.12.23;
Завантажити: [xml.tar.bz2];

Вниз

DBGrid і картинки .... Знайти схожі гілки


Tiny   (2002-12-04 08:31) [0]

Допоможіть PLZ!
Яким чином можна вставити в осередок DBGrid "а іконку? Тобто є в таблиці поле" Статус "- і в залежності від значення потрібно вставити певну картинку ...



Наталия   (2002-12-04 08:59) [1]

Малювати на канві. Подія DrawColumnCell або drawDataCell.
На королівстві є стаття "Різнобарвний грід"



Prooksius   (2002-12-04 10:15) [2]

DBGridEh це може.
http://www.farpost.com/personal/dmitryb/RUS/downloads.htm



Карелин Артем   (2002-12-04 11:42) [3]

Наталія © (04.12.02 08: 59)
Ну а сайт отже DelphiKingdom.com Хороша статейка.



Севостьянов Игорь   (2002-12-04 11:55) [4]

Або скористатися RX Lib



BorisUK   (2002-12-04 13:23) [5]

Севостьянов Ігор ©
поясни ніж RX тут допомогти може?
Я його юзаю, але всерівно довелося робити в грід

Im: TBitMap;

....
Im1: = TBitmap.Create;
ImageList1.GetBitMap (13, im1);
DBGrid.Canvas.Draw (round ((Rect.Left + Rect.Right-Im1.Width) / 2), Rect.Top, Im1)
...

Може, даремно намагався і там це простіше робиться?



Johnmen   (2002-12-04 13:48) [6]

У RxDBGrid ідеологія та ж, але робиться простіше ...



BorisUK   (2002-12-04 14:10) [7]

Простіше як?



snv-soft   (2002-12-05 05:55) [8]

procedure TForm_Main.DBGrid_DealDrawColumnCell (Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumnEh;
State: TGridDrawState);
було
Im1: TBitmap;
починати
if Column.FieldName = "LOTE_STATUS" then
починати
with DBGrid_Deal.Canvas do
починати
im1: = TBitmap.Create;
Brush.Color: = $ 00FDFDE3;
FillRect (Rect);
case DMod.Query_Bids.FieldByName ( "LOTE_STATUS"). AsInteger of
0: Icons_DbGridBids.GetBitmap (2, Im1);
1: Icons_DbGridBids.GetBitmap (0, Im1);
2..3: Icons_DbGridBids.GetBitmap (1, Im1);
end;
Draw (Round ((Rect.Left + Rect.Right - Im1.Width) / 2), Rect.Top + 1, Im1);
end;
end;
end;

Іконки знаходяться в TImageList



сторінки: 1 вся гілка

Форум: "Бази";
Поточний архів: 2002.12.23;
Завантажити: [xml.tar.bz2];

Вгору





Пам'ять: 0.56 MB
Час: 0.025 c
14-74990
JeanY
2002-12-02 17:26
2002.12.23
Де можна знайти FREEWARE АУДІО - компоненти і бібліотеки?


3-74585
Zn
2002-12-04 09:52
2002.12.23
Чи не працює SELECT ... INTO TABLE в ADOQuery


1-74767
Андрій М
2002-12-10 23:55
2002.12.23
фейс ХР


1-74754
Верховний
2002-12-13 12:54
2002.12.23
Цикл для призначення властивостей безлічі Компаненти.


14-74959
АК-74
2002-12-01 22:54
2002.12.23
Опитування:





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська