ImageEn, unit imageenview |
|
TImageEnView.InteractionState
Declaration
function InteractionState(): TIEInteractionState;
Description
Returns any active interactive behaviour, i.e. what the user is doing with the mouse right now.
This method is generally only relevant when called from the MouseMove event.
e.g.
ImageEnView1.MouseInteractGeneral := [miBrushTool];
>>> ImageEnView1.InteractionState() returns ieisNone
User starts painting the image...
>>> ImageEnView1.InteractionState() returns ieisBrushPainting
Example
procedure Tfmain.ImageEnView1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if ImageEnView1.InteractionState = ieisCreatingLineLayer then
Caption := 'Creating a Line Layer'
else
if ImageEnView1.InteractionState = ieisEditingLineLayer then
Caption := 'Editing a Line Layer';
end;