Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.31;
Скачать: CL | DM;

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.019 c
1-100713
Calm
2003-07-18 16:40
2003.07.31
Как создать TServiceApplication и нужно ли это делать?


7-101003
AlexandrRya
2003-05-19 22:35
2003.07.31
Beep


1-100752
Lexer
2003-07-15 19:19
2003.07.31
Выделение слов в TRxRichEdit.


3-100572
AbrosimovA
2003-07-08 15:28
2003.07.31
Кому нужно отдельно BDE даю ссылку


14-100933
DimaB
2003-07-14 06:04
2003.07.31
Digital Metaphors - ReportBuilder v7.02 Server (Delphi 7)