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

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

Каст от одного типа к другому [D7, XP]


Bogdan1024 ©   (2007-02-26 12:37:00) 

Есть функция, которая принимает как аргумент:
type TReal1DArray = array of real;
Как передать функции мой массив?
var a: array[0..8191] of real;
Нужно как-то кастануть его? А как?


Anatoly Podgoretsky   (2007-02-27 00:29:00) [1]

> Bogdan1024  (26.02.2007 12:37:00)  [0]

В общем никак, это разные по структуре структуры данных, остальное только фокусы.


Anatoly Podgoretsky   (2007-02-27 00:28:00) [2]

> deus krid  (26.02.2007 14:26:05)  [5]

Это уже третий тип массива, про которые автор не спрашивал.


Elen   (2007-02-26 16:20:00) [3]


> А если процедура захочет (а она наверняка захочет) узнать
> длину массива?

...то его можно передать дополнительным параметром.


Sapersky   (2007-02-26 15:19:00) [4]

Два наиболее простых варианта:
1) Использовать TReal1DArray вместо var a: array[0..8191] of real; в своей программе.
2) Переделать функцию под var a: array[0..8191] of real или
PRealDArr = ^TRealDArr;
TRealDArr = array[0..0] of Real;
(придётся отдельно передавать в неё длину массива)

Адрес передавай в процедуру на массив.

А если процедура захочет (а она наверняка захочет) узнать длину массива?

function MyMegaFunc(p: array of real; ...): ...;
и вызываеш эту функцию с любым массивом.


Будет копирование.


deus krid   (2007-02-26 14:26:00) [5]

немогу понять в чем проблема. наведу упрощенный пример. объявляешь:

function MyMegaFunc(p: array of real; ...): ...;
begin
...
end;


и вызываеш эту функцию с любым массивом.

хотя лучше сделать как сказал Elen: обьявить тип массива, создать на него ссылочный тип и обьявить параметр функции этим типом и '@' тебе в помощь при вызове =)


Elen   (2007-02-26 13:47:00) [6]


> Bogdan1024 ©   (26.02.07 13:33) [2]

Адрес передавай в процедуру на массив.


clickmaker   (2007-02-26 13:35:00) [7]


> [2] Bogdan1024 ©   (26.02.07 13:33)

а откуда он у тебя есть?


Bogdan1024   (2007-02-26 13:33:00) [8]

Не, так не интересно, у меня просто уже есть массив a с данными, если я создам массив b:TReal1DArray и буду перегонять туда данные из массива а, то это будет как-то не круто.


clickmaker   (2007-02-26 12:42:00) [9]

var a: TReal1DArray;

SetLength(a, 8192);


Наверх

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