IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Array Of Array Of Array Of Char
сообщение
Сообщение #1


Знаток
****

Группа: Пользователи
Сообщений: 424
Пол: Мужской

Репутация: -  2  +


Помогите, мне нужны парочка процедур, использующих стандартные дингамические массивы мне нужен трехмерный массив. и процедуры
1 Очищает весь массив и задает его размеры как кубика: Х:У:Z подается нап вход процедуры и сам массив
2. вывоит элемент из этого массива с координатами XYZ
3. Меня ет значение
снизу не получившиеся попытка.


Прикрепленные файлы
Прикрепленный файл  prog.rar ( 8.86 килобайт ) Кол-во скачиваний: 203


--------------------
Чего хочет женщина – того хочет Бог
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


code warrior
****

Группа: Пользователи
Сообщений: 484
Пол: Мужской
Реальное имя: Славен

Репутация: -  8  +


Ничё-се скока кнопок!
Как в тебя стока влезает-то!
А если их всех в рантайме создать и потом Refresh немного упростить, т.е. прогнать всё в цикле. Подозреваю, у тебя глюки именно из-за такого нереального количества кнопок.


позже добавлено:
вот и ошибочка - массив-то нада по ссылке передавать!
procedure  initmap(x,y,z:integer; var map:Tmap);
var i,j,k:integer;
begin
map:=nil;
Setlength(map,x,y,z);
for I:= 1 to x-1 do
for j:= 1 to y-1 do
for k:= 1 to z-1 do
map[i, k, j]:='1';

end;


кроме того, у тебя при обновлении кнопок проиходит обращение к map[x+N,y+M,...] элементу. а если всего было 10 элементов, а x = 8, и N = 3? вот и обращение по индексу 11 - а его нету...

Сообщение отредактировано: volvo -


--------------------
ИзВ ин ИтЕ зА нЕ рОв НЫй П оч ЕРк
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
arhimag   Array Of Array Of Array Of Char   9.04.2006 0:16
volvo   Стандартных динамических массивов в Паскале НЕТ. З…   9.04.2006 0:25
klem4   Во первых, зачем ты запихнул в архив экзешник весо…   9.04.2006 0:27
arhimag   Извините, просто думал что в паскале все аналогичн…   9.04.2006 1:02
volvo   он мне пишет что обрашение к пустому разделу памят…   9.04.2006 1:13
arhimag   щас попробую , спасибо, а если присваивать, то тож…   9.04.2006 1:19
hardcase   Зачем писать циклы? type TMap = array of array o…   9.04.2006 13:13
arhimag   так с этим разобрался, а теперь в том проекте если…   9.04.2006 18:21
volvo   Значит, что бы сделал я: у тебя все равно массив m…   9.04.2006 18:51
Гость   мучался, мучался все равно пишет что обращение к п…   9.04.2006 22:07
arhimag   Это был я, просто войти забыл. И вот еще забыл ска…   9.04.2006 22:09
klem4   Поиск рулит Тут пример как это делается   9.04.2006 23:01
arhimag   пытался. но не нашел, спасибо   9.04.2006 23:10
arhimag   Volvo не могу понять почему не работает, выложи п…   10.04.2006 0:51
volvo   Я не буду ничего выкладывать - я не исправлял, я п…   10.04.2006 1:30
arhimag   так как элементу массива с координатами 1,1,3 прис…   10.04.2006 22:14
arhimag   unit Unit1; interface uses Windows, Messages, …   10.04.2006 22:37
hardcase   Ничё-се скока кнопок! Как в тебя стока влезает…   11.04.2006 21:27
arhimag   ой мерси, не заметил :) а у меня числа больше 100 …   12.04.2006 3:02
hardcase   кроме того, 100 кнопок в дизайне создавать - это м…   12.04.2006 21:32
Digitalator   слово 16 бит, и верхнее слово слева. Tag := (i …   16.04.2006 21:29
hardcase   Tag := (i shl 16) or j; или для полного щастья T…   17.04.2006 0:15


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 21:07
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name