//Delphi 支持过程中的方法 procedure TForm1.Button1Click(Sender: TObject); procedure alert(s: string); begin ShowMessage(s); end; begin alert('万一'); {万一} end;
上一条:理解 Delphi 的类(十) - 深入方法[18] - 在接口区声明的方法都相当于提前声明了
下一条:理解 Delphi 的类(十) - 深入方法[20] - 静态数组参数