Code samples for TIEImageLayer.
Automatically generated by the Every Method demo.
// Automated test of Image Layer - Typical Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 0;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clBlack;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - Alpha Channel - Typical Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 0;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clBlack;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - 32-Bit RGBA - Typical Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 0;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clBlack;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - 1-bit - Typical Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 0;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clBlack;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - Random Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).Rotate := 180;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 10;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clWhite;
TIEImageLayer( ImageEnView1.CurrentLayer ).Opacity := 0.50;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - Alpha Channel - Random Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).Rotate := 180;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 10;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clWhite;
TIEImageLayer( ImageEnView1.CurrentLayer ).Opacity := 0.50;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - 32-Bit RGBA - Random Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).Rotate := 180;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 10;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clWhite;
TIEImageLayer( ImageEnView1.CurrentLayer ).Opacity := 0.50;
ImageEnView1.Update(); // Show changes in our viewer



// Automated test of Image Layer - 1-bit - Random Values
// Add Image Layer
ImageEnView1.LayersAdd( ielkImage, 133, 133, 133, 133 );
TIEImageLayer( ImageEnView1.CurrentLayer ).Bitmap.Assign( myIEBitmap );
TIEImageLayer( ImageEnView1.CurrentLayer ).Rotate := 180;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderWidth := 10;
TIEImageLayer( ImageEnView1.CurrentLayer ).BorderColor := clWhite;
TIEImageLayer( ImageEnView1.CurrentLayer ).Opacity := 0.50;
ImageEnView1.Update(); // Show changes in our viewer

---