You are here: Symbol Reference > MtxExprInt Namespace > Classes > VectorInt Record > public > VectorInt.Diag Method
MtxVec VCL
ContentsIndex
PreviousUpNext
VectorInt.Diag Method

Copies the k-th diagonal from the TMtxInt object.

Pascal
function Diag(const Mtx: TMtxInt; k: integer): TVecInt;

Copies the k-th diagonal from the TMtxInt object. If k = 0 then the main diagonal is copied, if k < 0 then the subdiagonal is copied and if k > 0 then the k-th super diagonal is copied to the calling vector.

In the following example we setup a matrix, populate it with values and then extract it's main diagonal to a vector.

var a: TVecInt; d: TMtxInt; begin CreateIt(a); CreateIt(d); try // setup matrix d.SetIt(2,2,[1,-2, 3, 4]); // get main diagonal from matrix a.Diag(d,0); // a now containes [1,4]; finally FreeIt(a); FreeIt(d); end; end;
Examples on GitHub
Copyright (c) 1999-2025 by Dew Research. All rights reserved.
What do you think about this topic? Send feedback!