function GetLayerNoById(ALayerId: integer): integer;



Description:


    Get  layer's No by Id, if do not match Id, return -1;


Sample:


procedure Form1.Button1Click(Send:TObject)

begin

 ShowMessage(' The Layers Id is:'+'4' +' its layer No is: '+Inttostr(MyCAD1. GetLayerNoById(4)));

end;


See Also:


GetLayerIdByNo