第一种方法类方法
第二种方法:
// 公共函数库
//要先在implementation前面声明这个函数,
//此单元中需要包括公用的pas文件,
//如sysutils等。需要哪个就把哪个放进去。
//其它单元 引用Unit3后自接调用 test ;
unit Unit3;
interface
uses classes,sysutils,windows,Vcl.Dialogs;
procedure test ;
implementation
procedure test ;
begin
ShowMessage('dfs');
end;
end.