Форум: "Основная";
Текущий архив: 2003.07.31;
Скачать: [xml.tar.bz2];
Вниз
var array Найти похожие ветки
← →
race1 (2003-07-18 07:37) [0]как в процедуре обработать переданный по ссылке массив? т.е. если написать так
procedure proc ( var x: Integer );
begin
x := 2;
end;
proc ( i );
то i будет равно 2-ум. а как также передать массив и заполнять его в процедуре?
← →
Думкин (2003-07-18 07:47) [1]Ввести такой тип и передавать по типу.
type
TMyArray = array[1..2] of TMyType;
procedure proc ( var b: TMyArray);
begin
b[Low(b)] := MyData1;
b[High(b)] := MyData2
end;
var
a : TMyArray
proc ( a );
Так и динамические можно.
А еще можно открытые массивы передавать:
procedure proc ( b: array of TMyType);
begin
b[Low(b)] := MyData1;
b[High(b)] := MyData2
end;
Вроде не наврал сильно.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.07.31;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c
