TImageEnView.SetLayersGripStyle

Declaration

procedure SetLayersGripStyle(GripColor1: TColor = clBlack; GripColor2: TColor = clWhite; GripBrushStyle: TBrushStyle = bsSolid; GripSize: integer = 5; Shape: TIEShape = iesEllipse; ; AltGripShape: TIEShape = iesEllipse); overload;
procedure SetLayersGripStyle(GripStyle: TIEGripStyle); overload;

Description

Specifies the appearance of layers grips.

Parameter	Description
GripColor1	Grip border color (Default: clBlack)
GripColor2	Grip brush color (Default: $9DF5FF - Pale Yellow)
GripBrushStyle	Grip Brush style (Default: bsSolid)
GripSize	Radius of the grip in pixels (Default: 5)
Shape	Shape of sizing grips on the corners and sides of the layer (Default: iesEllipse)
Shape	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 );

Compatibility Information

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

TImageEnView.SetLayersGripStyle