Type XlsxApplication = class public Function Create(); Function Init(); public property Workbooks read ReadWorkbooks; // Completed Function ReadWorkbooks(index); private workbooks_; End; // ============== 实现 ================= // Function XlsxApplication.Create(); Begin Init(); End; Function XlsxApplication.Init(); Begin workbooks_ := new Workbooks(); End; Function XlsxApplication.ReadWorkbooks(index) Begin if ifnil(index) then return workbooks_; return workbooks_[index]; End;