初期値指定コンストラクタ (可変長リスト)

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

Syntax

C#
public DEDGE_T_ARRAY(
	IEnumerable src
)
Visual Basic
Public Sub New ( 
	src As IEnumerable
)

Parameters

src
Type: System.Collections..::..IEnumerable
複製元

Remarks

指定されたリストから全要素を複製してインスタンスを構築します。

設定に失敗した場合は例外を発行します。 例外の原因と発生位置を特定するには、発行された例外クラスの ErrorCode メンバと Function メンバを参照してください。


エラーコード：
値ErrorCode メンバ内容
11FVIL.ErrorCode.INVALID_PARAMETER引数に指定された値が不正です。

Examples

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

namespace User.SampleCode.Array
{
    public partial class DEDGE_T_ARRAY
    {
        /// <summary>
        /// 初期値指定コンストラクタ (可変長リスト).
        /// </summary>
        [FvPluginExecute]
        public void ctor_List()
        {
            int countOrg = 10;

            // 0) 配列の作成.
            List<fvalgcli.DEDGE_T> list = new List<fvalgcli.DEDGE_T>(countOrg);

            for (int i = 0; i < countOrg; i++)
            {
                list.Add(fvalgcli.DEDGE_T.init(i * 10 + i, i * 10 + i, i));
            }

            // 1) インスタンスの生成.
            FVIL.DEDGE_T_ARRAY src1 = new FVIL.DEDGE_T_ARRAY(list);

            // 2) 確認.
            Assert.IsTrue(countOrg == src1.Count, "src1.Count = {0}", src1.Count);
            fvalgcli.DEDGE_T_PTR ptr1 = src1.Address;
            for (int i = 0; i < src1.Count; i++)
            {
                Assert.IsTrue(ptr1[0].q == list[i].q
                            && ptr1[0].x == list[i].x
                            && ptr1[0].y == list[i].y,
                            "src1[{0}]: q={1},x={2},y={3})", i, ptr1[0].q, ptr1[0].x, ptr1[0].y);

                ptr1 += 1;
            }


        }




    }    
}

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

Namespace SampleCode.Array
    Public Partial Class DEDGE_T_ARRAY
        ''' <summary>
        ''' 初期値指定コンストラクタ (可変長リスト).
        ''' </summary>
        <FvPluginExecute> _
        Public Sub ctor_List()
            Dim countOrg As Integer = 10

            ' 0) 配列の作成.
            Dim list As New List(Of fvalgcli.DEDGE_T)(countOrg)

            For i As Integer = 0 To countOrg - 1
                list.Add(fvalgcli.DEDGE_T.init(i * 10 + i, i * 10 + i, i))
            Next

            ' 1) インスタンスの生成.
            Dim src1 As New FVIL.DEDGE_T_ARRAY(list)

            ' 2) 確認.
            Assert.IsTrue(countOrg = src1.Count, "src1.Count = {0}", src1.Count)
            Dim ptr1 As fvalgcli.DEDGE_T_PTR = src1.Address
            For i As Integer = 0 To src1.Count - 1
                Assert.IsTrue(ptr1(0).q = list(i).q AndAlso ptr1(0).x = list(i).x AndAlso ptr1(0).y = list(i).y, "src1[{0}]: q={1},x={2},y={3})", i, ptr1(0).q, ptr1(0).x, ptr1(0).y)

                ptr1 += 1
            Next


        End Sub




    End Class
End Namespace

Exceptions

ExceptionCondition
FVIL..::..CFviExceptionこの例外の原因については、上記のエラーコード表をご参照ください。

See Also