Unit HotImage

*****************************************************} { HotImage Component Source } { Copyright (c) 1997,98 Miachin Alexander A. } {

Classes

THotImage -
THotSpots -
TSpot - * TSpot

Functions

Types

PMaskItem
PPoints
TGetHintTextEvent
TMaskItem
TMaskKind
TMaskKinds
TMaskPointArray
TPoints
TScaleInfo
TSpotKind

Constants

Variables


Functions


Types


PMaskItem = ^TMaskItem

PPoints = ^TPoints
Version 2.12 Author: Miachin Alexander A. e-mail sasha@obladm.nso.ru
TGetHintTextEvent=procedure (Sender: TObject; Spot: TSpot;
                                var Text: String) of object
Event for OnGetHintText
TMaskItem = record
MaskKinds : TMaskKinds;
Offsets : TMaskPointArray;
end;

TMaskKind = (mkMouseOver, mkMouseDown);

TMaskKinds = set of TMaskKind

TMaskPointArray = array[TMaskKind]of TPoint;
* TMaskItem
TPoints = array [0..(MaxListSize div 2) - 1] of TPoint;

TScaleInfo = record
SrcSize : TSize;
SrcOffset : TPoint;
DstSize : TSize;
DstOffset : TPoint;
end;

TSpotKind = (skPolyline, skRectangle, skEllipse);

Constants


Variables