Как заставить функцию отдавать массив

[Nikoshka]

Или хотя бы что-о вроде этого, так чтобы не делать из нее процедуру и не объявлять общий массив? Очень надо =(((((

[Duncon]

Конкретней ситуацию, а вообще функции на то и придуманны дабы возвращять результат.

[Nikoshka]

Неполучается вернуть массив ни в какую, только строку, число и т.п.

[namomelkor]

в Delphi в процедурах и функциях массивы объявляются в виде типов
Type
Tmas= array [1..100] of integer;
.............
function dmas: Tmas;
var d:tmas;
begin
d[1]:=1;
dmas:=d;
end;

procedure TForm1.Button1Click(Sender: TObject);
var d:tmas;
begin
d:=dmas;
end;

Дальше эксперементируй как хочешь )))))))

[Игорь Акопян]

функции в Дельфях имееют замечательную переменную Result, в которую присваивается результат функции - так что можно не плодить локальных переменных. Кроме того меня всегда бесило присваивание результата имени функции.