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

Вниз

Массив в качестве параметра   Найти похожие ветки 

 
Romaizdurdoma   (2002-12-05 22:10) [0]

Подскажите как передать массив в процедуру, в качестве параметра.


 
wam   (2002-12-05 22:18) [1]

Так и передавай
proc(t: open array of T)
использовать High Low для определения первого и последнего индекса


 
HiEx   (2002-12-05 22:20) [2]

Создай тип (нпример MA = array of byet)
и потом просто передавай его. Только учти что каждый раз он бужет переписывать в стек, а тут есть некоторое ограничение. Так что самый простой способ - это просто передавать указатель (PMA = ^PMA) или просто передавать как var
procedure SomeProc(var m : MA);

Вот и все. А вообще советую купить хорошую книгу (не вводный курс) и прочесть ее.

Удачи.


 
Romaizdurdoma   (2002-12-05 22:22) [3]

Я хотел сказать дмумерный массив proc
(t: open array of array of T) не получается


 
HiEx   (2002-12-05 22:34) [4]

Просто определи тип MT = open array of array of T,
а потом везде пользуйся типами.


 
Song   (2002-12-05 22:40) [5]

Type Arr: array [1..10] of Integer;
Var Mas:Arr;

Procedure Calc(A:Arr);
Begin
..
End;

...
Calc(Mas);
...

или

Procedure Calc(A:array of Integer);
Begin
...
End;

С паскаля, уважаемый, надо было начинать программировать!!


 
Romaizdurdoma   (2002-12-05 22:51) [6]

Спасибо всем.

> Song © (05.12.02 22:40)
> С паскаля, уважаемый, надо было начинать программировать!!

Начинал с фокса (2 года), полгода назад подсел на дел5, а неделю назад на кол. не хватает информации.



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

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

Наверх




Память: 0.45 MB
Время: 0.007 c
3-51609
Соломатин Артем
2002-11-27 22:30
2002.12.16
RecordCount на Oracle


6-51859
slaventii
2002-10-18 12:04
2002.12.16
Local Network WorkGroups


1-51699
avsh
2002-12-05 20:44
2002.12.16
TImage


4-52026
GOD
2002-11-05 02:24
2002.12.16
Вопрос № 3


1-51673
NetKnight
2002-12-05 12:52
2002.12.16
Как работать с буффером обмена ?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский