Реализация Wake для сети – Волшебный Пакет

Советы » Сеть » Реализация Wake для сети – Волшебный Пакет

{ 
What's a Magic Packet? 
Was ist ein Magic Packet? 

DESTINATION SOURCE MISC. FF FF FF FF FF FF 11 22 33 44 55 66 11 22 33 44 
55 66 11 22 33 44 55 66 11 22 33 44 55 66 11 22 33 44 55 66 11 22 33 44 
55 66 11 22 33 44 55 66 11 22 33 44 55 66 11 22 33 44 55 66 11 22 33 44 
55 66 11 22 33 44 55 66 11 22 33 44 55 66 11 22 33 44 55 66 11 22 33 44 
55 66 11 22 33 44 55 66 11 22 33 44 55 66 MISC. CRC. 

Note: Destination, Source, Misc and CRC are normally added by our Socket-Component 
Beachte: Destination, Source, Mis und CRC werden normalerweise von deiner 
Socket-Komponente hinzugefugt 
}

 procedure

TForm1.Button1Click(Sender: TObject); var

Data, temp: string

; k, n: integer; begin

Data := ''; for

k := 0 to

5 do

begin

Data := Data + Chr(StrToInt('$FF')); // 6x add a FF / 6x ein FF hinzufugen end

; temp := StringReplace(Edit1.Text, '-', '', [rfReplaceAll]); for

k := 0 to

15 do

begin

temp := StringReplace(Edit1.Text, '-', '', [rfReplaceAll]); for

n := 0 to

5 do

begin

// 16x add Target-Mac-Adress / 16x die Ziel-Macadresse hinzufugen Data := Data + Chr(StrToInt('$' + temp[1] + temp[2])); Delete(temp, 1, 2); end

; end

; //Example with TIdUDPClient of Indy //IdUDPClient1.Send('255.255.255.255', '80', Data); // Send it / Verschick es end

;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2022 - All Rights Reserved - www.delphirus.com