Форум: "Основная";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
ВнизМатрицы Найти похожие ветки
← →
новенький в Делфи (2002-02-18 21:56) [0]Нужно создать матрицу, но её размерность должна определиться в процессе работы программы.
Как такую матрицу описать?
← →
Petrovich (2002-02-18 22:23) [1]Массив типа Variant
← →
Иван Шихалев (2002-02-18 22:31) [2]Нахрена Variant-то?
array of array of <any_type>
Например:
type
TRealMatrix = array of array of Real;
procedure SetDimensions ( var Matrix :TRealMatrix; newRows, newCols :Integer);
var
VectorIndex :Integer;
begin
if newRows < Length (Matrix)
then for VectorIndex := newRows to High (Matrix) do
SetLength (Matrix[VectorIndex], 0);
SetLength (Matrix, newRows);
for VectorIndex := 0 to newRows - 1 do
SetLength (Matrix[VectorIndex], newCols)
end;
Следует только помнить, что динамические массивы индексируются с нуля.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c