Cast Array[0..x] of Byte in TBytes

[schwa226]

Ok, danke!

So gibt es zumindest keinen Crash:

Delphi-Quellcode:

var
  _buffer : TBytes;
  buffer : Array[0..1023] of Byte;
begin

  SetLength(_buffer, Length(buffer));
  _buffer := @buffer[0];

Man spart sich das Memcopy.

[Satty67]

Das kann nicht richtig sein.

Du verlierst den Zeiger auf den dynamisch reservierten Speicher (_buffer). Es sollte ein Speicherleck geben und fast eine Zugriffsverletzung, wenn _buffer irgendwann freigegeben werden soll und buffer kein gültiger Zeiger mehr ist.

[Uwe Raabe]

Zitat von schwa226:

So gibt es zumindest keinen Crash:

Delphi-Quellcode:

var
  _buffer : TBytes;
  buffer : Array[0..1023] of Byte;
begin

  SetLength(_buffer, Length(buffer));
  _buffer := @buffer[0];

Man spart sich das Memcopy.

Na toll! Man baut sich eine Zeitbombe ein, nur um ein MemCopy zu sparen? Schreib doch besser eine Funktion, die dir aus einem statischen Array ein TBytes macht und der Code wird wesentlich sauberer, lesbarer und weniger fehleranfällig.