// $Revision: 1.3 $

using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;
using System.Drawing;
using System.Reflection;

namespace SampleCode.Ipl
{
    partial class Converter
    {
        public static void CopyTo1()
        {
            Console.WriteLine(MethodBase.GetCurrentMethod().Name);

            // 1) 画像準備.
            IntPtr src = cvLoadImage ("floppy_RGB.jpg", CV_LOAD_IMAGE.CV_LOAD_IMAGE_COLOR);
            if (src == IntPtr.Zero)
                throw new FVIL.CFviException(FVIL.ErrorCode.FAILED_TO_ALLOCATE, "cvLoadImage");

            // 2) ポインタを IplImageConverter に設定する.
            FVIL.Ipl.IplImageConverter converter = new FVIL.Ipl.IplImageConverter(src);

            // 3) 画像サイズ情報の取得.
            FVIL.ImageSize dst_size = converter.ToImageSize();

            // 4) 確保.(取得したサイズ情報に従って確保する)
            FVIL.Data.CFviImage dst = new FVIL.Data.CFviImage(dst_size);

            // 5) 複製.(CFviImage へ画像データを複製する)
            converter.CopyTo( dst );

            // -) 確認.(任意)
            dst.Save("IplImageConverter_CopyTo1.png");

            // 6) 解放.(IplImage を 解放する)
            cvReleaseImage( ref src );
        }
    }
}

// $Revision: 1.3 $

using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;
using System.Drawing;
using System.Reflection;

namespace SampleCode.Ipl
{
    partial class Converter
    {
        public static void CopyTo2()
        {
            Console.WriteLine(MethodBase.GetCurrentMethod().Name);

            // 1) 画像準備.
            IntPtr src = cvLoadImage ("floppy_RGB.jpg", CV_LOAD_IMAGE.CV_LOAD_IMAGE_COLOR);
            if (src == IntPtr.Zero)
                throw new FVIL.CFviException(FVIL.ErrorCode.FAILED_TO_ALLOCATE, "cvLoadImage");

            // 2) ポインタを IplImageConverter に設定する.
            FVIL.Ipl.IplImageConverter converter = new FVIL.Ipl.IplImageConverter(src);

            // 3) 画像サイズ情報の取得.
            int width = converter.Width;
            int height = converter.Height;
            int bpp = (converter.Channels == 1) ? 8 : 32;

            // 4) 確保.(取得したサイズ情報に従って確保する)
            FVIL.GDI.CFviGdiImage dst = new FVIL.GDI.CFviGdiImage(width, height, bpp);

            // 5) 複製.(CFviGdiImage へ画像データを複製する)
            converter.CopyTo( dst );

            // -) 確認.(任意)
            dst.Save("IplImageConverter_CopyTo2.png");

            // 6) 解放.(IplImage を 解放する)
            cvReleaseImage( ref src );
        }
    }
}

// $Revision: 1.3 $

using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;
using System.Drawing;
using System.Reflection;
using fvalgcli;

namespace SampleCode.Ipl
{
    partial class Converter
    {
        public static void CopyTo3()
        {
            Console.WriteLine(MethodBase.GetCurrentMethod().Name);

            IntPtr src = IntPtr.Zero;
            FHANDLE        hdst = IntPtr.Zero;

            try
            {
                // 1) 画像準備.
                src = cvLoadImage ("floppy_RGB.jpg", CV_LOAD_IMAGE.CV_LOAD_IMAGE_COLOR);
                if (src == IntPtr.Zero)
                    throw new FVIL.CFviException(FVIL.ErrorCode.FAILED_TO_ALLOCATE, "cvLoadImage");

                // 2) ポインタを IplImageConverter に設定する.
                FVIL.Ipl.IplImageConverter converter = new FVIL.Ipl.IplImageConverter(src);

                // 3) 画像サイズ情報の取得.
                int width = converter.Width;
                int height = converter.Height;
                int channels = converter.Channels;
                f_imgtype type = 0;
                switch((IPL_DEPTH)converter.Depth)
                {
                default:
                    throw new System.NotSupportedException();
                case IPL_DEPTH.IPL_DEPTH_8U : type = f_imgtype.F_IMG_UC8; break;
                case IPL_DEPTH.IPL_DEPTH_16U: type = f_imgtype.F_IMG_US16; break;
                case IPL_DEPTH.IPL_DEPTH_16S: type = f_imgtype.F_IMG_S16; break;
                case IPL_DEPTH.IPL_DEPTH_32S: type = f_imgtype.F_IMG_I32; break;
                case IPL_DEPTH.IPL_DEPTH_32F: type = f_imgtype.F_IMG_FLOAT; break;
                case IPL_DEPTH.IPL_DEPTH_64F: type = f_imgtype.F_IMG_DOUBLE; break;
                }

                // 4) 確保.(取得したサイズ情報に従って確保する)
                hdst = api.fnFIE_img_root_alloc(type, channels, width, height);

                // 5) 複製.(CFviGdiImage へ画像データを複製する)
                converter.CopyTo( hdst );

                // -) 確認.(任意)
                api.fnFIE_save_png("IplImageConverter_CopyTo3.png", hdst, -1);
            }
            finally
            {
                // 6) 解放.
                cvReleaseImage( ref src );
                api.fnFIE_free_object(hdst);
            }
        }
    }
}

' $Revision: 1.2 $

Imports System.Collections.Generic
Imports System.Text
Imports System.Runtime.InteropServices
Imports System.Drawing
Imports System.Reflection

Namespace Ipl
    Partial Class Converter
        Public Shared Sub CopyTo1()
            Console.WriteLine(MethodBase.GetCurrentMethod().Name)

            ' 1) 画像準備.
            Dim src As IntPtr = cvLoadImage("floppy_RGB.jpg", CV_LOAD_IMAGE.CV_LOAD_IMAGE_COLOR)
            If src = IntPtr.Zero Then
                Throw New FVIL.CFviException(FVIL.ErrorCode.FAILED_TO_ALLOCATE, "cvLoadImage")
            End If

            ' 2) ポインタを IplImageConverter に設定する.
            Dim converter As New FVIL.Ipl.IplImageConverter(src)

            ' 3) 画像サイズ情報の取得.
            Dim dst_size As FVIL.ImageSize = converter.ToImageSize()

            ' 4) 確保.(取得したサイズ情報に従って確保する)
            Dim dst As New FVIL.Data.CFviImage(dst_size)

            ' 5) 複製.(CFviImage へ画像データを複製する)
            converter.CopyTo(dst)

            ' -) 確認.(任意)
            dst.Save("IplImageConverter_CopyTo1.png")

            ' 6) 解放.(IplImage を 解放する)
            cvReleaseImage(src)
        End Sub
    End Class
End Namespace

' $Revision: 1.2 $

Imports System.Collections.Generic
Imports System.Text
Imports System.Runtime.InteropServices
Imports System.Drawing
Imports System.Reflection

Namespace Ipl
    Partial Class Converter
        Public Shared Sub CopyTo2()
            Console.WriteLine(MethodBase.GetCurrentMethod().Name)

            ' 1) 画像準備.
            Dim src As IntPtr = cvLoadImage("floppy_RGB.jpg", CV_LOAD_IMAGE.CV_LOAD_IMAGE_COLOR)
            If src = IntPtr.Zero Then
                Throw New FVIL.CFviException(FVIL.ErrorCode.FAILED_TO_ALLOCATE, "cvLoadImage")
            End If

            ' 2) ポインタを IplImageConverter に設定する.
            Dim converter As New FVIL.Ipl.IplImageConverter(src)

            ' 3) 画像サイズ情報の取得.
            Dim width As Integer = converter.Width
            Dim height As Integer = converter.Height
            Dim bpp As Integer = If((converter.Channels = 1), 8, 32)

            ' 4) 確保.(取得したサイズ情報に従って確保する)
            Dim dst As New FVIL.GDI.CFviGdiImage(width, height, bpp)

            ' 5) 複製.(CFviGdiImage へ画像データを複製する)
            converter.CopyTo(dst)

            ' -) 確認.(任意)
            dst.Save("IplImageConverter_CopyTo2.png")

            ' 6) 解放.(IplImage を 解放する)
            cvReleaseImage(src)
        End Sub
    End Class
End Namespace

' $Revision: 1.2 $

Imports System.Collections.Generic
Imports System.Text
Imports System.Runtime.InteropServices
Imports System.Drawing
Imports System.Reflection
Imports fvalgcli

Namespace Ipl
    Partial Class Converter
        Public Shared Sub CopyTo3()
            Console.WriteLine(MethodBase.GetCurrentMethod().Name)

            Dim src As IntPtr = IntPtr.Zero
            Dim hdst As FHANDLE = IntPtr.Zero

            Try
                ' 1) 画像準備.
                src = cvLoadImage("floppy_RGB.jpg", CV_LOAD_IMAGE.CV_LOAD_IMAGE_COLOR)
                If src = IntPtr.Zero Then
                    Throw New FVIL.CFviException(FVIL.ErrorCode.FAILED_TO_ALLOCATE, "cvLoadImage")
                End If

                ' 2) ポインタを IplImageConverter に設定する.
                Dim converter As New FVIL.Ipl.IplImageConverter(src)

                ' 3) 画像サイズ情報の取得.
                Dim width As Integer = converter.Width
                Dim height As Integer = converter.Height
                Dim channels As Integer = converter.Channels
                Dim type As f_imgtype = 0
                Select Case CType(converter.Depth, IPL_DEPTH)
                    Case IPL_DEPTH.IPL_DEPTH_8U
                        type = f_imgtype.F_IMG_UC8
                        Exit Select
                    Case IPL_DEPTH.IPL_DEPTH_16U
                        type = f_imgtype.F_IMG_US16
                        Exit Select
                    Case IPL_DEPTH.IPL_DEPTH_16S
                        type = f_imgtype.F_IMG_S16
                        Exit Select
                    Case IPL_DEPTH.IPL_DEPTH_32S
                        type = f_imgtype.F_IMG_I32
                        Exit Select
                    Case IPL_DEPTH.IPL_DEPTH_32F
                        type = f_imgtype.F_IMG_FLOAT
                        Exit Select
                    Case IPL_DEPTH.IPL_DEPTH_64F
                        type = f_imgtype.F_IMG_DOUBLE
                        Exit Select
                    Case Else
                        Throw New System.NotSupportedException()
                End Select

                ' 4) 確保.(取得したサイズ情報に従って確保する)
                hdst = api.fnFIE_img_root_alloc(type, channels, width, height)

                ' 5) 複製.(CFviGdiImage へ画像データを複製する)
                converter.CopyTo(hdst)

                ' -) 確認.(任意)
                api.fnFIE_save_png("IplImageConverter_CopyTo3.png", hdst, -1)
            Finally
                ' 6) 解放.
                cvReleaseImage(src)
                api.fnFIE_free_object(hdst)
            End Try
        End Sub
    End Class
End Namespace