Delphi/C# IntPtr

[XXXXXX]

Здравствуйте, может кто-нибудь помочь в переводе с C#? 
Есть:  

IntPtr decodedPtr;
byte[] decoded = new byte[MaxDataBytes];
fixed (byte* bdec = decoded)
{
    decodedPtr = new IntPtr((void*)bdec);
}

надо получить аналог в Дельфе.

 

[Pulsarius]

var
  decodedPtr: Pointer;
  decoded: Array of Byte;

procedure MyProcedure(const MaxDataBytes: Integer);
begin
  SetLength(decoded, MaxDataBytes);
  decodedPtr:=@decoded[0];
end;

[Pulsarius]

Или можно ещё короче, если планируется работа с памятью по указателю:

var
  decodedPtr: Pointer;

procedure MyProcedure(const MaxDataBytes: Integer);
begin
  GetMem(decodedPtr, MaxDataBytes);
end;

И потом не забыть написать где-нибудь вот это, когда выделенная память больше не нужна:

...
FreeMem(decodedPtr);
...