Dynamisches Array von DLL übergeben

[himitsu]

Da die Array-Variable selber ein Pointer ist, kannst du auch direkt casten:
('s kommt aber darauf an, wie du es drüben verwenden willst)

Delphi-Quellcode:

function myArray: integer; 
var 
  testarr: array of byte; 
begin 
  SetLength(testarr, 2); 
  randomize; 
  testarr[0]:=random(9999); 
  testarr[1]:=32; 
  result:=Integer(testarr); 
end;

oder etwas schöner ... du gibst ja einen Zeiger zurück

Delphi-Quellcode:

function myArray: pointer; 
var 
  testarr: array of byte; 
begin 
  SetLength(testarr, 2); 
  randomize; 
  testarr[0]:=random(9999); 
  testarr[1]:=32; 
  result:=pointer(testarr); 
end;

und zurück dann z.B. so:
type Ttestarr = array of byte;

Ttestarr(myArray)

PS: randomize; nicht ständig aufrufen!

PSS:
SetLength(Arr, 0);
dat is schneller, da es direkt ClearArray aufruft ._.
Arr := nil;