VPF::Конструкция @Obj.arr - Форум программистов

DragonFire

Дата 9.12.2006, 19:04 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 725
Регистрация: 14.8.2005
Где: Москва

Репутация: нет
Всего: 9

Вообщем есть у меня конструкция:

Код


type 
 TArr=array[0..2] of extended;
 TObj=object
    x,y,z:extended;
   private 
    function GetArr:TArr;
    procedure SetArr(Arr:TArr);
   public   
    property Arr:TArr read GetArr write SetArr;
 end;

...

function TObj.GetArr: TArr;
begin
  Result[0]:=X;
  Result[1]:=Y;
  Result[2]:=Z;
end;
procedure TObj.SetArr(Arr: TArr);
begin
  X:=Arr[0];
  Y:=Arr[1];
  Z:=Arr[2];
end;

Я пишу такой рабочий код:

Код


var A:TArr;
begin
 glNormal3fv(@A);

Но когда я пытаюсь сделать так, то выдает ошибку:

Код


var A:TObj;
begin
 glNormal3fv(@A.Arr);

И вся проблема в том что я не могу написать просто

Код


TObj=object
    x,y,z:extended;
    Arr:TArr;

Потому что x,y,z и Arr дублируют друг друга... Как быть?

--------------------

http://dragonfire.cimanu.ru/

bems

Дата 9.12.2006, 23:41 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 3400
Регистрация: 5.1.2006

Репутация: 31
Всего: 88

Цитата(DragonFire @ 9.12.2006, 19:04

)

(@A.Arr);

нельзя взять адрес свойства если для его чтения использована функция

Цитата(DragonFire @ 9.12.2006, 19:04

)

Как быть?

загонять значение свойства в промежуточную переменную перед вызовом функции.

Ну или сделать свойство типа "указатель на массив" и передавать функции его.

Это сообщение отредактировал(а) bems - 9.12.2006, 23:49

--------------------

Обижено школьников: 8

DragonFire

Дата 10.12.2006, 11:26 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 725
Регистрация: 14.8.2005
Где: Москва

Репутация: нет
Всего: 9

Пытался сделать так:

Код


PArr=^TArr;
TArr=array[0..2] of extended;

и работать уже с Parr но ничего путного не вышло smile

Пишет что нельзя передавать константу туда, где ожидается пойнтер.

--------------------

http://dragonfire.cimanu.ru/

Alexeis

Дата 10.12.2006, 15:49 (ссылка)

(нет голосов)

Загрузка ...

Амеба

Профиль
Группа: Админ
Сообщений: 11743
Регистрация: 12.10.2005
Где: Зеленоград

Репутация: 109
Всего: 459

DragonFire, нельзя работать напрямую со свойствами, нужно записать сначала адрес в промежуточную переменную и затем ее передать уже в функцию.

--------------------

Vit вечная память.

Обсуждение действий администрации форума производятся только в этом форуме

гениальность идеи состоит в том, что ее невозможно придумать

DragonFire

Дата 10.12.2006, 17:38 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 725
Регистрация: 14.8.2005
Где: Москва

Репутация: нет
Всего: 9

Через промежуточную переменную конечно все работает - в том то и вопрос, можно ли заставить его работать напрямую со свойством.
Я понял: ответ - нельзя.

--------------------

http://dragonfire.cimanu.ru/

skyboy

Дата 10.12.2006, 18:27 (ссылка)

(нет голосов)

Загрузка ...

неОпытный

Профиль
Группа: Модератор
Сообщений: 9820
Регистрация: 18.5.2006
Где: Днепропетровск

Репутация: 4
Всего: 260

DragonFire, свойство - это не переменная. это механизм такой, который есть только во время кодирования. при компиляции разница между полями("нормальными" переменными в объекте) и свойствами проявляется в полной мере - это только во время кодирования они обрабатываются одинаковыми конструкциями.

DragonFire

Дата 10.12.2006, 21:46 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 725
Регистрация: 14.8.2005
Где: Москва

Репутация: нет
Всего: 9

Ага я уже догнал...

--------------------

http://dragonfire.cimanu.ru/

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »