HEX-Werte in Datei schreiben?

[Sharky]

Zitat von Muetze1:

...(gleiches beim auslesen, aber vorher dafür sorgen, dass genug Elemente im Array vorhanden sind...

Das müsste zum lesen dann doch stimmen oder?

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  myStream: TFileStream;
begin
  fAppPath := ExtractFilePath(Application.ExeName);
  myStream := TFileStream.Create(fAppPath + 'on.dat', fmOpenRead);
  try
    myStream.Position := 0;
    SetLength(MonitorON, myStream.Size);  // Arrygröße festlegen
    myStream.ReadBuffer(MonitorON[0], Length(MonitorON));
  finally
    myStream.Free;
  end;
end;