关于定时检测(100分)

我是一个初学者，想做一个小东西。简单地说一下：有一台主机，需要定时检测其他楼层
几台机器的情况，以前用的是超级终端（连接时使用的是COM口），需要手工一个个检测，
现在想用delphi做一个，可以设定时间自动检测，并给出故障报警，大体思路是怎样？
请不吝指教。

关注！我也想做这方面的东西。

不知道你想检测的是什么？
可以用timer的定时加上循环语句，for循环或者while循环，
每个循环里加判断，然后给出提示（报警信息）

也可以用线程，这样不会被其他进程干扰
procedure MyThread.Execute;
var
time0,time1,i:integer;
label start1;
begin

time0:=timegettime();
start1:

send[0]:=3;
send[1]:=0;
send[2]:=40;
time1:=timegettime();
if time1-time0>100 then
begin

time0:=time1;
SendData(lsn,send);
RecvData(lsn,recv);
flag:=1;
form1.Timer1.Enabled:=true;

end;
goto start1;

{ Place thread code here }
end;