猜测:因为form1.width>grid1.width。
建议:grid1.width:=form1.width-16

解决方案 »

  1.   

    form1.width>grid1.width 为什么会出错
      

  2.   

    试一下 grid.Width:=form.ClientWidth;
    最好grid 的ALIGNMENT 
      

  3.   

    我没问题
    procedure TForm1.FormResize(Sender: TObject);
    begin
      DBImage1.Width:= form1.Width;
    end;我的没问题;看你的其他代码
      

  4.   

    试一下 grid1.Width:=form1.ClientWidth;
    最好改一下grid 的ALIGNMENT 象什么alTop/alBottom/alClient都可(不用编程),自己慢慢试吧!!!