unit1.pas

来自「pas脚本编译,编译写好的脚本,运用了fastscript控件」· PAS 代码 · 共 8 行

procedure Unit1Proc(s: String);
begin
  ShowMessage(s);
end;

begin
  ShowMessage('hi! unit1 initialization');
end.