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

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

Predefine record

@!!ex ©   (2008-11-10 17:00:00) 

Есть два рекорда:
TVector4f = record
 class operator Multiply(a:TVector4f; m:TMatrix4x4f):TVector4f;
end;

TMatrix4x4f = record
 class operator Multiply(m:TMatrix4x4f; v:TVector4f):TVector4f;
end;
Компилятор ругается на то, что тип TMatrix4x4f еще не определен, когда действует определение Вектора.
Если бы это были бы классы, то не проблема:

TMatrix4x4f = class;

TVector4f = record
 class operator Multiply(a:TVector4f; m:TMatrix4x4f):TVector4f;
end;

TMatrix4x4f = record
 class operator Multiply(m:TMatrix4x4f; v:TVector4f):TVector4f;
end;

С рекордами такое не работает. Что делать??

---

MBo   (2008-11-11 05:55:00) [1]

В некоторых случаях такой изврат может помочь:

 TDummy = record
   y: Integer;
 end;

 TA = record
   x: Integer;
   class operator Add(l: TDummy; r: TA): TA;
 end;

 TB = record
   y: Integer;
   class operator Add(l: TA; r: TB): TB;
   class operator Implicit(l: TB): TDummy;
 end;



---

@!!ex   (2008-11-10 17:33:00) [2]

вот вот...
Нифига не могу решить что делать. :((

---

Palladin   (2008-11-10 17:31:00) [3]

о блин, у тебя же оператор перекрывается... не вдумался...

---

@!!ex   (2008-11-10 17:28:00) [4]

> [3] Palladin ©   (10.11.08 17:26)

ну вот. теперь у меня есть две функции. GetVector и GetMatrix. Нужно перемножить их результаты.
var
 a:TVector;
begin
 a:=GetVector()*GetMatrix();
end;
Не работает.

---

Palladin   (2008-11-10 17:26:00) [5]

нет
PVector4f=^TVector4f;
PMatrix4x4f=^TMatrix4x4f;

TVector4f = record
 class operator Multiply(a:PVector4f; m:PMatrix4x4f):PVector4f;
end;

TMatrix4x4f = record
 class operator Multiply(m:PMatrix4x4f; v:PVector4f):PVector4f;
end;

все юзабельно

---

@!!ex   (2008-11-10 17:20:00) [6]

В операторах?
Неудачное решение..

m:TMatrix;
v:TVector;

v:=v*@m;
?

А что делать если функция будет?
function m:TMatrix;

v:=v*???
Вообще не юзабельно получается. :((

---

Palladin   (2008-11-10 17:08:00) [7]

использовать указатели на них

---

Наверх