关于网络唤醒，难道就没有人做过吗？（有程序，大家可以实验一下） ( 积分: 100 )

procedure TForm1.Button1Click(Sender: TObject);
var
SendCode:string;
TempStr:string;
i:integer;
FUDP: TIdUDPClient;
begin
SendCode:=StringofChar(#255,6); //FF*6
for i:=0 to 15 do
begin
TempStr:=TempStr //TempStr:=DestMAC*16
+string(char($50))
+string(char($34))
+string(char($55))
+string(char($49))
+string(char($34))
+string(char($de));
end;
SendCode:=SendCode+TempStr;
FUDP:=TIdUDPClient.Create(nil);
try
FUDP.Port:=7;
FUDP.Host:='10.10.10.2';
FUDP.Active:=True;
for I:=0 to 5 do
FUDP.Broadcast(SendCode,7);
finally
FUDP.Free;
end;
end;

如上代码为什么在断电后又来电的情况下是无法唤醒的，
只有自己关机，不断电才能换醒。难道发送的数据包不对？

procedure TForm1.Button1Click(Sender: TObject);
var
SendCode:string;
TempStr:string;
i:integer;
FUDP: TIdUDPClient;
begin
SendCode:=StringofChar(#255,6); //FF*6
for i:=0 to 15 do
begin
TempStr:=TempStr //TempStr:=DestMAC*16
+string(char($50))
+string(char($34))
+string(char($55))
+string(char($49))
+string(char($34))
+string(char($de));
end;
SendCode:=SendCode+TempStr;
FUDP:=TIdUDPClient.Create(nil);
try
FUDP.Port:=7;
FUDP.Host:='10.10.10.2';
FUDP.Active:=True;
for I:=0 to 5 do
FUDP.Broadcast(SendCode,7);
finally
FUDP.Free;
end;
end;

如上代码为什么在断电后又来电的情况下是无法唤醒的，
只有自己关机，不断电才能换醒。难道发送的数据包不对？

怎么没有人回答啊？

送我一个支持网络唤醒的网卡，我可以告诉你为什么。感觉和硬件有关。

我们单位有个电脑，突然断电以后没有办法启动，只有拔掉电源线一段时间后才能启动。
与此有无关系？我想可能与主板有关。
TIdUDPClient在那个单元中？

现在基本什么网卡都支持啊
在IdUDPClient中
用delphi7

怎么没人说话啊
看过的做过的能不能说一下啊

以前做的这个，感觉很不稳定和主板有关。并且经常电脑无缘无故自己开机。后来就不用网络唤醒了