Текущий архив: 2003.10.30;
Скачать: CL | DM;

Вниз

Написать функцию возвращающую динамический массив   Найти похожие ветки 

← →
Ландграф Павел ©   (2003-10-19 20:16) [0]

У меня есть функция, в которой создается динамический массив, как мне этот массив запихнуть в result, а потом вызвав эту функцию записать опять-таки в динамической массив размером как и result
Вот о чем я:

type TListProcedure=record
Name : string;
start : integer;
end;
var ListProcedure: array of TListProcedure;
function ReadScriptFile(name:string):TListProcedure;
begin
ListProcedure:=ReadScriptFile("file.txt");
end;


---

← →
Song ©   (2003-10-19 20:20) [1]

Это делается через процедуру, в качестве параметра.

---

← →
DiamondShark ©   (2003-10-19 20:22) [2]

type
TMyArray = array of TMyType;
function CreateArray: TMyArray;
begin
...
SetLength(Result, ...);
...
Result[i] := ...
...
end;

---

Страницы: 1 вся ветка

Текущий архив: 2003.10.30;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.093 c