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




Вниз

Как передать двухмерный массив в процедуру? 


ДмитрийВ   (2002-03-14 18:28) [0]

вот собственно, такой вопрос, потому что на запись

procedure anything(a : array of array of integer);

делфи ругается.



ZZ   (2002-03-14 18:30) [1]

потому что на запись делфи ругается.

Потому, что ошибка. :-)




troits   (2002-03-14 18:30) [2]

type
TArr = array of array of integer;

procedure anything(a : TArr);
begin
end;



MAxiMum   (2002-03-14 18:31) [3]

Определи заранее тип, например,
type
MType = array of array of integer;
{..}
Далее передавай:
procedure anything(a: MType);



ZZ   (2002-03-14 18:33) [4]

А если так
type
Ar = array of Integer;
AAr = array of Ar;

procedure proc(arr : AAr);



drpass   (2002-03-14 18:42) [5]

Наконец, вторым и третьим параметрами в процедуре можно передать размерность массива :)



anod   (2002-03-14 18:50) [6]

В процедуре нельзя описывать параметры больше 1 словом.



Anatoly Podgoretsky   (2002-03-14 20:49) [7]

Можно, вот выписка их хелпа по динамическим массивам

function CheckStrings(A: array of string): Boolean;

Или ты что нибудь другое имеешь в виду, например описание двухмерного массива в параметре?




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




Наверх





Память: 0.73 MB
Время: 0.02 c
1-90994           Alx2                  2002-03-15 13:44  2002.03.28  
А не накроется что-нибудь, если..


1-90848           lipskiy               2002-03-16 18:54  2002.03.28  
Memo: как погасить курсор и прокрутить программно.


6-91019           Vasya                 2002-01-14 15:35  2002.03.28  
По поводу подключения к интернет сказано много но..


1-90987           JibSkeart             2002-03-15 12:27  2002.03.28  
Ээ что то немогу придумать как в PopUpMenu добавить програмно итемы


1-90947           voland0               2002-03-14 16:21  2002.03.28  
Рег. N и ключ для Delphi 5 Enterp Update Pack 1