TIELayer.WidthD

Declaration

property WidthD: Double;

Description

Specifies the layer size (i.e. display width when zoom is 100%).
This is a Double version of Width.

Note: For image layers, setting width before loading will ensure the loaded image does not exceed the current layer dimensions

Examples

// Make all selected layers 1/3 size
ImageEnView1.LockUpdate;
for i := 0 to ImageEnView1.LayersCount - 1 do
  if ImageEnView1.Layers[ I ].Selected then
  begin
    ImageEnView1.Layers[ I ].WidthD  := ImageEnView1.Layers[ I ].Width / 3;
    ImageEnView1.Layers[ I ].HeightD := ImageEnView1.Layers[ I ].Height / 3;
  end;
ImageEnView1.LayersFixSizes( LYR_SELECTED_LAYERS );
ImageEnView1.UnlockUpdate;


// Set width to 600 while maintaining AR
ar := ImageEnView1.CurrentLayer.WidthD / ImageEnView1.CurrentLayer.HeightD;
ImageEnView1.CurrentLayer.WidthD  := 600;
ImageEnView1.CurrentLayer.HeightD := 600 / ar;
ImageEnView1.Update();


// Set height to 600 while maintaining AR
ar := ImageEnView1.CurrentLayer.WidthD / ImageEnView1.CurrentLayer.HeightD;
ImageEnView1.CurrentLayer.WidthD  := 600 * ar;
ImageEnView1.CurrentLayer.HeightD := 600;
ImageEnView1.Update();


// Load image so it fits within the current layer dimensions
lyr := TIEImageLayer(ImageEnView1.CurrentLayer);
// Lock image layer size
lyr.WidthD  := lyr.WidthD;
lyr.HeightD := lyr.HeightD;
ImageEnView1.IO.LoadFromFile( 'D:\image.jpg' );
lyr.RestoreAspectRatio();

See Also

◼PosXD
◼PosYD
◼HeightD

---