хм а почему нельзя вернуть массив ?

[Attid]

хочу такую функцию, а нельзя.
function ReturnArr: array of variant;

прийдется делать процедуру. создавать переменную . . =)
вопрос чисто из позновательных побуждений.

[Attid]

ой а все намного хуже чем я думал

Код: Выделить всё

procedure test(var arr: array of variant);
begin
  SetLength(arr);
end; 

Код: Выделить всё

Target OS: Win32 for i386
Compiling C:\Temp\project1.lpr
Compiling Unit1.pas
Unit1.pas(16,28) Hint: Parameter "Sender" not used
Unit1.pas(37,17) Error: Wrong number of parameters specified
Unit1.pas(37,17) Error: Illegal expression
Unit1.pas(45) Fatal: There were 2 errors compiling module, stopping

=( почему ?

[shade]

Код: Выделить всё

type vararr_t = array of variant;
 function ReturnArr: vararr_t;

[Attid]

а почему ?

[shade]

а почему ?

Потому, что так написано в хелпах (не помню, толи FPC, толи Delphi) - чтобы вернуть/передать динамический массив его нужно описать отдельным типом - наверное чтобы не было путаницы с открытыми массивами.

[Иван Шихалев]

наверное чтобы не было путаницы с открытыми массивами

Именно так.