理解 Delphi 的类(十) - 深入方法[16] - 方法的顺序

//要点16: 在实现区(implementation), 自定义的方法是有顺序的

function MyFunA(x: Integer): Integer;

begin

  Result := Sqr(x); {取平方}

  //MyFunB(x);      {前面的函数不能调用后面的函数}

end;



function MyFunB(x: Integer): Integer;

begin

  Result := MyFunA(x) * 2; {可以调用前面的函数 MyFunA}

end;