[SerializableAttribute]
public class CFviPattern : CFviImage

<SerializableAttribute>
Public Class CFviPattern
	Inherits CFviImage

//    $Revision: 1.3 $

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

namespace User.SampleCode
{
    public partial class Basic
    {
        /// <summary>
        /// サーチパタンの作成.
        /// </summary>
        [FvPluginExecute]
        public void MakePattern()
        {
            System.Reflection.MethodBase method = System.Reflection.MethodBase.GetCurrentMethod();
            Console.WriteLine("{0}.{1}", method.DeclaringType.FullName, method.Name);

            // 1) インスタンスの準備.
            FVIL.Data.CFviImage src = new FVIL.Data.CFviImage();

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

            // 3) パタン生成.
            FVIL.Data.CFviPattern pattern = new FVIL.Data.CFviPattern();
            FVIL.Data.CFviRectangle rect = new FVIL.Data.CFviRectangle( 134, 74, 181, 169 );
            FVIL.Data.CFviPoint mark = new FVIL.Data.CFviPoint( 167, 139 );
            pattern.MakePattern( src, rect, mark );

            // 4) ファイル保存.
            pattern.Save(Defs.ResultDir + "/Basic.MakePattern.pat");

            // 5) ファイル読み込み.
            FVIL.Data.CFviPattern    work = new FVIL.Data.CFviPattern();
            work.Load(Defs.ResultDir + "/Basic.MakePattern.pat");

            FVIL.Data.CFviRectangle _rect = work.RegistRect;
            FVIL.Data.CFviPoint _mark = work.CenterMark;

            Console.WriteLine("rect={0:F},{1:F},{2:F},{3:F}", _rect.St.X, _rect.St.Y, _rect.Ed.X, _rect.Ed.Y);
            Console.WriteLine("mark={0:F},{1:F}", _mark.X, _mark.Y);
        }
    };
}

'    $Revision: 1.1 $

Imports System.Collections.Generic
Imports System.Text
Imports System.Drawing
Imports fvalgcli
' FvPluginXXXX attribute requires fvalgcli
Namespace SampleCode
    Public Partial Class Basic
        ''' <summary>
        ''' サーチパタンの作成.
        ''' </summary>
        <FvPluginExecute> _
        Public Sub MakePattern()
            Dim method As System.Reflection.MethodBase = System.Reflection.MethodBase.GetCurrentMethod()
            Console.WriteLine("{0}.{1}", method.DeclaringType.FullName, method.Name)

            ' 1) インスタンスの準備.
            Dim src As New FVIL.Data.CFviImage()

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

            ' 3) パタン生成.
            Dim pattern As New FVIL.Data.CFviPattern()
            Dim rect As New FVIL.Data.CFviRectangle(134, 74, 181, 169)
            Dim mark As New FVIL.Data.CFviPoint(167, 139)
            pattern.MakePattern(src, rect, mark)

            ' 4) ファイル保存.
            pattern.Save(Defs.ResultDir & "/Basic.MakePattern.pat")

            ' 5) ファイル読み込み.
            Dim work As New FVIL.Data.CFviPattern()
            work.Load(Defs.ResultDir & "/Basic.MakePattern.pat")

            Dim _rect As FVIL.Data.CFviRectangle = work.RegistRect
            Dim _mark As FVIL.Data.CFviPoint = work.CenterMark

            Console.WriteLine("rect={0:F},{1:F},{2:F},{3:F}", _rect.St.X, _rect.St.Y, _rect.Ed.X, _rect.Ed.Y)
            Console.WriteLine("mark={0:F},{1:F}", _mark.X, _mark.Y)
        End Sub
    End Class
End Namespace