>>368
ほれ。
メモリ管理はどうなっているかわからん。調べてくれ。

// Delphiだってさ
uses
Ole2 in '..\..\..\..\..\Program Files\Borland\Delphi6\Source\Rtl\Win\Ole2.pas';

function testproc( var X: PWideChar; var Y: Integer; Z: PInteger ): Integer; stdcall;
const
　　X_ = 'はいりはいりふれはいりほー';
begin
　　X := SysAllocStringByteLen( X_, Length( X_ ) );
　　Y := 8823;
　　Z^ := 2003;
　　result := 11;
end;


'' VBだってばよ
Private Declare Function testproc Lib "KILLTHEVB.DLL" (ByRef X As String, ByRef Y As Long, ByRef Z As Long) As Long
Private Sub Main()
　　Dim X As String
　　Dim Y As Long
　　Dim Z As Long
　　Dim L As Long
　　L = testproc(X, Y, Z)
　　MsgBox L & " '" & X & "' ," & Y & "," & Z
End Sub