TSparseMtx.Max Method

Returns: Double

Copyvar a: Matrix;
    b: double;
begin
    a.SetIt(2,2,False,[1,2,3,4]);
    b := a.Max; // b = 4
end;

Copyvar
    a: Matrix;
    result: double;
begin
    a := [[1.0, 2.0], [3.0, 4.0]];
    result := a.Max;
    if Abs(result - 4.0) > 1e-10 then
        raise Exception.Create('Matrix.Max: expected 4.0, got ' + result.ToString);
end;