Class TSpot (unit HotImage)

Inherits from

TObject

* TSpot

Constructors


constructor Create(ASpotKind: TSpotKind);

Constructors, destructors

* TSpot ***} {modified 19.



Functions

procedure AddPoint(const APoint: TPoint);

Point manipulation

procedure Assign(Source: TSpot);


procedure Clear;

Clear all points

procedure CopyShapeFrom(Source: TSpot; const ScaleInfo: TScaleInfo);

copy shape data with scaling

function Count: Integer;

number of points in spot

procedure DeletePoint(Index: Integer);


destructor Destroy;

all SpotKinds except skPolyline have fixed number of points

procedure DrawShape(DrawCanvas: TCanvas; const Offset: TPoint; AlignBrush: boolean);

draw shape on destination canvas

function GetPointArray: PPoints;

returns pointer to array[0.

procedure InsertPoint(Index: Integer; const APoint: TPoint);


function MaskPresent: Boolean;


procedure Offset(dx, dy: Integer);

Bounds manipulation

function PointInSpot(const APoint: TPoint):boolean;

IS point in spot?

procedure ReleaseRegion;

Return back again in device context

procedure AssignMasks(const Source: TMaskItem);


procedure CopyScaledPtArray(DstBuffer: PPoints; const ScaleInfo: TScaleInfo);


function CreateRegion: HRgn;


function GetBoundsRect: TRect;

bounds manupulation

bounds manupulation


function GetMaskItem: TMaskItem;


function GetPoint(Index: Integer): Tpoint;


function GetRegion: HRgn;


procedure SetBoundsRect(const R: TRect);

GetRgnBox returns rectangle, without 1 right and 1 bottom point

procedure SetPoint(Index: Integer; const APoint: TPoint);


procedure SetSpotKind(Value: TSpotKind);

added 19.

Properties

property BoundsRect : TRect


property Enabled : Boolean


property HintText : string


property MaskItem : TMaskItem


property Points : TPoint


property RgnHandle : HRgn


property SpotID : Integer


property SpotKind : TSpotKind


Events

Variables

FEnabled : Boolean;


FHintText : string;


FID : Integer;


FMaskItem : PMaskItem;


FOwner : THotSpots;


FPoints : TList;


FPolyRgn : HRgn;


FSpotKind : TSpotKind;



Constructors


constructor Create(ASpotKind: TSpotKind);

Constructors, destructors

* TSpot ***} {modified 19.02.98


Functions


procedure AddPoint(const APoint: TPoint);

Point manipulation


procedure Assign(Source: TSpot);


procedure Clear;

Clear all points


procedure CopyShapeFrom(Source: TSpot; const ScaleInfo: TScaleInfo);

copy shape data with scaling


function Count: Integer;

number of points in spot


procedure DeletePoint(Index: Integer);


destructor Destroy;

all SpotKinds except skPolyline have fixed number of points


procedure DrawShape(DrawCanvas: TCanvas; const Offset: TPoint; AlignBrush: boolean);

draw shape on destination canvas


function GetPointArray: PPoints;

returns pointer to array[0..n] of TPoint


procedure InsertPoint(Index: Integer; const APoint: TPoint);


function MaskPresent: Boolean;


procedure Offset(dx, dy: Integer);

Bounds manipulation


function PointInSpot(const APoint: TPoint):boolean;

IS point in spot?


procedure ReleaseRegion;

Return back again in device context


procedure AssignMasks(const Source: TMaskItem);


procedure CopyScaledPtArray(DstBuffer: PPoints; const ScaleInfo: TScaleInfo);


function CreateRegion: HRgn;


function GetBoundsRect: TRect;

bounds manupulation

bounds manupulation


function GetMaskItem: TMaskItem;


function GetPoint(Index: Integer): Tpoint;


function GetRegion: HRgn;


procedure SetBoundsRect(const R: TRect);

GetRgnBox returns rectangle, without 1 right and 1 bottom point


procedure SetPoint(Index: Integer; const APoint: TPoint);


procedure SetSpotKind(Value: TSpotKind);

added 19.02.98


Properties


property BoundsRect : TRect


property Enabled : Boolean


property HintText : string


property MaskItem : TMaskItem


property Points : TPoint


property RgnHandle : HRgn


property SpotID : Integer


property SpotKind : TSpotKind


Events


Variables


FEnabled : Boolean;


FHintText : string;


FID : Integer;


FMaskItem : PMaskItem;


FOwner : THotSpots;


FPoints : TList;


FPolyRgn : HRgn;


FSpotKind : TSpotKind;