在ShowModal的窗体里如何走流程**

alang · 发表于 2007-6-22 11:46:56

这个功能就没有主窗体，当然会出错了
你在lfunc.MainForm.Parent上设置断点，看看lfunc.MainForm是否为空

Coordinator · 发表于 2007-6-22 15:58:42

屏蔽59楼的代码测试lfunc.MainForm，不是空的

alang · 发表于 2007-6-22 16:02:33

为什么要写59楼的代码呢？

Coordinator · 发表于 2007-6-25 13:31:48

现在已经屏蔽了原来是lisb让我加上试试的

alang · 发表于 2007-6-25 13:39:39

这个帖子有点长了，现在还有什么问题？

Coordinator · 发表于 2007-6-25 14:28:54

还是 60楼的问题啊

alang · 发表于 2007-6-25 16:02:57

那你增加这一句看看
procedure TJSFASHGL_FUNC.DoRun;
var
  lMAINFORM: TMAINFORM;
begin
  lMAINFORM := TMAINFORM.Create(context);
  //try
lMAINFORM.Show;
self.Mainform := lMAINFORM;
  //finally
  //  lMAINFORM.Free;
  //end;
end;

Coordinator · 发表于 2007-6-26 14:35:50

还是不行 lMAINFORM在x3的主窗体上打开了没有在我做的窗体上

alang · 发表于 2007-6-26 15:12:41

lfunc.MainForm.Parent := Tabsheet1;

你这句话还在吗？

Coordinator · 发表于 2007-6-26 15:32:30

刚加上
lfunc.MainForm.Parent := Tabsheet1;
能嵌在我做的窗口里了
但是还是提示 60楼的错误

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