Skip to Main Content
Mastering Delphi Programming: A Complete Reference Guide
book

Mastering Delphi Programming: A Complete Reference Guide

by Primož Gabrijelčič
November 2019
Beginner to intermediate content levelBeginner to intermediate
674 pages
15h
English
Packt Publishing
Content preview from Mastering Delphi Programming: A Complete Reference Guide

Calculating the average value

As an example, the TemplateMethod project from the Template method folder implements two specialized versions of a shared template method. The complete definition of the base object and template method is shown here:

type  TDataAggregatorTemplate = class  protected    procedure CloseDataSource; virtual; abstract;    function GetNextValue(var value: integer): boolean; virtual; abstract;    function OpenDataSource: boolean; virtual; abstract;  public    function CalculateAverage: real;  end;function TDataAggregatorTemplate.CalculateAverage: real;var  sum: integer;  total: integer;  value: integer;begin  if not OpenDataSource then    raise Exception.Create('Failed!');  try    total := 0;    sum := 0;    while GetNextValue(value) do    begin Inc(total); ...
Become an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
and much more.
Start your free trial

You might also like

Delphi GUI Programming with FireMonkey

Delphi GUI Programming with FireMonkey

Andrea Magni
Delphi Cookbook - Third Edition

Delphi Cookbook - Third Edition

Daniele Spinetti, Daniele Teti

Publisher Resources

ISBN: 9781838989118Other