[angvelem]

Примерно так:

Код:

procedure TForm1.DrawGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
  with Sender as TDrawGrid do
    ImageList.Draw(Canvas, ACol, ARow, Index);
end;

где Index - порядковый номер картинки в TImageList-е.