unit2.pas

函数的调用,一个简单的delphi学习例子

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.