Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не компилирует функцию, возвращающую структуру :( [D7, XP]


cvg ©   (2007-08-27 17:23:00) 

procedure main_proc(..);
type
Ttops =
record
 val:double;
 time:string;
end;
aArr = array of Ttops;

function func(...):aArr;
var res:aArr;
begin
res.val := 1;
res.time := '10:10:10';
Result := res;
end;

begin
...
buff := func(...);
...
end.

И на строчку вызова функции компилятор ругается: Incompatible types. А почему? Все ж, вроде, путем...


cvg   (2007-08-27 17:38:00) [1]

Ага, спасибо, прощелкал я это... Ну, теперь хотя бы компиляция прошла! :)


b z   (2007-08-27 17:32:00) [2]

:aArr; <> :array of aArr;


clickmaker   (2007-08-27 17:31:00) [3]

buff:array of aArr <> array of Ttops


cvg   (2007-08-27 17:29:00) [4]

Да, забыл указать, что переменная buff тоже описана как надо:
var buff:array of aArr;


Наверх

Титульная страница Поиск, карта сайта Написать письмо