procedure RenameShapeName(const OldName,NewName:String);




Description:


Know a shape's name ,  Set the shape new name.



Example:


 MyCAD1.RenameShapeName('Shape100','MyNewShape');