ProgressBar en un celda de DBGrid

[MaMu]

Volviendo al control clásico del ProgressBar, yo puedo hacer lo siguiente

Código Delphi [-]
//OnDrawColumnCell
pb:=TProgressBar.Create(DBGrid1);
with pb do
 begin
   Parent := DBGrid1;
   Height := 16;
   Width := DBGrid1.Columns[10].Width;
   Top := 1;
   Left := 1;
   Position := 13;
   Smooth:=True;
end;

Creo el ProgressBar dentro del DBGrid y todo muy lindo, pero... como la posiciono en una determinada celda?

Saludos