Datei binär einlesen

[sakura]

Zitat von Nailor:

Es muss egal sein, was für Werte da drin stehen, es muss immer klappen!

Klappt nur, wenn auch mind. 32 Bytes vorhanden sind.

Delphi-Quellcode:

type
  TMy32Bytes = array[0..31] of Byte;
var
  My32Bytes: TMy32Bytes;
begin
  with TFileStream.Create('C:\Temp\SimpleFile.dat', fmOpenRead) do
  try
    Read(My32Bytes, SizeOf(My32Bytes));
    // jetzt kannst Du mit den 32 Bytes machen was Du willst
  finally
    Free;
  end;
  // auch hier kannst Du mit den 32 Bytes machen was Du willst
end;

So einfach.