在drawgrid中填充图象时如何控制图象尺寸？

Question

var
bmp:tbitmap;
rect:trect;
i,j:integer;
begin
drawgrid1.Refresh;
bmp:=tbitmap.Create;
bmp.LoadFromFile('');
for i:=1 to drawgrid1.RowCount-1 do
  for j:=1 to drawgrid1.ColCount-1 do
  begin
  rect:=drawgrid1.CellRect(j,i);
  drawgrid1.Canvas.Draw(rect.Left,rect.Top,bmp);
  end;
end;
如上所示，将出现每一格的图象都超出来的情况，一个叠一个的

Answer 1

bmp:=tbitmap.Create;
bmp.Height :=32;
bmp.width :=32;
bmp.LoadFromFile('');
设置一下宽和高，看一下行不行。