littletest17.obs

来自「格式化源码的最新板」· OBS 代码 · 共 3 行

unit littletest17;interface uses forms;type tfooform=class(TForm)public class function
foo:tfooform;end;implementation const soy=42;class function tfooform.foo:tfooform
;begin result:=nil;end;end.