Наследование в Delphi

[rublyabachka]

Подскажите пожалуйста как написать эту строчку на Delphi:

Circle::Circle(float iX,float iY,float iRadius)
	:Point(iX,iY)

где:

Point = class
    protected
      X,Y:real;
    public
      constructor Create(iX, iY:real); //конструктор
      function GetX():real;
      function GetY():real;
  end;
  Circle = class (Point)
    private
      Radius:real;
    public
      constructor Create(iX, iY, iRadius:real);
      function IsSecondIn():integer;
  end;

[Пепел Феникса]

в конструкторе первая строка должна быть

 inherited Create(iX,iY)

[Stilet]

Частично ты ее написала. Остается реализация:

constructor Circle.Create(iX, iY, iRadius: real);
begin
  inherited Create(iX,iY);
end;

[rublyabachka]

спасибо большое! ато во всех книгах виртуальные функции используются

[Stilet]

виртуальные функции используются

Они для другого предназначены )