WhoCanDo

Hi, Just installed Microsoft's Office 365 we based software and Vectorworks 2012 has stopped working with: Problem signature: Problem Event Name: BEX Application Name: VECTOR~1.EXE Application Version: 17.0.5.0 Application Timestamp: 50379bde Fault Module Name: StackHash_4c0d Fault Module Version: 0.0.0.0 Fault Module Timestamp: 00000000 Exception Offset: 00000000 Exception Code: c0000005 Exception Data: 00000008 OS Version: 6.1.7601.2.1.0.256.48 Locale ID: 3081 Additional Information 1: 4c0d Additional Information 2: 4c0d4d78887f76d971d5d00f1f20a433 Additional Information 3: 4c0d Additional Information 4: 4c0d4d78887f76d971d5d00f1f20a433 Anyone else had problems with Office 365?

Because one of my customers has sent me a .dwg drawing with different scales on different layers I would like to customise the dimension units as I view each layer. I know that I can't set each layer to a different dimension unit scale so I would like to use a macro to easily change the dimension units as required. eg. the standard setting is 25.4 units per inch for metric The drawing shows 0.99999 but I know the scale is 1:50 so the dimension should be 50 rounded to no decimal places. ie "Smaller from Larger" should be 50 units per Millimeter. I had a look through the functions but I can't find one that does this. Any suggestions? Regards

I have just copied and pasted this into a VS palette and the macro works fine. I have also copied and pasted it into a new VS Plug-in type Tool which also works for me. Can't offer a reason why it doesn't work for you though. Regards

I want a symbol with pre-filled record information. Lets call it hook. 1. If have drawn a hook then attach a record and fill in the record with Name, Length, Qty & Weight. I then pick the hook and create symbol. Placing this symbol on the drawing does not initially show and record attached but editing the symbol shows that it still has a record with data. 2. If I right click on the symbol in the Resource Browser I have the option of "Attach" which allows me to choose from the record formats available. "Attach" does not attach anything and there does not seem to be be a way of adding data to the record even if it did. 3. Working with 1. above, even though there is data embedded in the symbol, this data does not show up on the worksheets. I don't want to change the symbol to group during insertion because I lose the ability to revise all instances by editing the symbol. Is this a bug or am I missing something here?

WhoCanDo: for i := 4 to 6 do begin CreateThreeStateCheckBox (DialogID, i, Concat (' ', i)); SetBelowItem (DialogID, i - 1, i, 0, 0); end; Thanks Raymond

No that didn't work unless I don't understand you correctly.

Like this: for i := 4 to 6 do begin CreateThreeStateCheckBox (DialogID, i, Concat (' ', i)); SetBelowItem (DialogID, i - 1, i, 0, 0); end;

for i := LayerCount -1 downto 1 do begin h := NextLayer (h); LayerName := GetLName (h); end; No luck Pat, The original post was with spaces and the above is with spaces and "begin" has a tab. I have previewed this reply after copying from VW, copy & paste through Word, WordPad & Notepad but nothing works. I even added spaces after pasting but everything in the forum seems to be left justified. Is there a switch I need to flick in My Stuff? I have seen many people with my problem and I have also seen several comments from replies saying please format your code which is what I would like to do. Any other ideas?

The webpage http://www.artlantis.com/index.php?page=download/plugin/index has a dropdown list which includes VW. Download the plugin and then copy it to c:\document and settings\your login account\Application Data\Nemetschek\Vectorworks\2010\Plugins In VW use Tools\Workspaces\Workspace Editor to add it to your menu What's wrong with Solidworks?

Hi, I've cut and pasted from the VS Editor several times and as I am writing this post I see the format is correct. ie "for" is left justified and "begin" is two spaces in as is Create, Set & end; for i := 4 to 6 do begin CreateThreeStateCheckBox (DialogID, i, Concat (' ', i)); SetBelowItem (DialogID, i - 1, i, 0, 0); end; but when I hit "Submit", everything is left justified. This is OK for above but when there are many more lines of code it becomes harder to read. What am I doing wrong?

Hi, Since BeginDialog is comming to its end, I want to try and convert my macros to CreateLayout but I can't find much help or examples. With the below, what is the next step to identify which box is checked? procedure test; var i, OI : integer; DialogID : longint; procedure Dialog_Handler (var a : longint; b : longint); begin end; begin DialogID := CreateLayout ('CHOOSE', False, 'OK', 'Cancel'); CreateStaticText (DialogID, 3, 'Choose !', 30); SetFirstLayoutItem (DialogID, 3); for i := 4 to 6 do begin CreateThreeStateCheckBox (DialogID, i, Concat (' ', i)); SetBelowItem (DialogID, i - 1, i, 0, 0); end; if (VerifyLayout (DialogID)) then If (RunLayoutDialog (DialogID, Dialog_Handler) = 1) then begin SetThreeStateCheckBoxState (DialogID, 4, 1); for i := 4 to 6 do begin GetThreeStateCheckBoxState (DialogID, i, OI); message (OI);wait(0.5);clrmessage; end; end; end; run (test);

Quote: "Each of my temp dimmers has a record and field 'Dimming Data'.'Dimmer Name'. There are only individual entities at the moment so no double ups." so if there are no doubles then you expect SelectObj to only select one item, therefore ForEachObject will know the handle no matter which layer it is on. With procedure Record_H (h : handle); begin DIMH:=h; end; you will record h from any layer. Regards

I've always wondered why SelectObj isn't: SelectObj (c:Criteria):FSHandle; ( 1st selected handle ) and SelectObjs (c:Criteria); How much easier life would be. However ForEachObject (DoThis, ('Dimming Data'.'Dimmer Name'=LDCIRCUIT)); may help!! Regards

Hi, Sysbeep offers only the current system prompt sound. I know I can change the system prompt sound but I would like a variety of sounds that mean different things to me. How can my macros to choose and play a .wav or .mpg or etc. from VW? Regards Trevor

Thanks Raymond, I was looking for something like SetLayerColorToggle but that's too sensible. Regards

Hi, What is the VectorScript proceedure to toggle the "Document Preferences/Display/Use layer colors" on and off?

I only have Fundamentals that does not allow printing to pdf but that's not a problem because I have been using pdf995 as a pdf printer long before VW decided to incorporate it. Printing to pdf995 does not have the same problems as you are having so it could be an option for you. Regards

I'd be most interested. Thanks

I can't get any more than 63. Could try Chr and Ord somewhere in you code to convert some numbers between 34 & 128 into ascii and reduce the length of your name. Regards

I have VW 2010 SP4 Fundamentals and it works for me. Regards

Thanks Pat, I could see the other resets would do more than I wanted. Regards

I was testing "Ungroup" in a macro which kept asking if I wanted the group data applied to each object ungrouped. I ticked "Do this every time" and picked "No". Some time in the future if I want to change my mind how do I toggle this feature on/off? Regards

Hi, I have been trying to resolve an issue with my plotter by redirecting my plotter port from com1: to "File" to see what is happening. All I get is an Adobe file which starts %!PS-Adobe-3.1 The same drawing plotted with AutoCAD saves a file with DMPL commands as I would have expected. Why does Vectorworks produce this output and how does the plotter driver interpret it as compared to DMPL commands?

Great maaten, I love minimising code. Thanks Assembly, I have but using the CallTool works for me this time. Regards

Been working on it for a while and came up with: GetPt3D ( pX, pY, pZ, False); GetView (xAngleR, yAngelR, zAngleR, offsetX, offsetY, offsetZ); SetView (0, 0, 0, 0, 0, 0); Draw_3D; { My new symbol } Symbol (SymName, 0, 0, 0); { Get my new symbol } Move3D (pX, pY, pZ); SetView (xAngleR, yAngelR, zAngleR, offsetX, offsetY, offsetZ); I hope vw2011 has a Symbol3D (SymName, pX, pY, pZ); Regards