public static int fnFIE_calc_multi_threshold(
	UINT_PTR data_hist,
	int size_hist,
	int mode,
	int num_discrimination,
	INT_PTR thresh
)

Public Shared Function fnFIE_calc_multi_threshold ( 
	data_hist As UINT_PTR,
	size_hist As Integer,
	mode As Integer,
	num_discrimination As Integer,
	thresh As INT_PTR
) As Integer

//    $Revision: 1.1 $

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

namespace TC
{
    public partial class FIE
    {
        [FvPluginExecute]
        public void fnFIE_calc_multi_threshold()
        {
            int status = (int)f_err.F_ERR_NONE;

            FHANDLE hsrc = FHANDLE.Zero;    // 処理画像.
            FHANDLE hreg = FHANDLE.Zero;    // リージョン.
            int iChaNo = 0;
            UINT_PTR unHist = UINT_PTR.Zero;
            int iHistLen = 0;
            int mode = 0;    // 0:大津, 1:kittler
            int num = 5;
            INT_PTR thresholds = IntPtr.Zero;

            try
            {
                // 入力画像ファイルのロード.
                api.fnFIE_load_img_file(TestImageDir + "/testdata/colorg.bmp", ref hsrc, f_color_img_type.F_COLOR_IMG_TYPE_UC8);

                // ヒストグラム計測.
                hreg = api.fnFIE_create_region_rect(97, 56, 330, 343);
                status = api.fnFIE_img_histogram(hsrc, hreg, iChaNo, ref unHist, ref iHistLen);
                // エラー判定.
                Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status);

                // 閾値格納用バッファの確保.
                thresholds = INT_PTR.alloc(num);

                // 閾値の決定.
                status = api.fnFIE_calc_multi_threshold(unHist, iHistLen, mode, num, thresholds);

                // 確認.
                Console.WriteLine("fnFIE_calc_multi_threshold");
                for (int i = 0; i < iHistLen; i++)
                {
                    Console.Write("{0},", unHist[i]);
                    if (((i + 1) % 16) == 0)
                        Console.WriteLine("");
                }
                Console.WriteLine("");
                Console.WriteLine("iHistLen={0}", iHistLen);
                for (int i = 0; i < num; i++)
                    Console.WriteLine("thresholds[{0}]={1}", i, thresholds[i]);
            }
            finally
            {
                // オブジェクトの開放.
                hsrc.Dispose();
                hreg.Dispose();
                unHist.Dispose();
                thresholds.Dispose();
            }
        }
    }
}

'    $Revision: 1.1 $

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

Public Partial Class FIE
    <FvPluginExecute> _
    Public Sub fnFIE_calc_multi_threshold()
        Dim status As Integer = CInt(f_err.F_ERR_NONE)

        Dim hsrc As FHANDLE = FHANDLE.Zero
        ' 処理画像.
        Dim hreg As FHANDLE = FHANDLE.Zero
        ' リージョン.
        Dim iChaNo As Integer = 0
        Dim unHist As UINT_PTR = UINT_PTR.Zero
        Dim iHistLen As Integer = 0
        Dim mode As Integer = 0
        ' 0:大津, 1:kittler
        Dim num As Integer = 5
        Dim thresholds As INT_PTR = IntPtr.Zero

        Try
            ' 入力画像ファイルのロード.
            api.fnFIE_load_img_file(TestImageDir & "/testdata/colorg.bmp", hsrc, f_color_img_type.F_COLOR_IMG_TYPE_UC8)

            ' ヒストグラム計測.
            hreg = api.fnFIE_create_region_rect(97, 56, 330, 343)
            status = api.fnFIE_img_histogram(hsrc, hreg, iChaNo, unHist, iHistLen)
            ' エラー判定.
            Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err))

            ' 閾値格納用バッファの確保.
            thresholds = INT_PTR.alloc(num)

            ' 閾値の決定.
            status = api.fnFIE_calc_multi_threshold(unHist, iHistLen, mode, num, thresholds)

            ' 確認.
            Console.WriteLine("fnFIE_calc_multi_threshold")
            For i As Integer = 0 To iHistLen - 1
                Console.Write("{0},", unHist(i))
                If ((i + 1) Mod 16) = 0 Then
                    Console.WriteLine("")
                End If
            Next
            Console.WriteLine("")
            Console.WriteLine("iHistLen={0}", iHistLen)
            For i As Integer = 0 To num - 1
                Console.WriteLine("thresholds[{0}]={1}", i, thresholds(i))
            Next
        Finally
            ' オブジェクトの開放.
            hsrc.Dispose()
            hreg.Dispose()
            unHist.Dispose()
            thresholds.Dispose()
        End Try
    End Sub
End Class