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 = ^TPointsVersion 2.12 Author: Miachin Alexander A. e-mail sasha@obladm.nso.ru
TGetHintTextEvent=procedure (Sender: TObject; Spot: TSpot; var Text: String) of objectEvent 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 |