Скачать: CL | DM;

Какая разница между override, reintroduce и   Найти похожие ветки 

← →
ki11er   (2003-03-14 19:40) [0]

В приведенном ниже коде, чем отличаются классы class2, class3 и
class4?
Спасибо.


class1 = class(TObject)
public
procedure proc1; virtual;
end;

class2 = class(class1)
public
procedure proc1; override;
end;

class3 = class(class1)
public
procedure proc1;
end;

class4 = class(class1)
public
procedure proc1; reintroduce;
end;


---

← →
Mike_Goblin ©   (2003-03-14 20:04) [1]

class 2 процедура proc1 поддерживает виртуальность
class3, 4 - обычная процедура, в class4 подавлен warning компилятора о прерывании цепочки виртуальных методов

---

← →
ki11er   (2003-03-14 20:19) [2]

> class 2 процедура proc1 поддерживает виртуальность


Т.е. будет так?

class5 = class(class2)
public
procedure proc1; reintroduce;
end;

class6 = class(class3)
public
procedure proc1; reintroduce;
end;

Obj5: class5;
Obj6: class6;

(class2(Obj5)).proc1 -> class5.proc1
(class3(Obj6)).proc1 -> class3.proc1

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c