| DP News-Robot |
17. Nov 2020 17:10 |
Delphi: `procedure RaiseAbstractError(const aClass: TClass; const aMethodName: string
Needs the System.SysConst*unit: procedure RaiseAbstractError(const aClass: TClass; const aMethodName: string); begin * // more explanatory than AbstractErrorProc(); * raise EAbstractError.CreateFmt('%s: method %s.%s', [SAbstractError, aClass.ClassName, aMethodName]); end; It uses a TClass typed parameter so you can call it from non-static class methods (using Self*as parameter value) in addition to instance methods (using ClassType*as parameter value). –jeroen
 Weiterlesen... |
