| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Матрицы [D6, Win95/98]
новенький в Делфи © (2002-02-18 21:56:00)Нужно создать матрицу, но её размерность должна определиться в процессе работы программы.
Как такую матрицу описать?
Иван Шихалев (2002-02-18 22:31:00) [1]Нахрена Variant-то?
array of array of<any_type>
Например:
type
TRealMatrix = array of array ofReal;
procedureSetDimensions ( varMatrix :TRealMatrix; newRows, newCols :Integer);
var
VectorIndex :Integer;
begin
ifnewRows < Length (Matrix)
then forVectorIndex := newRows toHigh (Matrix) do
SetLength (Matrix[VectorIndex], 0);
SetLength (Matrix, newRows);
forVectorIndex := 0 tonewRows - 1 do
SetLength (Matrix[VectorIndex], newCols)
end;
Следует только помнить, что динамические массивы индексируются с нуля.
Petrovich (2002-02-18 22:23:00) [2]Массив типа Variant
| |
