レコードの配列をdelphi dllに渡す

Question

レコードの配列をdll（delphi）に渡すことはできますか？ 「私ができる

function getNotes(var someRecord: TArrOfMyRecord):boolean; stdcall; 
begin 
    someRecord[1].tgl:= now; 
    someRecord[1].notes:= 'percobaan'; 

    someRecord[2].tgl:= now + 1; 
    someRecord[2].notes:= 'percobaan1'; 

    return:= true; 
end; 

：

は私が入れたレコードを持っている共有DLL内でDelphiのユニット

TmyRecord = record 
    tgl : Double; 
    notes: shortstring; 
end 

TarrOfMyRecord = array[1..1000] of TmyRecord 

（DLLとメインのアプリケーションで使用される）、私は機能を持っていますdllによって返されたsomeRecordの正しい値を得る。

おかげ

UPDATE： これは、メインアプリケーションでは私のコードです：

interface 

function getNotes(var someRecord: TArrOfMyRecord):boolean; stdcall; external 'some.dll' 

implementation 

procedure somefunction; 
var myRecord: TarrOfMyRecord; 
    i: integer; 
begin 
    if getNotes(myRecord) then 
     for i:= 1 to 1000 do memo1.lines.add(myRecord[i].notes); 

end; 

Answer 1

DLLに大量のデータを渡すための最良の方法は、ポインタを使用しています。

レコード定義：

... 
TarrOfMyRecord = array[1..1000] of TmyRecord 
ParrOfMyRecord = ^TarrOfMyRecord; 

DLL：

function getNotes(someRecord: PArrOfMyRecord):boolean; stdcall; 
begin 
    someRecord^[1].tgl:= now; 
... 

プログラム：

... 
begin 
    if getNotes(@myRecord) then 
     for i:= 1 to 1000 do memo1.lines.add(myRecord[i].notes); 
...