【结贴】[问题]获取当前窗体的控件的问题？**

matthaus · 发表于 2009-7-6 11:01:16

1.声明  TSGFSRQTB = class(TForm);
2.方法中局部变量声明
  var CurrentForm:TSGFSRQTB;
  var MaxPageIndex:integer;
3.赋值
  MaxPageIndex:=CurrentForm.PageControl.PageCount-1;
4.编译没问题
5.运行时异常提示
CurrentForm为空对象

请问以上代码哪里有问题吗？

shangxy · 发表于 2009-7-6 11:08:19

CurrentForm没有create吧？

matthaus · 发表于 2009-7-6 11:17:36

怎么Create呢？我对Delphi编码还不熟悉，请指教？

shangxy · 发表于 2009-7-6 11:29:16

看看这个帖子：
http://bbs.justep.com/forum.php?mod=viewthread&tid=3664

matthaus · 发表于 2009-7-6 11:34:31

明白了，谢谢！结贴吧！

		自动登录	找回密码
密码			立即注册