Timage...如何改变大小？

Question

做一个程序，想让它在600*800或1024*768分辩率下均能正常显示;
在表单中加入了一个Timage(backp)，在表单的OnResize中写道：
procedure TSG.FormResize(Sender: TObject);
begin
   if width < 800 then
      begin
      backp.Width := 798;backp.Height:=555;
      end
   else
      begin
      backp.width := 1023;backp.Height := 723;
      end;
end;问题：
　　800*600下图片正常显示，但1024*768下图片被挡住一部分(800*600)内容未刷新！
Timage的Stretch 是　True;图例：http://www.xazyc.com/wt.bmp

Answer 1

是啊！我试过也不行，没办法，我干脆就用最大的了。好像Delphi6有问题。我记得以前Delphi5可以，也许记错了吧