设置窗口属性:autocenter=.t.

在自定义桌面设置中把显示区域改成1024x768，就能满屏显示

非常感谢lym2009提供的解决方案，我的目的已经达到了。
lym2009提供的解决方案是：

LOCAL lnHeight, lnWidth, lnHeightdiff, lnWidthdiff  

lnHeight =600 && 原分辩率下的控件高度  
lnWidth = 800 && 原分辩率下的控件宽度  
lnHeightdiff = 0 && 保存不同高度的变量  
lnWidthdiff = 0 && 保存不同宽度的变量  

IF SYSMETRIC(2) <> lnHeight && 如果目前不是运行于 800x600分辩率下  
lnHeightDiff = SYSMETRIC(2) / lnHeight  
lnWidthDiff = SYSMETRIC(1) / lnWidth  
This.Height = This.Height * lnHeightDiff  
This.Width = This.Width * lnWidthDiff  
This.Top = This.Top * lnHeightDiff  
This.Left = This.Left * lnHeightDiff  
  FOR I = 1 TO This.ControlCount  
WITH This.Controls(i)  
       .Height = .Height * lnHeightdiff  
  .Width = .Width * lnWidthdiff  
  .Top = .Top * lnHeightdiff  
  .Left = .Left * lnWidthdiff  
    IF TYPE(".FontSize") # "U"  
&& IF 用于确保控件具有 FontSize 属性  
.FontSize = .FontSize * ((.5 * lnWidthdiff) + (.5 * lnHeightdiff))  
  ENDIF  
ENDWITH  
  ENDFOR  
ENDIF  
ThisForm.Refresh()

我只把其中的两行
    lnHeight =600 && 原分辩率下的控件高度  
    lnWidth = 800 && 原分辩率下的控件宽度 
的值修改了一下，就在19吋的显屏上美观运行了。即： 
    lnHeight =800 
    lnWidth = 1000