Class TObjectQueue

Unit

Generics.Collections

Declaration

type TObjectQueue<T:class> = class(TQueue<T>)

Description

More info: http://stackoverflow.com/questions/5232198/about-vectors-growth TODO: custom memory managers (as constraints) ˜approximation to golden ratio: n = n * 1.5 } {$DEFINE CUSTOM_LIST_CAPACITY_INC := Result * 2} // standard inc

Hierarchy

• TObject
• TEnumerable
• TEnumerableWithPointers
• TCustomList
• TQueue
• TObjectQueue

Overview

Fields

FObjectsOwner: Boolean;

Methods

	procedure Notify(constref AValue: T; ACollectionNotification: TCollectionNotification); override;
	constructor Create(AOwnsObjects: Boolean = True); overload;
	constructor Create(ACollection: TEnumerable<T>; AOwnsObjects: Boolean = True); overload;
	procedure Dequeue;

Properties

property OwnsObjects: Boolean read FObjectsOwner write FObjectsOwner;

Description

Fields

	FObjectsOwner: Boolean;

Methods

	procedure Notify(constref AValue: T; ACollectionNotification: TCollectionNotification); override;

	constructor Create(AOwnsObjects: Boolean = True); overload;

	constructor Create(ACollection: TEnumerable<T>; AOwnsObjects: Boolean = True); overload;

	procedure Dequeue;

Properties

	property OwnsObjects: Boolean read FObjectsOwner write FObjectsOwner;