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

Наследование стандартных классов.   Найти похожие ветки 

← →
Toster ©   (2002-08-24 20:37) [0]

В результате исполнении этого кода возникает Access Violation в момент вызова Create. Tree существует. Это происходит при наследовании и других стандартных классов, например TStrings, которому в констуктор вообще ничего не передается.

....
type
MyClass = class(TTreeNode)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
MyNode: MyClass;
....

procedure TForm1.FormCreate(Sender: TObject);
begin
MyNode.Create(Tree.Items);
end;

---

← →
Mikhail ©   (2002-08-24 20:46) [1]


MyNode := MyClass.Create(...)

---

← →
Toster ©   (2002-08-24 20:47) [2]

Большое Спасибо!

---

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

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



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