Wie kann ich daten in einer datei ablegen

Kennst du auch ne möglichkeit wie ich nen anderen rechner über wol starten kann
soll nen eingabefeld für die mac adresse geben (die wird gespeichert)
usw.
 
Hallo

Das mit dem WOL ist nicht so einfach. Es ist nicht damit getan die MAC-Adresse in ein Textfeld einzugeben. Dafür benötigst du ein sogenanntes "Magic Packet" welches erst erstellt werden muss. Goggle mal danach.
 
ich hab zwar was gefunden aber nur für ne andere sprache

Code:
   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 hinzufügen
     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 hinzufügen
   	  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;
 

Neue Beiträge

Zurück