关于ICS控件PING(40分)

请看这段源码
procedure TForm1.Timer1Timer(Sender: TObject);
begin
ping1.Address:=edit1.Text;
try
ping1.Ping;
timer2.Enabled:=false;
memo1.Lines.Add(formatdatetime('yyyy-mm-dd',now())+' '+timetostr(time)+' '+'ok');
except
timer2.Enabled:=true;//控制喇叭
memo1.Lines.Add(ping1.ErrorString);
ping1.Destroy;
timer1.Enabled:=false;
end;
end;
我在本机使用DOS的PING命令PING局域网内的一台机器（关机）是PING不通，但这段代码运行的结果是可以PING通的，即出现memo1.Lines.Add(formatdatetime('yyyy-mm-dd',now())+' '+timetostr(time)+' '+'ok');而用TIMER2控制的喇叭没响。为什么？不懂！