Вот описание:
one=object
X:T;
M1;virtual;
end;
two=object(one)
M2;
end;
three=object(two)
Y:T;
end;
four=object(three)
M3;
M4;virtual;
end;
var
f1,f2:four;
Заранее спасибо!
Про теги не забывай
one=object
X:T;
M1;virtual;
end;
two=object(one)
M2;
end;
three=object(two)
Y:T;
end;
four=object(three)
M3;
M4;virtual;
end;
var
f1,f2:four;