delphi实现计算器源码-版.docxVIP

private { Private declarations } protected // procedure CreateParams(var Params: TCreateParams);override; public { Public declarations } end; TRightEdit = class(TEdit) protected procedure CreateParams(var Params : TCreateParams);override; end; type operator = (Emp,add,sub,mul,divi/d/空);、加、减、乘、除 var