理解 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;