Hi,
I made an algorithm to erase panels,
Dim del As irobotobjobjectserver del = robapp.Project.Structure.Objects For i = 1 To (10) * (10) * 2 del.Delete(i) Next i
and another to assign thickness,
For p = 1 To (Count * Count) * 2 Dim objy As IRobotObjObject objy = robApp.Project.Structure.Objects.Get(p) objy.SetLabel(irobotlabeltype.I_LT_PANEL_THICKNESS, Esp) objy.Update Next p
is there any way to erase all panels at once, avoiding the use of cycles, like a delete all?
Is it possible to do the same to assign a thickness? select all panels and assign a single value?
Thanks in advance
Solved! Go to Solution.
Solved by Rafal.Gaweda. Go to Solution.
on Selection:
RobApp.Project.Structure.Objects.DeleteMany RSelection RobApp.Project.Structure.Objects.SetLabel RSelection, I_LT_PANEL_THICKNESS, "My thickness" etc
Hi,
I want to ensure that all the objects in the existing model (if any) is deleted in ROBOT, if there is an existing model already. I want this so as to avoid duplication of the model if the user clicks the generate model button on my VBA code twice.
Hi @rhlkochar
If you control objects numbers just check if they exist.
I do not see other way except starting "new" model each time you press button
Hi Rafal,
Say I have 14 objects numbered 1 to 14, how do I delete all the objects?
????
make selection and delete them
robapp.Project.Structure.Objects.DeleteMany(...)