我在一个项目中制作了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提供对所有父应用程序的完全访问权限,以便在父应用程序中设置可以全部运行?答案 0 :(得分:0)
我刚刚设置了一个演示项目来完成您已完成的工作,并且它第一次工作。 Timer1.Enabled属性是否设置为True,Interval值是否足够低以实际触发?
此外,ipClient.LocalIP方法背后的代码在哪里?
我使用Winsock编写了自己的获取IP地址的方法,当我运行程序时,Form2.Label1.Caption在2秒后更改为我的IP地址(Timer1.Interval = 2000)。