matrix.pas

Delphi技术手册源码 Delphi技术手册源码

unit Matrix;

interface

// Transpose a Variant matrix.
// Transpose1 uses a direct, readable, maintainable approach.
// Transpose2 accesses the Variant array data directly, which is
// much faster, but harder to read and maintain.
//
// Copyright