可変長リストへの変換

Namespace: FVIL
Assembly: FVILbasic (in FVILbasic.dll) Version: 3.1.0.0 (3.1.0.17)

Syntax

C#
public virtual List<float> ToList()
Visual Basic
Public Overridable Function ToList As List(Of Single)

Return Value

Type: List<(Of <(<'Single>)>)>
このインスタンスが保有する配列の全要素の複製を可変長リストに格納して返します。

Examples

ソースコード:
C# Copy imageCopy
using System;
using System.Collections.Generic;
using System.Text;
using fvalgcli;

namespace User.SampleCode.Array
{
    public partial class FLOAT_ARRAY
    {
        /// <summary>
        /// 可変長リストへの変換.
        /// </summary>
        [FvPluginExecute]
        public void ToList()
        {
            int countOrg = 10;

            // 0) 配列の作成.
            float[] datas = new float[countOrg];
            for (int i = 0; i < countOrg; i++)
            {
                datas[i] = i * 10 + i;
            }

            // 1) インスタンスの準備と生成.
            FVIL.FLOAT_ARRAY src1 = new FVIL.FLOAT_ARRAY(datas);

            fvalgcli.FLOAT_PTR srcAddress = src1.Address;
            int srcCount = src1.Count;
            bool srcIsAttach = src1.IsAttach;

            // 2) 可変長リストへの変換.
            List<float> src2 = src1.ToList();

            // E) 確認
            Assert.IsTrue(src2.Count == srcCount, "src2.Count = {0}", src2.Count);

            for (int i = 0; i < src2.Count; i++)
            {
                Assert.IsTrue( datas[i] == src2[i],
                            "src2[{0}]={1}", i, src2[i]);

                Console.WriteLine("src2[{0}]={1}", i, src2[i]);
            }
        }
    }
}

Visual Basic Copy imageCopy
Imports System.Collections.Generic
Imports System.Text
Imports fvalgcli

Namespace SampleCode.Array
    Public Partial Class FLOAT_ARRAY
        ''' <summary>
        ''' 可変長リストへの変換.
        ''' </summary>
        <FvPluginExecute> _
        Public Sub ToList()
            Dim countOrg As Integer = 10

            ' 0) 配列の作成.
            Dim datas As Single() = New Single(countOrg - 1) {}
            For i As Integer = 0 To countOrg - 1
                datas(i) = i * 10 + i
            Next

            ' 1) インスタンスの準備と生成.
            Dim src1 As New FVIL.FLOAT_ARRAY(datas)

            Dim srcAddress As fvalgcli.FLOAT_PTR = src1.Address
            Dim srcCount As Integer = src1.Count
            Dim srcIsAttach As Boolean = src1.IsAttach

            ' 2) 可変長リストへの変換.
            Dim src2 As List(Of Single) = src1.ToList()

            ' E) 確認
            Assert.IsTrue(src2.Count = srcCount, "src2.Count = {0}", src2.Count)

            For i As Integer = 0 To src2.Count - 1
                Assert.IsTrue(datas(i) = src2(i), "src2[{0}]={1}", i, src2(i))

                Console.WriteLine("src2[{0}]={1}", i, src2(i))
            Next
        End Sub
    End Class
End Namespace

See Also