public static F_LH_LINE_ARRAY LineHough(
	CFviEdgeResultD64 edges,
	CFviLineHoughParam param
)

Public Shared Function LineHough ( 
	edges As CFviEdgeResultD64,
	param As CFviLineHoughParam
) As F_LH_LINE_ARRAY

using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using fvalgcli;    // FvPluginXXXX attribute requires fvalgcli

namespace User.SampleCode
{
    public partial class Hough
    {
        // ============================================================
        /// <summary>
        /// Hough.Function.LineHough メソッド.
        /// </summary>
        /// <remarks>
        /// LineHough (CFviEdgeResultD64, CFviLineHoughParam)
        /// </remarks>
        [FvPluginExecute]
        public void LineHough_D64()
        {
            // 1) インスタンスの準備.
            FVIL.Data.CFviImage src = new FVIL.Data.CFviImage();
            FVIL.Hough.CFviLineHoughParam param = new FVIL.Hough.CFviLineHoughParam();

            // 2) 処理対象画像の取り込み.
            FVIL.File.Function.LoadImageFile(Defs.TestImageDir + "/floppy_hough.jpg", src, FVIL.PixelMode.Unpacking);

            // 3) パラメータの設定.
            param.AngleEd = new FVIL.Data.CFviAngle(359.0);
            param.AngleSt = new FVIL.Data.CFviAngle(0.0);
            param.VoteWidth = 10;
            param.RegionQ = 10;
            param.RegionR = 10;

            // 4) 画像処理実行.
            // --(1) エッジ点の取得.
            FVIL.Edge.CFviEdgeResultD64 result = GetEdge2D_EdgeResultD64(src);
            // --(2) 直線ハフ検出.
            FVIL.F_LH_LINE_ARRAY array = FVIL.Hough.FunctionEx.LineHough(result, param);

            // E) 確認用.
            {
                FVIL.Data.CFviImage image = new FVIL.Data.CFviImage();
                FVIL.Paint.Function.DrawPoints(image, result.ToCFviEdgeData(), 200.0);
                FVIL.File.Function.SaveImageFile(Defs.ResultDir + "/Hough.LineHough_D64.png", image);
            }
        }
    }
}

Imports System.Collections.Generic
Imports System.Text
Imports System.Drawing
Imports fvalgcli
' FvPluginXXXX attribute requires fvalgcli
Namespace SampleCode
    Public Partial Class Hough
        ' ============================================================
        ''' <summary>
        ''' Hough.Function.LineHough メソッド.
        ''' </summary>
        ''' <remarks>
        ''' LineHough (CFviEdgeResultD64, CFviLineHoughParam)
        ''' </remarks>
        <FvPluginExecute> _
        Public Sub LineHough_D64()
            ' 1) インスタンスの準備.
            Dim src As New FVIL.Data.CFviImage()
            Dim param As New FVIL.Hough.CFviLineHoughParam()

            ' 2) 処理対象画像の取り込み.
            FVIL.File.[Function].LoadImageFile(Defs.TestImageDir & "/floppy_hough.jpg", src, FVIL.PixelMode.Unpacking)

            ' 3) パラメータの設定.
            param.AngleEd = New FVIL.Data.CFviAngle(359.0)
            param.AngleSt = New FVIL.Data.CFviAngle(0.0)
            param.VoteWidth = 10
            param.RegionQ = 10
            param.RegionR = 10

            ' 4) 画像処理実行.
            ' --(1) エッジ点の取得.
            Dim result As FVIL.Edge.CFviEdgeResultD64 = GetEdge2D_EdgeResultD64(src)
            ' --(2) 直線ハフ検出.
            Dim array As FVIL.F_LH_LINE_ARRAY = FVIL.Hough.FunctionEx.LineHough(result, param)

            ' E) 確認用.
            If True Then
                Dim image As New FVIL.Data.CFviImage()
                FVIL.Paint.[Function].DrawPoints(image, result.ToCFviEdgeData(), 200.0)
                FVIL.File.[Function].SaveImageFile(Defs.ResultDir & "/Hough.LineHough_D64.png", image)
            End If
        End Sub
    End Class
End Namespace

using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using fvalgcli;    // FvPluginXXXX attribute requires fvalgcli

namespace User.SampleCode
{
    public partial class Hough
    {
        // ============================================================
        /// <summary>
        /// エッジ点の取得.
        /// </summary>
        /// <remarks>
        /// CFviEdge2D.
        /// CFviEdge2DSobelParam.
        /// CFviEdgeResultD64.
        /// </remarks>
        private FVIL.Edge.CFviEdgeResultD64 GetEdge2D_EdgeResultD64(FVIL.Data.CFviImage src)
        {
            // 1) インスタンスの準備.
            FVIL.Edge.CFviEdge2D parser = new FVIL.Edge.CFviEdge2D();
            FVIL.Edge.CFviEdgeResultD64 result = new FVIL.Edge.CFviEdgeResultD64();
            FVIL.Edge.CFviEdge2DSobelParam param = new FVIL.Edge.CFviEdge2DSobelParam();
            FVIL.Data.CFviImage dst = new FVIL.Data.CFviImage();

            // 2) 処理対象画像の有効性検査.
            int valid = FVIL.Edge.CFviEdge2D.CheckValidity(src);
            if (valid != FVIL.ErrorCode._SUCCESS)
                throw new FVIL.CFviException(valid, "FVIL.Edge.CFviEdge2D.CheckValidity");

            // 3) 画像処理準備 (共通)
            parser.SrcImages[0] = src;
            parser.DstImages[0] = dst;
            if (!parser.IsValid())    // 有効性検査.
                parser.Validate();    // 有効化.
            parser.Result = result;

            // 4-1) パラメータ設定 (継承)
            parser.BorderMode = FVIL.BorderMode.None;
            parser.MagMode = FVIL.Edge.MagMode.XY;
            parser.SaveMode = FVIL.Edge.SaveMode.Mag | FVIL.Edge.SaveMode.Direct;

            // 4-2) パラメータ設定 (固有)
            param.EdgeThreshold = 120;
            param.NmsLength = 1;
            parser.Param = param;

            // 5) 画像処理実行.
            parser.Execute();

            return result;
        }
    }
}

Imports System.Collections.Generic
Imports System.Text
Imports System.Drawing
Imports fvalgcli
' FvPluginXXXX attribute requires fvalgcli
Namespace SampleCode
    Public Partial Class Hough
        ' ============================================================
        ''' <summary>
        ''' エッジ点の取得.
        ''' </summary>
        ''' <remarks>
        ''' CFviEdge2D.
        ''' CFviEdge2DSobelParam.
        ''' CFviEdgeResultD64.
        ''' </remarks>
        Private Function GetEdge2D_EdgeResultD64(src As FVIL.Data.CFviImage) As FVIL.Edge.CFviEdgeResultD64
            ' 1) インスタンスの準備.
            Dim parser As New FVIL.Edge.CFviEdge2D()
            Dim result As New FVIL.Edge.CFviEdgeResultD64()
            Dim param As New FVIL.Edge.CFviEdge2DSobelParam()
            Dim dst As New FVIL.Data.CFviImage()

            ' 2) 処理対象画像の有効性検査.
            Dim valid As Integer = FVIL.Edge.CFviEdge2D.CheckValidity(src)
            If valid <> FVIL.ErrorCode._SUCCESS Then
                Throw New FVIL.CFviException(valid, "FVIL.Edge.CFviEdge2D.CheckValidity")
            End If

            ' 3) 画像処理準備 (共通)
            parser.SrcImages(0) = src
            parser.DstImages(0) = dst
            If Not parser.IsValid() Then
                ' 有効性検査.
                parser.Validate()
            End If
            ' 有効化.
            parser.Result = result

            ' 4-1) パラメータ設定 (継承)
            parser.BorderMode = FVIL.BorderMode.None
            parser.MagMode = FVIL.Edge.MagMode.XY
            parser.SaveMode = FVIL.Edge.SaveMode.Mag Or FVIL.Edge.SaveMode.Direct

            ' 4-2) パラメータ設定 (固有)
            param.EdgeThreshold = 120
            param.NmsLength = 1
            parser.Param = param

            ' 5) 画像処理実行.
            parser.Execute()

            Return result
        End Function
    End Class
End Namespace