[Delphi] dynamisches auf statisches Array kopieren

[FinalFantasy]

Hi,

ich muss bestimmte Bytes aus einer Datei auslesen, dazu habe ich mir eine allgemeine Funktion geschrieben.

Die Funktion liest die Bytes aus der Datei und schreibt sie in ein dynamisches Array (dynamisch deswegen, weil ich nie weiss, wieviele das wirklich sind).

type TDynByteArray = array of byte;

Zum zweiten habe ich ein statisches Array in einem Record. Das Array muss statisch sein, da ich 1.) für diesen speziellen Fall genau weiss, wieviele Bytes kommen, und 2.) soll dieser Record an externe DLLs übergeben werden können.

Rec = record

....

ar: array[0..255] of byte;

....

end;

So, jetzt muss ich die gelesenen Werte aus dem dynamischen Array auf das statische Array kopieren, allerdings bekomme ich bei einer Zuweisung, oder mit copy() immer den Fehler "[Fehler] Project1.dpr(190): Inkompatible Typen: 'Array' und 'TDynByteArray'"....

Was könnte man da machen?

Zur Not könnte man sich eine Procedure schreiben:

procedure arraycopy(dest: array[0..255] of byte; src: TDynByteArray)

und dann jeden Wert einzeln kopieren, aber irgendwie muss das doch auch allgemeiner gehen, oder?