ImageEn, unit imageenview

TImageEnView.SetLayersGripStyle

TImageEnView.SetLayersGripStyle


Declaration

procedure SetLayersGripStyle(BorderColor: TColor = clBlack; FillColor: TColor = clWhite; BrushStyle: TBrushStyle = bsSolid; Size: integer = 5; Shape: TIEShape = iesEllipse; ; AlternateShape: TIEShape = iesEllipse); overload;
procedure SetLayersGripStyle(GripStyle: TIEGripStyle); overload;


Description

Specifies the appearance of layers grips.
Parameter Description
BorderColor Grip border color (Default: clBlack)
FillColor Grip brush color (Default: $9DF5FF - Pale Yellow)
BrushStyle Grip Brush style (Default: bsSolid)
Size Radius of the grip in pixels (Default: 5)
Shape Shape of sizing grips on the corners and sides of the layer (Default: iesEllipse)
AlternateShape Shape of rotation grip optionally below and at the center of the layer (Default: iesEllipse)

Use GetLayersGripStyle to retrieve the current values.

The default styling for layer grips:



Examples

// Use fully white grips
ImageEnView1.SetLayersGripStyle( clWhite, clWhite, bsSolid, 5, iesEllipse );

// Use diamond grips for sizing and a left-right arrow for rotation
ImageEnView1.SetLayersGripStyle( clBlack, clWhite, bsSolid, 7, iesDiamond, iesArrowLeftRight );


See Also

SetLayersBoxStyle
LayersDrawBox
TIELayer.VisibleBox
OnDrawLayerBox
OnDrawLayerGrip


Compatibility Notes

From v14.0.0, grip shapes are of the type TIEShape, whereas previously they were a TIEGripShape. You should change iegsCircle to iesEllipse and iegsBox to iesRectangle.