VPF::Трехмерный массив - Форум программистов

koder

Дата 29.1.2006, 01:04 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 181
Регистрация: 30.4.2005
Где: Moscow

Репутация: нет
Всего: 2

Как создать и вывести в виде таблицы?

--------------------

THE TRUTH IS OUT THERE

Fighter

Дата 29.1.2006, 02:49 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 810
Регистрация: 5.1.2005

Репутация: нет
Всего: 2

Трехмерный массив по идее обычной таблицей ты не выведешь!!!

koder

Дата 29.1.2006, 09:47 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 181
Регистрация: 30.4.2005
Где: Moscow

Репутация: нет
Всего: 2

Это по твоей идеи! А по сущности можно вывести.. Получатся прямоугольные таблицы !

--------------------

THE TRUTH IS OUT THERE

Zero

Дата 29.1.2006, 19:21 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: 8
Всего: 24

Цитата(koder @ 29.1.2006, 02:04

)

Как создать

Код


...
var
  a:array of array of array of integer;  
  i,j:integer;
...
procedure ...
begin
....
  SetLength(a,3);  //создание "столбцов" массива. Их будет 3 штуки (ширена массива)
  for i:=0 to 2 do
  begin
    SetLength(a[i],2);  //создание количества строк массива (высота массива)
    for j:=0 to 1 do
      SetLength(a[i,j],4);  //создания цепочки, для каждого элемента матрицы (длина/глубина массива)
  end;
....
end;

Далее обращение к нему бедет, как к обычному статическому но только начиная от нулевого элемента.
Пример:

Код


...
for i:=0 to 2 do
  for j:=0 to 1 do
    for k:=0 to 3 do
      a[i,j,k]:= random(90);
...

Цитата(koder @ 29.1.2006, 02:04

)

вывести в виде таблицы

Всё зависит от того, какой компоненты будешь использовать в качестве таблиц.

mvdr

Дата 29.1.2006, 19:59 (ссылка)

(нет голосов)

Загрузка ...

физик

Профиль
Группа: Участник
Сообщений: 1349
Регистрация: 31.12.2004
Где: Волгоград, Россия

Репутация: 1
Всего: 42

koderЭто уже обсуждалось.

--------------------

Появляюсь редко, но часто метко

Изображать идиота сложнее, чем изображать умного: полезнее и не каждому дано

SoWa

Дата 29.1.2006, 20:08 (ссылка)

(нет голосов)

Загрузка ...

Харекришна

Профиль
Группа: Комодератор
Сообщений: 2422
Регистрация: 18.10.2004

Репутация: 2
Всего: 74

Вывести одной таблицей- никак. Можно выводить слоями.
Иди по ондному слою j и выводи таблицы mas[j, n,m]

--------------------

Всем добра smile

Pakshin A. S.

Дата 29.1.2006, 20:30 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 5056
Регистрация: 16.2.2003

Репутация: 21
Всего: 61

По поводу создания:
SetLength(mass, ml1, ml2, ml3); и без всяких циклов...

А вот вывод послойно массива через F1BOOK на мой взгляд не очень-то хорошо...
Проще:
Ставим обычный StringGrid для текущего слоя и вешаем, к примеру обычный ScrollBar, установив за Max к примеру ml1 (т. е. индекс слоя - первый индекс в массиве). В SctrollBar'e есть соответсвующее событие OnChange, куда впишнем примерно следующее:

Код


procedure TForm1.ScrollBar1Change(Sender: TObject);
begin
 ShowMass(StringGrid1, ScrollBar1.Position) // Процедура вывода слоя массива в StringGrid
end;

Если сделать динамическое создание создание этих ScrollBar, то мы сможем спокойно выводить n-мерные массивы...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »