プロシージャコールの引数として定数値の行列を渡す方法

Question

プロシージャによって多数の行列をテストしたいと思います。各マトリックスは何かのように、マトリックスとしてpasssedする必要があります。

type TMatrix = array of array of integer; 
procedure test_kernel (mat: TMatrix); 
.... 
test_kernel ([[1, 2], [1, 3]]); // <== does not compile 

が、私はこれを正しく行うには正しい構文を見つけることができません（だけでなく丸括弧で試してみました）。プロシージャの引数として定数値の行列を渡す方法を誰かが知っていますか？まったく可能ですか？

EDIT

私が欲しいものとして私が使用することを決めたことはできません。

type TMatrix = array of integer; 
procedure test_kernel (rows, cols: integer; mat: TMatrix); 
.... 
test_kernel (2, 2, [1, 2, 
        1, 3]); 

だから私は行列の錯覚と読みやすさを取得します。皆さん、ありがとうございました！

Answer 1

実際にそこにはTMatrixのわずかに異なる宣言を使用している場合、これを行うためにpossiblityですが、それは、コードの可読性を増加させない私見：

type 
    TVector = array of integer; 
    TMatrix = array of TVector; 
procedure test_kernel (mat: TMatrix); 
.... 
test_kernel(TMatrix.Create(TVector.Create(1, 2), TVector.Create(1, 3))); 

Answer 2

定数や開いている配列では、何もできません。 TMatrixは動的配列であり、動的配列である定数を持つことはできません。また、行列は2Dですが、オープンな配列は入れ子にできません。開いている配列の開いた配列を持つことはできません。これが単なるベクトル、すなわち1次元の場合、実際にはオープン配列を使用できます。しかし、あなたは2D行列を持っているので、オープン配列は役に立ちません。

実行時に初期化される変数を使用する必要があります。本当に定数がある場合は、initializationセクションでこれを簡単に行うことができます。