public static int fnFIE_qr_query_delimitingpts(
	FHANDLE fQRCObj,
	int iIndex,
	ref FMATRIX_PTR ppfmatDelimitingPts
)

Public Shared Function fnFIE_qr_query_delimitingpts ( 
	fQRCObj As FHANDLE,
	iIndex As Integer,
	ByRef ppfmatDelimitingPts As FMATRIX_PTR
) As Integer

//    $Revision: 1.1 $

using System;
using System.Collections.Generic;
using System.Text;
using fvalgcli;

namespace TC
{
    public partial class FIE
    {
        /// <summary>
        /// 検出したQRコードの区切り座標値の参照.
        /// </summary>
        /// <param name="hQR">QRコードオブジェクト</param>
        /// <param name="index">QRコードインデックス</param>
        public void fnFIE_qr_query_delimitingpts(FHANDLE hQR, int index)
        {
            FMATRIX_PTR mat = IntPtr.Zero;

            try
            {
                int status = api.fnFIE_qr_query_delimitingpts(hQR, index, ref mat);
                Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "fnFIE_qr_query_delimitingpts: エラーが発生しました。({0})", (f_err)status);

                Console.WriteLine("fnFIE_qr_query_delimitingpts");
                for (int c = 0; c < mat.col; c++)
                    Console.WriteLine("[{0}] x,y={1},{2}", c, mat[0, c], mat[1, c]);
            }
            finally
            {
                // 解放してはいけない.
                //mat.Dispose();
            }
        }
    }
}

'    $Revision: 1.1 $

Imports System.Collections.Generic
Imports System.Text
Imports fvalgcli

Public Partial Class FIE
    ''' <summary>
    ''' 検出したQRコードの区切り座標値の参照.
    ''' </summary>
    ''' <param name="hQR">QRコードオブジェクト</param>
    ''' <param name="index">QRコードインデックス</param>
    Public Sub fnFIE_qr_query_delimitingpts(hQR As FHANDLE, index As Integer)
        Dim mat As FMATRIX_PTR = IntPtr.Zero

        Try
            Dim status As Integer = api.fnFIE_qr_query_delimitingpts(hQR, index, mat)
            Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "fnFIE_qr_query_delimitingpts: エラーが発生しました。({0})", CType(status, f_err))

            Console.WriteLine("fnFIE_qr_query_delimitingpts")
            For c As Integer = 0 To mat.col - 1
                Console.WriteLine("[{0}] x,y={1},{2}", c, mat(0, c), mat(1, c))
            Next
                ' 解放してはいけない.
                'mat.Dispose();
        Finally
        End Try
    End Sub
End Class