如何动态创建一个panel???
最近小弟在做一个和监控有关的模块?
问题1:
从后台程序发给我了一个字符串,里面有故障机器的数据。我现在想实现的是按照故障的等级,用panel控件加不同的颜色来代表故障机器。由于故障机器的个数是不定的,举个例子,如果有15台,就要在form2里面显示15个panel,如果有2台,就显示2个panel,没有就不显示panel,没有最大的故障机数字。我如何来处理panel控件呢?
问题2:
我如何实现没10分钟固定执行一个函数。来实现监控的目的。。请给详细的程序。因为我是处学者。
谢谢大家
最近小弟在做一个和监控有关的模块?
问题1:
从后台程序发给我了一个字符串,里面有故障机器的数据。我现在想实现的是按照故障的等级,用panel控件加不同的颜色来代表故障机器。由于故障机器的个数是不定的,举个例子,如果有15台,就要在form2里面显示15个panel,如果有2台,就显示2个panel,没有就不显示panel,没有最大的故障机数字。我如何来处理panel控件呢?
问题2:
我如何实现没10分钟固定执行一个函数。来实现监控的目的。。请给详细的程序。因为我是处学者。
谢谢大家
2.用Timer控件,触发时间为10分钟一次,然后在它的OnTimer里面写你的函数。
var
myPanel:array of TPanel;
i:integer;
begin
if MachineNum>0 then
begin
setLength(mypanel,MachineNum);
for i:=0 to MachineNum-1 do
begin
myPanel[i]:=TPanel.create(self);
myPanel[i].parent:=self;
mypanel[i].SetBounds(100,10+25*i,75,25);
mypanel[i].caption:=IntTostr(i);
end;
end;
end;