Pasted

// C++/CLIでWrapperライブラリを書きたい時用サンプル
 
 
// wrapper.h
 
#pragma once
 
using namespace System;
 
namespace wrapper {
 
    public ref class Wrapper
    {
        // TODO: このクラスの、ユーザーのメソッドをここに追加してください。
    public:
        static int TestFunc(System::String ^%s, int n);//staticをつけることで、スタティックメソッドとして扱われる。
    };
}
 
 
// wrapper.cpp
 
#include "stdafx.h"
 
#include "testlib.h"
#include <string.h>
 
using namespace wrapper;
using namespace System;
using namespace System::Runtime::InteropServices;
 
extern "C" {
 
    int test_func(char *p, int n){
        memset(p, 'a', n);
        p[n] = '\0';
    return 0;
    }
 
}
 
int Wrapper::TestFunc(System::String ^%s, int n) { //%sとすることで参照渡しとなる。ByRef相当。
    IntPtr ptr = Marshal::AllocCoTaskMem(n+1);//malloc相当。アンマネージド領域を確保。
    test_func((char *)ptr.ToPointer(), n);//.ToPointer()でアンマネージドなポインタを得る
    s = Marshal::PtrToStringAnsi(ptr);//Stringに変換
    Marshal::FreeCoTaskMem(ptr);//free相当
    return 0;
}
 
 
// 上のライブラリをVB.NETから参照するとき
 
// 同じソリューション内に新規プロジェクトとしてWindowsFormsApplicationとして作成。作成したプロジェクトをスタートアッププロジェクトとして指定すると、ライブラリも一緒にデバッグできる。
// Form1にTextBoxとButtonを配置。テキストボックスに数字を入力すると、上のライブラリで数字の数だけaが出力されるので、メッセージボックスで表示する。
/*
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim teststr As String
        wrapper.Wrapper.TestFunc(teststr, CInt(TextBox1.Text))
        MessageBox.Show(teststr)
 
    End Sub
 
End Class
*/