ImageEn, unit imageenview |
|
TImageEnView.LayersTextRotateMode
Declaration
property LayersTextRotateMode: TIERotateMode;
Description
Specifies whether rotation of text layers by the user using
mlRotateLayers affects the text, border shape or both.
Note:
◼RotateMode only affects user rotation of the layer, not programmatic changes (i.e. rotation by your code)
◼Rotation of the text is specified by
Rotate. Rotatation of the border is set by
BorderRotateDefault: iermTextOnly
// Rotating the layer rotates the border shape (leaving the text at zero deg.)
ImageEnView1.LayersTextRotateMode := iermShapeOnly;
// Rotating the layer rotates both the text and the border shape
ImageEnView1.LayersTextRotateMode := iermBoth;
// Add a "Shape" layer with vertically offset text
ImageEnView1.LayersAdd( ielkText, 200, 200, 230, 200 );
ImageEnView1.CurrentLayer.AspectRatioLocked := True;
TIETextLayer( ImageEnView1.CurrentLayer ).BorderShape := iesHeart;
TIETextLayer( ImageEnView1.CurrentLayer ).BorderWidth := 0;
TIETextLayer( ImageEnView1.CurrentLayer ).BorderColor := clNone;
TIETextLayer( ImageEnView1.CurrentLayer ).FillColor := $004646FF;
TIETextLayer( ImageEnView1.CurrentLayer ).Font.Style := [fsBold];
TIETextLayer( ImageEnView1.CurrentLayer ).Alignment := iejCenter;
TIETextLayer( ImageEnView1.CurrentLayer ).Layout := ielCenter;
TIETextLayer( ImageEnView1.CurrentLayer ).WordWrap := False;
TIETextLayer( ImageEnView1.CurrentLayer ).Text := 'I Heart Delphi';
TIETextLayer( ImageEnView1.CurrentLayer ).Font.Size := 22;
TIETextLayer( ImageEnView1.CurrentLayer ).TextOverflow := ieoShrink;
TIETextLayer( ImageEnView1.CurrentLayer ).TextOffsetY := -0.15;
ImageEnView1.LayersTextRotateMode := iermBoth;
ImageEnView1.Update();
See Also
◼Rotate◼BorderRotate◼MouseInteractLayers