ANTICHAT - Показать сообщение отдельно - [Delphi]/[Pascal] Задай вопрос, получи ответ

Цитата:

Сообщение от ZET36

Результат функции может быть массивом? Если да, то как правильно это представить? Пробую так, неполучается

Код:

.
function erwer(erwr:string):array[0..100] of string;
begin
result[0]:='werwr';
end;


begin
showmessage(erwer('dsadas')[0]);
end.

так как ты делаеш нельзя зато так можно:

Код:

.....

type
    PMy_func_array_result=array[1..100]of string;

var
  Form1: TForm1;

.....


function erwer(erwr:string):pMy_func_array_result;
begin
result[1]:='werwr';
end;

begin
showmessage(erwer('dsadas')[1]);
end;

.....