对镜弹箜篌

摘要： 算是一种减少单元之间的引用的方法类似委托View Code 1 unit Unit5; 2 3 interface 4 5 uses System.Classes, System.SysUtils, Vcl.Dialogs; 6 7 type 8 // 声明过程类型 9 TObjFuns = procedure(const str1, str2: string) of object;10 11 IFormattedNumber = interface12 ['{19AE4E57-A022-45B1-AA42-43FF5142D685}']13 functio... 阅读全文