![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как добавить картинку в 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 и рисовать на канве