Jump to content

Julian Carr

Distributor
  • Content Count

    181
  • Joined

  • Last visited

Community Reputation

70 Excellent

5 Followers

About Julian Carr

  • Rank
    Journeyman

Personal Information

  • Location
    Australia

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. A1. Layer stacking order. A2. Don't know.
  2. Try this slight variation (untested): Procedure SomeCalloutMrgnDialog; Var H1:Handle; B1:Boolean; MrgnCall, MrgnValue,LyrScale:Real; MrgnValueStrng,default,request:String; Procedure GetValues; Begin request:='CallOut PIO Page Unit Margin'; default:='0.0625'; MrgnCall:=DistDialog(request,default); LyrScale:=GetLScale(ActLayer); MrgnValue:=LyrScale*MrgnCall; MrgnValueStrng:=Concat(MrgnValue); End; Procedure SetObj_Value(H1:Handle); Begin SetRField(H1,'Callout','Margin',MrgnValueStrng); ResetObject(H1); SetDSelect(H1); End; Begin GetValues; ForEachObject(SetObj_Value,(((VSEL=TRUE) & (PON='Callout')))); DoMenuTextByName('Previous Selection',0); End; Run(SomeCalloutMrgnDialog);
  3. Sorry, I meant to say this is where it needs to be if you are using collapsing widget separators. Otherwise, it can be used in different places.
  4. I'm not seeing any issues either, but it might depend on where in the code you are calling it. Should be in kObjOnInitXProperties (event 5).
  5. CreateLineWeightPopup() doesn't give the option to use class thickness Andy.
  6. Try GetLineWeightChoice() Andy. At least that's what I use.
  7. Set the above script to be Vectorscript, not Python. If you can't do that, in python it will be something like this: vs.SetClassN(vs.FSActLayer(), 'my class name', True) but I know nothing about python.
  8. You could try this: SetClassN(FSActLayer, 'my class name', True); I likely won't work in groups or symbols though. If used on a group (not in a group), the last argument (true or false) will determine if all the objects in the group also get the class assignment.
  9. You need to use SelectChoice(). The index is zero based so make sure you load the menu from zero.
  10. Wild guess. Try adding this: ResetObject(CounterTopH); at the end of the create floor section.
  11. Try changing the criteria in ForEachObject() to: (INSYMBOL & INOBJECT & INVIEWPORT & (T=DIMENSION) & (SEL=TRUE))
  12. Actually I did know Pat and have used it in a worksheet previously. I just forgot. It's there in the insert function list.
  13. I agree Pat. Some invisible characters in the code I suspect.
  14. This script works for me. Pat's one doesn't. You have to call the script name not the procedure name however, in RunScript(). Procedure T; BEGIN WSScript_SetResStr(GetPluginStyle(WSScript_GetObject)); END; Run(T);
  15. It's possible you have picked up an invisible character by copying from the browser. Try deleting the last line and everything below it then retyping it manually. Or copy the script to a text editor and turn on invisible characters to see if you can spot something.

 

7150 Riverwood Drive, Columbia, Maryland 21046, USA   |   Contact Us:   410-290-5114

 

© 2018 Vectorworks, Inc. All Rights Reserved. Vectorworks, Inc. is part of the Nemetschek Group.

×
×
  • Create New...