unit2.pas

来自「函数的调用,一个简单的delphi学习例子」· PAS 代码 · 共 17 行

unit Unit2;

interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

function my1(a:Longint):string;

implementation

function my1(a:Longint):string;
begin
Result:=inttostr(a);
end;

end.