Сменить длину динамического массива строк из процедуры нельзя?

← →
savyhinst © (2007-12-20 20:31) [0]

Сменить длину динамического массива строк из процедуры нельзя?
Почему при попытке
procedure AddStrToArray(var a:array of Shortstring;
const whattoadd:string);
var
newL:integer;
begin
newL:=length(a)+1;
setLength(a,newL);
a[newL-1]:=whattoadd;
end;
Возникает ошибка Incompatible types?

← →
Ega23 © (2007-12-20 20:37) [1]

type TMySortStringArray : array of Shortstring; procedure AddStrToArray(var a:TMySortStringArray; const whattoadd:string);

← →
savyhinst © (2007-12-20 20:41) [2]

И это всё поправит?

← →
tesseract © (2007-12-20 20:43) [3]

> И это всё поправит?

угадал. читать про OpenArrays.

> И это всё поправит?
Смотря что вам нужно. В своем примере вы не используете открытых массивов. Поэтому естественно, что их длину изменять нельзя.

Сменить длину динамического массива строк из процедуры нельзя? Найти похожие ветки