Class AIReportList

Unit

Declaration

type AIReportList = class(TActiveList)

Description

Hierarchy

Methods

Overview

	procedure AddReport(aKind: integer; aSuccess: boolean; aValue: integer; aEffort: integer);
	procedure FullDisplay(aList: TStrings);
	function HighestWeight: integer;
	procedure LoadFromFile(var aFile: TextFile);
	function LowestWeight: integer;
	function ReportWeight(aLivingThing: AILivingThing): single; overload;
	function ReportWeight(aKind: integer): single; overload;
	procedure SaveToFile(var aFile: TextFile);

Description

procedure AddReport(aKind: integer; aSuccess: boolean; aValue: integer; aEffort: integer);

procedure FullDisplay(aList: TStrings);

function HighestWeight: integer;

procedure LoadFromFile(var aFile: TextFile);

function LowestWeight: integer;

function ReportWeight(aLivingThing: AILivingThing): single; overload;

function ReportWeight(aKind: integer): single; overload;

procedure SaveToFile(var aFile: TextFile);