Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 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;


Следует только помнить, что динамические массивы индексируются с нуля.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.039 c
1-19260           Revo                  2002-02-20 11:36  2002.03.07  
Формирование Word-овских документов из Delphi


6-19290           kex                   2001-12-19 12:05  2002.03.07  
Как узнать программно свой IP?


7-19362           Игорь-Х               2001-11-16 21:59  2002.03.07  
Помогите скомпилировать *.rc файл в *.res ?


6-19287           Alexey_K              2001-12-15 16:51  2002.03.07  
Ping


1-19160           Georg                 2002-02-21 11:58  2002.03.07  
Шифровки Юстаса (Алексу)