🚀 go-pugleaf

> Problemem jest w zasadzie to, że potrzebny jest do tego garbage collector, 

> lub przynajmniej zliczanie referencji.


w delhi.net jakoś się udało .


> 

> var a,b,c,d:TMojaKlasa;

> 

> begin

>   a:=TMojaKlasa.Create;

>   b:=TMojaKlasa.Create;

>   c:=TMOjaKlasa.Create;

> 

>   d:= a + b + c;


kompilator przetłumaczył by to na cos takiego 

if d=nil Then d:=TMojaClasa.Create;
d.Add(a);
d.Add(b);
d.Add(c);// procedura add była by odpowiednikem d+=b;




> 

> zakładając, że operator + tworzy nowy obiekt na stercie (czyli odpala 

> TMojaKlasa.Create), co i kiedy zniszczy ci obiekt tymczasowy o wartości a+b?

> 

jak bawiłem się przeciążeniami dla klas to robiłem tak

operator +(a,b:TMojaKlasa):R:TMojaKlasa;
begin
   a.Aad(b);
   R:=b;
end;


Tylko musiałem pamietać żeby  wywoływać w jeden sposób

   ZZ+=YY; lub ZZ:=ZZ+YY;

Gdyby ten fragment kodu  odpowiadający za oabsługe operatora ( operator ) był na
jakiś specialnych  i w momęcie wywołania  w zmiennej R (Result ) był już adres
obiektu  który ma otrzymać dane   to w zasadzie byłoby to rozwiązanie i nie
trzeba by dodatkowo dodawać skomplikowanych mechanizmów zarzadzania pamięcią .

wtedy by operaator wyglądał tak 

operator +(a,b:TMojaKlasa):R:TMojaKlasa;
begin
   if R<>a then begin R:=0;// wyczyść np liczbe 
                   R.Add(A);
                   R.Add(b) 
   end else        R.Add(b);
end;


-- 
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl