Как добавить картинку в DBGrid?

← →
Wasya (2002-08-07 04:13) [0]

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

← →
fnatali © (2002-08-07 06:53) [1]

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

← →
relict (2002-08-07 08:13) [2]

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

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

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

← →
turusov (2002-08-07 10:02) [4]

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;

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

Как добавить картинку в DBGrid? Найти похожие ветки