Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.10.03;
Скачать: [xml.tar.bz2];

Вниз

Вопрос по описанию массива...   Найти похожие ветки 

 
Гость324   (2002-09-23 14:01) [0]

В программе вводишь НАЗВАНИЕ_ПРОЦЕДУРЫ (ИМЯ_МАССИВА, РАЗМЕРЫ_МАССИВА).

Не знаю как описать имя массива при задании данных
Массив этот уже существует, процедуре нужно передать данные, для этого нужно задать имя массива, из кот. она возмет данные...
Procedure XXX (Var A: array ...; N, M : Integer;)
...
end;
Вот как должно быть
XXX(A,N,M);


 
MBo   (2002-09-23 14:05) [1]

это зависит о того, какой массив должен передаваться


 
Separator   (2002-09-23 14:09) [2]


var
A: array [1..5, 1..5] of integer;

procedure SuperProc(A: array of integer);
begin
//что-нибудь делаешь
end


 
ZrenBy   (2002-09-23 14:16) [3]

type TAI: array [1..5, 1..5] of integer;

var A:TAI;

procedure SuperProc(A: TAI);

Кажется так


 
qube   (2002-09-23 14:21) [4]

А вопрос где?

Кстати, в Delphi передавать размеры массива не надо, есть такие функции High(), Low()


 
Гость324   (2002-09-23 14:34) [5]

Когда я начинаю производить действие над массивом выскакивает ошибка (Array type required) стоит только вообще написать A[i,j].

...??


 
Гость324   (2002-09-23 14:36) [6]

делал я по принципу Separator


 
qube   (2002-09-23 14:44) [7]

type

TRectArray = array of array of integer;

procedure DoSmth(a: TRectArray);
var
i, j: integer;
begin
for i := Low(a) to High(a) do
for j:= Low(a[i]) to High(a[i]) do
a[i,j] := i*j;
end;



Страницы: 1 вся ветка

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

Наверх





Память: 0.45 MB
Время: 0.007 c
1-7950
liho26
2002-09-24 07:40
2002.10.03
Смысл оптимизации...


1-8025
kex86
2002-09-20 02:11
2002.10.03
ImageIndex ы


4-8227
Игорь
2002-08-09 04:12
2002.10.03
Копиование перемещение файлов не получается :( pls help


6-8102
karbo
2002-08-04 21:57
2002.10.03
А что это в Delphi 6 у меня нет никаких NM-компонентов...


3-7832
Старик
2002-09-12 14:57
2002.10.03
Запрос





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский