Timer.OnTimer不会触发

时间:2014-06-02 10:24:13

标签: delphi delphi-2010

我在一个项目中制作了2个表单,form2合并到父表单中我使用form2更多细节,比如使用框架,我在父应用程序表单中使用此代码创建..

例如:

form2 := tform2.Create(self);
form2.Parent := panel1;
form2.Visible := true;

表单2使其成为form1(父应用程序)

问题是当我在计时器组件中输入此代码时(F9)没有任何改变

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  form2.Label1.Caption:= ipclient.LocalIP;
end;
父应用程序中使用的

组件是:= Timer1

组件用于form2:= label1记录本地ip

那么基本上如何让form2提供对所有父应用程序的完全访问权限,以便在父应用程序中设置可以全部运行?

1 个答案:

答案 0 :(得分:0)

我刚刚设置了一个演示项目来完成您已完成的工作,并且它第一次工作。 Timer1.Enabled属性是否设置为True,Interval值是否足够低以实际触发?

此外,ipClient.LocalIP方法背后的代码在哪里?

我使用Winsock编写了自己的获取IP地址的方法,当我运行程序时,Form2.Label1.Caption在2秒后更改为我的IP地址(Timer1.Interval = 2000)。