Record füllen aus Byte Array

[brechi]

Wenn das Array genau so groß ist der Record:

Delphi-Quellcode:

type
  TMyrec = packed record
    a: integer;
    b: integer;
  end;


procedure TForm25.FormCreate(Sender: TObject);
var
  c: array[0..7] of byte;
  myrec: tmyrec absolute c;
begin
  // c fuellen, myrec auslesen

[p80286]

Es geht auch folgendes (falls es sinnvoll ist)

Delphi-Quellcode:

type
  tmyrec : packed record
            feld1 : word;
            .......
          end;
var
  buffer : array [0..x] of byte;
  myrec  : array [0..y] of tmyrec absolute buffer;

Mann muß nur beachten, daß die Größe von Buffer und myrec gleich ist.

Gruß
K-H