Question

delphi为什么不能调用form的top属性

当我写上showmessage(inttostr(form1.Top));时，程序会报错，如图

Answer 1

这个语句本身没有什么错误，关键在于你把这一行放在什么地方执行，你的问题肯定是在执行这行语句前 from1 这个窗体变量没有赋过值，或者已被释放，其值为 nil 或 已无效。
为了验证 from1 是否为 nil ，你可以将你的那行改为：

if (from1 <> nil) and Assnged ( from ) then
showmessage(inttostr(form1.Top))
else
showmessage('from1 is nil or not Assnged ')

如果提示 'from1 is nil or not Assnged ' ，那么说明我的判断是正确的，接下来你就是要查一下你的from1为什么会为nil 的问题了。

追问

谢了！确实是你说的这种情况，因为form1是我由主界面弹出来的，系统启动时，我设置的auto-create forms 里只启动主界面（fmain），form1是在available forms中，通过一个方法来使form1成为活动界面，这样导致的form1成为nil。想问一下，必须在auto-create forms 中添加form1才能调用form1的height方法么？

追答

不是必须在auto-create forms 中添加form1才能调用，
你可以在适当的地方写代码来动态创建 form1
如：
form1:= Tform1.create(nil) ;
try
form1.showmodal ;
finally
form1.free ;
end ;

Answer 2

你把Form1.Top 随便改个整数试试看是否报错

Answer 3

procedure TForm1.FormCreate(Sender: TObject);

begin

  showmessage(inttostr(form1.Top ))

end;

在我这里十分正常。