Code samples for TextStyling.
Automatically generated by the Every Method demo.
// Automated test of Styled DrawText - Typical Values
// Draw Advanced Text to IECanvas
ImageEnView1.IEBitmap.IECanvas.Font.Height := 92;
ImageEnView1.IEBitmap.IECanvas.Font.Style := [fsBold];
ImageEnView1.IEBitmap.IECanvas.Font.Color := clRed;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillGradient := gpgVertical;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillColor2 := clYellow;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderWidth := 6;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderColor := clWhite;
ImageEnView1.IEBitmap.IECanvas.DrawText( 'ImageEn!', 18, 0 );
ImageEnView1.Update(); // Show changes in our viewer

// Automated test of Styled DrawText - Alpha Channel - Typical Values
// Draw Advanced Text to IECanvas
ImageEnView1.IEBitmap.IECanvas.Font.Height := 92;
ImageEnView1.IEBitmap.IECanvas.Font.Style := [fsBold];
ImageEnView1.IEBitmap.IECanvas.Font.Color := clRed;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillGradient := gpgVertical;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillColor2 := clYellow;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderWidth := 6;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderColor := clWhite;
ImageEnView1.IEBitmap.IECanvas.DrawText( 'ImageEn!', 18, 0 );
ImageEnView1.Update(); // Show changes in our viewer

// Automated test of Styled DrawText - 32-Bit RGBA - Typical Values
// Draw Advanced Text to IECanvas
ImageEnView1.IEBitmap.IECanvas.Font.Height := 92;
ImageEnView1.IEBitmap.IECanvas.Font.Style := [fsBold];
ImageEnView1.IEBitmap.IECanvas.Font.Color := clRed;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillGradient := gpgVertical;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillColor2 := clYellow;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderWidth := 6;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderColor := clWhite;
ImageEnView1.IEBitmap.IECanvas.DrawText( 'ImageEn!', 18, 0 );
ImageEnView1.Update(); // Show changes in our viewer

// Automated test of Styled DrawText - Random Values
// Draw Advanced Text to IECanvas
ImageEnView1.IEBitmap.IECanvas.Font.Height := 92;
ImageEnView1.IEBitmap.IECanvas.Font.Style := [fsBold];
ImageEnView1.IEBitmap.IECanvas.Font.Color := clAqua;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillGradient := gpgRight;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillColor2 := clBlue;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderWidth := 12;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderColor := clWhite;
ImageEnView1.IEBitmap.IECanvas.DrawText( 'ImageEn!', -12, 0 );
ImageEnView1.Update(); // Show changes in our viewer

// Automated test of Styled DrawText - Alpha Channel - Random Values
// Draw Advanced Text to IECanvas
ImageEnView1.IEBitmap.IECanvas.Font.Height := 92;
ImageEnView1.IEBitmap.IECanvas.Font.Style := [fsBold];
ImageEnView1.IEBitmap.IECanvas.Font.Color := clAqua;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillGradient := gpgRight;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillColor2 := clBlue;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderWidth := 12;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderColor := clWhite;
ImageEnView1.IEBitmap.IECanvas.DrawText( 'ImageEn!', -12, 0 );
ImageEnView1.Update(); // Show changes in our viewer

// Automated test of Styled DrawText - 32-Bit RGBA - Random Values
// Draw Advanced Text to IECanvas
ImageEnView1.IEBitmap.IECanvas.Font.Height := 92;
ImageEnView1.IEBitmap.IECanvas.Font.Style := [fsBold];
ImageEnView1.IEBitmap.IECanvas.Font.Color := clAqua;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillGradient := gpgRight;
ImageEnView1.IEBitmap.IECanvas.TextStyling.FillColor2 := clBlue;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderWidth := 12;
ImageEnView1.IEBitmap.IECanvas.TextStyling.BorderColor := clWhite;
ImageEnView1.IEBitmap.IECanvas.DrawText( 'ImageEn!', -12, 0 );
ImageEnView1.Update(); // Show changes in our viewer
