iLogic Template set up - ability to alter style library dependant on sheet size?

iLogic Template set up - ability to alter style library dependant on sheet size?

Anonymous
Not applicable
367 Views
1 Reply
Message 1 of 2

iLogic Template set up - ability to alter style library dependant on sheet size?

Anonymous
Not applicable

Morning all,

 

I'm currently setting up a BS 8888 drawing template and I've got to the point where I have an iLogic rule that will change the sheet size between A0, A1 & A3 and bring in the correct drawing border and title block.

 

The issue I've come across relates to the style library and how views, labels etc are sized. BS 8888 dictates that view labels etc. vary with sheet size. i.e. 5,0mm text on A0 sheets and 3,5mm text on A3 sheets.

 

Within my style editor I have 2 separate standards set up, "BS 8888 - A0" and "BS 8888 - A3". These vary all the parameters I need. 

 

The problem, which I don't know if it can be solved, is that I want to utilize varying styles in the same multi-sheet file. I may have an assembly on an A0 sheet, being sheet 1/2, and a parts list or extra detail sheets (A3), being sheet 2/2.  How do ensure that these 2 sheets use the correct / relevant style based on the iLogic driven sheet size?

 

Thanks,

Shaun

0 Likes
368 Views
1 Reply
Reply (1)
Message 2 of 2

chandra.shekar.g
Autodesk Support
Autodesk Support

@Anonymous,

 

 

Try below iLogic code to change the textstyle of label of drawing views by looping through all sheets in a Drawing document.

 

Dim oDoc As DrawingDocument
oDoc = ThisApplication.ActiveDocument 

Dim oSheet As Sheet 
oSheet.Size = DrawingSheetSizeEnum.kA0DrawingSheetSize 
For Each oSheet In oDoc.Sheets 
	Dim oView As DrawingView 
	
	For Each oView In oSheet.DrawingViews 
		If oSheet.Size = DrawingSheetSizeEnum.kA0DrawingSheetSize  Then
			oView.Label.TextStyle = oDoc.StylesManager.TextStyles.Item("BS 8888 - A0")
		Else If oSheet.Size = DrawingSheetSizeEnum.kA3DrawingSheetSize Then
			oView.Label.TextStyle = oDoc.StylesManager.TextStyles.Item("BS 8888 - A3")
		End If
	Next 
Next

Thanks and regards,


CHANDRA SHEKAR G
Developer Advocate
Autodesk Developer Network



0 Likes