看类: TLotBillDyc ,只需要看接口,实现代码其实不需要
type
TLotBillDyc = class
private
protected
class function FormatIssueForBill(LotID, AIssue: integer): string;
class function CreateTicketID(LotID, OptID, ChipID: integer): string;
public
class function DoPostWithoutThread(const ALotID: Integer; const BillID, AnteCode,
BillIssue: string; const ChipMul, TicketMoney, AOneMoney: Integer;
const sPlayType:string=''): integer;
class function InitParam(ErrMsgFlag: boolean = true): boolean;
class function DoPrepare(const AChip: TChipProjInfo): integer;
//投注相关操作
class function DoPrint(const AChip: TChipProjInfo; AItem: TListItem;
ShowErrFlag: boolean = true): integer;
class function DoQueryAndFinishPrint(const AChip: TChipProjInfo): integer;
class function PrintQuery(const AValue: ISuperObject): Integer;
end;
没有一个数据,有的只是成员函数,将一些相关的函数封装在一起,方便使用,也无可厚非,但没写明,这些函数操纵了什么。
这个类如果写上投注执行流程,会好很多。可以在一个inline 的demo 函数中写上执行流程。这样其他程序员就清楚如何使用这些函数了。(初始化时刻,投注,投注结果 错误如何处理等)