procedure

← →
фантазёр (2004-03-01 20:18) [0]

Здрассте всем. Такая вот у меня закавыка. В Delphi я не так давно, и много чего не знаю. Так вот, пишу процедуру, в которую передаётся динамический массив для обработки. При попытке изменения длинны этого массива, компилятор (при компиляции) выдаёт ошибку, типа Incompatible types. Так как же мне изменить длинну этого массива? Помогите пожалуйста.
Вот код:
procedure prc1 (var ms:array of integer); begin //тут всякие обработки SetLength (ms, 10); //а вот на это компилятор ругается end;

← →
jack128 © (2004-03-01 20:21) [1]

RTFM про динамические массивы (Dynamic arrays) и открытые массивы (open arrays)

← →
VMcL © (2004-03-01 20:22) [2]

type TIntArr = array of integer; procedure prc1 (var ms: TIntArr); begin //тут всякие обработки SetLength (ms, 10); //а вот на это компилятор ругается end;

← →
Cobalt © (2004-03-01 23:03) [3]

2 VMcL © (01.03.04 20:22) [2]
сказали бы, как он ругается?

← →
Defunct © (2004-03-01 23:10) [4]

> сказали бы, как он ругается?

Так как написано в примере [2], уже никто не ругается.

type TIntArr = array of integer; procedure prc1 (var ms: TIntArr); begin //тут всякие обработки SetLength (ms, 10); //больше компилятор не ругается. end;

← →
Anatoly Podgoretsky © (2004-03-01 23:11) [5]

А на открытый массив и ругается

← →
фантазёр (2004-03-02 13:39) [6]

Всем огромное спасибо. Теперь всё в порядке.
А ругался он (компилятор) строчкой Incompatible types
Ещё раз всем большое спасибо!!!

в FAQ нет еще этого вопроса ?

procedure Найти похожие ветки