Declaration
property FillColor2: TColor;
Description
The end color for the text box gradient.
If
FillColor2 is clNone, the text box is filled by a solid color specified by
FillColor. If
FillColor2 is different from
FillColor it is drawn as a gradient.
The direction of the gradient is specified by
FillGradient.
Default: clNone
// Disable the gradient fill
TIETextLayer( ImageEnView1.CurrentLayer ).FillColor2 := clNone;
// Add a red/blue horizontal gradient
TIETextLayer( ImageEnView1.CurrentLayer ).FillColor := clRed;
TIETextLayer( ImageEnView1.CurrentLayer ).FillColor2 := clBlue;
TIETextLayer( ImageEnView1.CurrentLayer ).FillGradient := gpgHorizontal;
ImageEnView1.Update();
// Add a "Shape" layer with margins around text
ImageEnView1.LayersAdd( ielkText );
TIETextLayer( ImageEnView1.CurrentLayer ).Text := 'EXPLOSION!';
TIETextLayer( ImageEnView1.CurrentLayer ).Font.Style := [fsBold];
TIETextLayer( ImageEnView1.CurrentLayer ).BorderShape := iesExplosion;
TIETextLayer( ImageEnView1.CurrentLayer ).BorderColor := clBlack;
TIETextLayer( ImageEnView1.CurrentLayer ).BorderWidth := 1;
TIETextLayer( ImageEnView1.CurrentLayer ).FillColor := clRed;
TIETextLayer( ImageEnView1.CurrentLayer ).FillColor2 := clYellow;
TIETextLayer( ImageEnView1.CurrentLayer ).FillGradient := gpgVertCenter;
TIETextLayer( ImageEnView1.CurrentLayer ).Alignment := iejCenter;
TIETextLayer( ImageEnView1.CurrentLayer ).Layout := ielCenter;
TIETextLayer( ImageEnView1.CurrentLayer ).HorzMargin := 0.15;
TIETextLayer( ImageEnView1.CurrentLayer ).VertMargin := 0.25;
TIETextLayer( ImageEnView1.CurrentLayer ).SizeToText();
ImageEnView1.Update();
See Also
◼TIELayer.FillColor2◼FillColor◼FillGradient◼FillOpacity◼HorzMargin◼VertMargin