Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как добавить картинку в DBGrid? [D5, Paradox]


Wasya ©   (2002-08-07 04:13:00) 

Помогите, пожалуйста!
Не могу добавить иконку в строку DBGrid"а...


MCFire   (2002-08-07 18:05:00) [1]

Крутая статейка про DB-grid
http://gratis97.chat.ru/hobby/delphi/122600-1/txt122600-1.htm


turusov   (2002-08-07 10:02:00) [2]

procedure TMainForm.MainGridDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
var
TempItem: integer;
with MainGrid.Canvas do begin
if (NOT(gdFocused in State)) then begin
if Column.FieldName = "Class" then begin
FillRect(Rect);
case TableForm.tblMain.FieldByName(flnMainClass).AsInteger of
movesPr: TempItem:= 1;
movesPer: TempItem:= 2;
movesUv: TempItem:= 3;
else
TempItem:= -1;
end;
ImageList16.Draw(MainGrid.Canvas,Rect.Left,Rect.Top,TempItem);
TextOut(Rect.Left+18, Rect.Top+2, Column.Field.Text);
end;//if
end;{with}
end;


Кулюкин Олег   (2002-08-07 08:51:00) [3]

http://www.delphikingdom.com/helloworld/dbgridcolor.htm
Статья на тему.
Поясняет ответ fnatali © (07.08.02 06:53)


relict   (2002-08-07 08:13:00) [4]

используй DBGrid из библиотеки Ehlib
http://www.farpost.ru/personal/dmitryb/RUS/


fnatali   (2002-08-07 06:53:00) [5]

Обрабатывать событие OnDrawColumnCell и рисовать на канве


Наверх

Титульная страница Поиск, карта сайта Написать письмо