littletest34.out

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

unit littletest34;

interface

type
  iamaninterface = interface(IDispatch)
    ['{081A08A5-AC8E-4C99-89A4-6175E6320719}']
    procedure monkey(out out: olevariant); safecall;
    procedure soy(var out: integer); safecall;
  end;

implementation

end.