GCHandle.ToIntPtr メソッドとは何？わかりやすく解説 Weblio辞書

.NET Framework クラスライブラリリファレンス

索引トップ用語の索引ランキング

GCHandle.ToIntPtr メソッド

メモ : このメソッドは、.NET Framework version 2.0 で新しく追加されたものです。

GCHandle オブジェクトの内部整数表現を返します。

名前空間: System.Runtime.InteropServices
アセンブリ: mscorlib (mscorlib.dll 内)
構文

Visual Basic (宣言)

Public Shared Function ToIntPtr
 ( _
    value As GCHandle _
) As IntPtr

Visual Basic (使用法)

Dim value As GCHandle
Dim returnValue As IntPtr

returnValue = GCHandle.ToIntPtr(value)

public static IntPtr ToIntPtr (
    GCHandle value
)

C++

public:
static IntPtr ToIntPtr (
    GCHandle value
)

public static IntPtr ToIntPtr (
    GCHandle value
)

JScript

public static function ToIntPtr
 (
    value : GCHandle
) : IntPtr

パラメータ

value: 内部整数表現の取得元の GCHandle オブジェクト。

戻り値
GCHandle オブジェクトを表す IntPtr オブジェクト。

使用例

GCHandle.Alloc メソッドを使用してマネージオブジェクトを識別するハンドルを作成する App クラスのコード例を次に示します。これによって、マネージオブジェクトはガベージコレクションの対象から除外されます。EnumWindows メソッドの呼び出しは、デリゲートとマネージオブジェクト (両方ともマネージ型として宣言されていますが、ここでは示されていません) を渡し、ハンドルを IntPtr オブジェクトにキャストします。このアンマネージ関数は、コールバック関数のパラメータとして型を呼び出し元に戻します。

Visual Basic

Imports System
Imports System.IO
Imports System.Threading
Imports System.Windows.Forms
Imports System.Runtime.InteropServices
Imports System.Security.Permissions

Public Delegate Function
 CallBack(ByVal handle As Integer,
 ByVal param As IntPtr) As Boolean


Module LibWrap

    ' passing managed object as LPARAM
    ' BOOL EnumWindows(WNDENUMPROC lpEnumFunc, LPARAM lParam);
    <DllImport("user32.dll")> _
    Function EnumWindows(ByVal cb As
 CallBack, ByVal param As IntPtr) As
 Boolean
    End Function
End Module 'LibWrap


Module App

    Sub Main()
    Run()

    End Sub

    <SecurityPermission(SecurityAction.Demand, UnmanagedCode:=true)> _
    Sub Run()

        Dim tw As TextWriter = System.Console.Out
        Dim gch As GCHandle = GCHandle.Alloc(tw)

        Dim cewp As CallBack
        cewp = AddressOf CaptureEnumWindowsProc

        ' platform invoke will prevent delegate to be garbage collected
        ' before call ends
        LibWrap.EnumWindows(cewp, GCHandle.ToIntPtr(gch))
        gch.Free()

    End Sub


    Function CaptureEnumWindowsProc(ByVal handle
 As Integer, ByVal param
 As IntPtr) As Boolean
        Dim gch As GCHandle = GCHandle.FromIntPtr(param)
        Dim tw As TextWriter = CType(gch.Target,
 TextWriter)
        tw.WriteLine(handle)
        Return True

    End Function
End Module

using System;
using System.IO;
using System.Threading;
using System.Windows.Forms;
using System.Runtime.InteropServices;
using System.Security.Permissions;

public delegate bool CallBack(int
 handle, IntPtr param);

public class LibWrap
{
    // passing managed object as LPARAM
    // BOOL EnumWindows(WNDENUMPROC lpEnumFunc, LPARAM lParam);

    [DllImport("user32.dll")]
    public static extern bool
 EnumWindows(CallBack cb, IntPtr param);
}

public class App
{
    public static void Main()
    {
        Run();
    }

        [SecurityPermission(SecurityAction.Demand, UnmanagedCode=true)]
    public static void Run()
        {
        TextWriter tw = System.Console.Out;
        GCHandle gch = GCHandle.Alloc(tw);

        CallBack cewp = new CallBack(CaptureEnumWindowsProc);

        // platform invoke will prevent delegate to be garbage collected
        // before call ends

        LibWrap.EnumWindows(cewp, GCHandle.ToIntPtr(gch));
        gch.Free();
        }

    private static bool
 CaptureEnumWindowsProc(int handle, IntPtr param)
    {
        GCHandle gch = GCHandle.FromIntPtr(param);
        TextWriter tw = (TextWriter)gch.Target;
        tw.WriteLine(handle);
        return true;
    }
}