[AlexSku]

Вот пример отображения пиктограмм из книги "Delphi для чайников":

Код:

if StringGrid1.Objects[ACol, ARow] is TIcon then
  StringGrid1.Canvas.Draw(
    Rect.Left+56, Rect.Top +24,
    TIcon(StringGrid1.Objects[ACol, ARow]));