Message 1 of 1
AddLinear and how to use its coordinates
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hello everyone,
Last couple of months I started with using Ilogic for autamoation.
I have now come to the point of automating drawings and dimensions. And I have already reached my first headscratch: Usind addLinear and its coordinates.
=> genDims.AddLinear("Dimension 1", view_A.SheetPoint(-0.08, 0), Maaiveld, NivA)
What is the Sheetpoint and how do I find it?
And how are the coordinates (x,y)? related to this point?
This is how i created a rule:
Dim Blad_1 = ThisDrawing.Sheets.ItemByName("Blad:1") Dim view_A = Blad_1.DrawingViews.ItemByName("A") Dim genDims = Blad_1.DrawingDimensions.GeneralDimensions '*** van boven naar onder/ up to down *** '** Workplanes Dim Maaiveld = view_A.GetIntent("Maaiveld") Dim BovenkantAansluiting = view_A.GetIntent("BovenkantAansluitingA") Dim NivA = view_A.GetIntent("NivA") Dim BodemPut = view_A.GetIntent("BodemPut") Dim OnderkantPut = view_A.GetIntent("OnderkantPut") '** Part entities 'Dim enBodemPut = view_A.GetIntent("Basisput:1", "enBodemPut") Dim enOnderkantPut = view_A.GetIntent("Basisput:1", "enOnderkantPut") 'Dim Edge0 = view_A.GetIntent("Dekplaat:1", "Edge0") 'Dim Face0 = view_A.GetIntent("Dekplaat:1", "Face0") 'Dim enBovenkantPut = view_A.GetIntent("Basisput:1", "enBovenkantPut") 'Dim enDPMG = view_A.GetIntent("Dekplaat:1", "enDPMG") 'Dim enBuitendiameterBasisput = view_A.GetIntent("Basisput:1", "enBuitendiameterBasisput") Dim linDim1 = genDims.AddLinear("Dimension 1", view_A.SheetPoint(-0.08, 0), Maaiveld, NivA) '(-0.06, 0) Dim linDim2 = genDims.AddLinear("Dimension 2", view_A.SheetPoint(-0.08, 0), NivA, BodemPut) Dim linDim3 = genDims.AddLinear("Dimension 3", view_A.SheetPoint(-0.08, 0), BodemPut, OnderkantPut) Dim linDim4 = genDims.AddLinear("Dimension 4", view_A.SheetPoint(-0.16, 0), Maaiveld, BodemPut) '(-0.10, 0) Dim linDim5 = genDims.AddLinear("Dimension 5", view_A.SheetPoint(-0.24, 0), Maaiveld, OnderkantPut) Dim linDim6 = genDims.AddLinear("Dimension 6", view_A.SheetPoint(0, -0.9), enOnderkantPut) 'Dim linDim7 = genDims.AddLinear("Dimension 7", view_A.SheetPoint(10, 0.85), Edge0)
and the se are the results
going from in to out: Dimension 1, 2, 3 then dimension 4 and dimension 5.
But when i change it to a smaller/ bigger part the coordinates seems to jump around.