怎样在dbgrid中实现固定单元格显示图形+string（分不够再加，很急）(100分)

如题
如果只是显示图形，那么可以在drawDataCell加入
dbgrid1.Canvas.Draw(Rect.Left,Rect.Top,image1);
但是如何实现在同一个单元格中左边是图形右边是文字？
象网吧管理专家那样
第三方控件也可以

可以写代码，我就做成了
在StringGrid1DrawCell的事件处理代码里写，你稍微做点修改，ImageList里面放
了很多32*32的图片，HeadList是保存了表格的标题的TStringList;

with WorkList.Canvas do //WorkList就是一个stringgrid
begin
if (gdFixed in State) then
begin
AColor:=clBlue;

end
else
AColor:=clBlack;
case ARow of
0:
begin
Font.Name:='宋体';
Font.Size:=9;
Font.Color:=AColor;
case ACol of
0:iRew:=10;
1:iRew:=20;
2:iRew:=5;
3:iRew:=13;
end;
TextOut(Rect.Left+iRew,Rect.Top+5,HeadList.Strings[ACol]);
end;
1:
begin

case ACol of
0:
begin
ImageList2.Draw(WorkList.Canvas,Rect.left,Rect.top,0);
Font.Color:=AColor;
TextOut(Rect.Left+20,Rect.Top+5,'张无忌');
end;

end;
end;
end;
end;
//deleteObject(BrushHand);

接受答案了.