upkclassintr.pas

来自「如何从package中动态载入自定义类、窗体、ADO数据连接等」· PAS 代码 · 共 14 行

unit upkClassIntr;

interface

type
  IMan = interface(IUnknown)
  ['{CC2B82BE-C15F-4FB5-BF58-C28595F4E874}']
    procedure SayHello(s: string);
  end;

implementation

end.