Declaration
property Kind: TIELayerKind;
Description
Returns the kind of layer.
Read-Only
Example 1
if ImageEnView1.CurrentLayer.Kind = ielkImage then
TIEImageLayer( ImageEnView1.CurrentLayer ).ResampleFilter := rfLanczos3;
ImageEnView1.Update();
// Which is the same as...
if ImageEnView1.CurrentLayer is TIEImageLayer then
TIEImageLayer( ImageEnView1.CurrentLayer ).ResampleFilter := rfLanczos3;
ImageEnView1.Update();
Example 2
// Hide labels of all line layers when user clicks a check box
procedure TForm1.chkShowLabelsClick(Sender: TObject);
var
i: Integer;
begin
ImageEnView1.LockUpdate();
for i := 0 to ImageEnView1.LayersCount - 1 do
if ImageEnView1.Layers[ i ].Kind = ielkLine then
begin
if chkShowLabels.Checked then
TIELineLayer( ImageEnView1.Layers[ i ]).LabelPosition := ielpAtEnd
else
TIELineLayer( ImageEnView1.Layers[ i ]).LabelPosition := ielpHide;
end;
ImageEnView1.UnlockUpdate();
end;