Jump to content


  • Posts

  • Joined

  • Last visited

Everything posted by Fuge

  1. No way to do it. I asked NNA years ago to add that ability. Fuge
  2. OK So you guys may not want to support ODBC because the amount of development required for 2 platforms would be a nightmare, etc and so on... Why not then set the standard for XML/XSLT and CAD. XML/XSLT is starting to be incorporated into every database and accounting program and web development suite. To my knowledge there is no CAD XML/XSLT library standard defined yet. When you see someone hit a button in Filemaker and MS Excel launches and pops up with a perfectly formatted report completely delivered from Filemaker you can't help see the power of XML/XSLT in Filemaker. Why don't you guys be the leaders here? This is your chance to define XML/XSLT for CAD. XML is that independent translator that can work across platforms and talk to any application before long. Seems a natural extension of VectorScript as well. This all could be a great conduit to creating web content right from VW's with a click of a button. For more info check out this Filemaker linkto see where I'm going with this:http://www.filemaker.com/xml/
  3. The resource file for Windows is actually the same file your looking at on the MAC. The resource for the Windows version actually needs to be created on the MAC and brought over to the Windows Machine. Just like with Workspace files the resource file for Windows is the resource folk of the Mac file. Use the following technique for the Resource file as described for Overlays (Workspace File)http://www.nemetschek.net/support/technotes/025.html HTHDave
  4. I don't think there's a way of doing that within a PIO. It would be nice to do. If it can be done it would be done with an array somehow. Again having someone from NNA step in and clarify or give us an example would be nice. Fuge
  5. Just remove the section -----------------if xymid then begin {box drawn bottom to top}temp:=y1;y1:=y2;y2:=temp;end;------------------The script should work fine without it.The xymid was not declared as a variable. Dave
  6. Fuge

    Basic plug-ins

    The reason for the lack of VectorScript help from anyone at NNA isbecause the few guys that do it in-house are buried in work. Second NNAjust refuses to put any resources towards VS because they think NO oneuses it. So why bother supporting the their users. All the newer VW's userson this board who would like to learn it and use it don't have a shot inhell, honestly. How could you possibly learn with what NNA provides, you can't.Also now that VS is an in-house development tool NNA doesn't want anyoneto know how they created any of their plug-ins and lock them so everyoneis SOL. Examples are by far the best way to learn how to write VS. Along time ago NNA provided books with examples of how to write VS. The book Ihave from MC version 4 is still the best piece of information I haveabout writing VS. Yea outdated now, but far better than what available now. The bottom line is NO one will adopt VS if NNA doesn't give it's users theability to learn it. Makes you question if they do want you to learn it doesn't it? Eversince NNA started using VS as the in-house development tool did the openscripts and books go away. It also answers why they decided to add somany new features to VS as well, the in-house guys needed it. The reason I try and spend time answering questions about VS on this board is because I know your not going to get answers from NNA. I feel for the people whorealize the power in VS but don't have a clue as to where to start. Youcan count on 1 hand the number of times anyone from NNA has answered aquestion about VS on this board. Goes back to the support... it aint there! I find the argument were not going to put support to something people don't usea poor excuse. You have to have the egg before you can have the chicken. You canlead a horse to water, time and time again, but you can't make them drink. It would not cost NNA a great deal of money to have someone one really watch the board and answer VS questions as well as provide examples. Also who would pay another 20 bucksfor a VS book to go along with the next VW's release, I sure would, and I already know VS. My 2 CentsFuge [ 07-03-2002: Message edited by: Fuge ]
  7. Ray, I couldn't agree more on this one. It neverfails your missing a piece of the puzzle to complete whatever it is your doing. Every Get()should have a Set(). Dotting the "i" and crossing the "t"'s sure wouldn't hurt. Note my GetProject(); request under wishlist items a prime example. Dave
  8. That's a Vectorscript error...Odd that you haven't seen it until upgrading to 9.5.2 It basically means that the array within Print Sheets may have not been defined correctly. If the array is defined to handle say 32 variables and you tell it to handle more than that then you get the outside array limits error. Probably a question for techsupport.
  9. Not sure if this helps your dialog question but,try this:---------------Procedure Testdialog;VARmystring:STRING;BEGIN mystring:= StrDialog('Enter Something',''); message(mystring);END;Run (Testdialog);------------------If you leave the string field blank the dialog box will not dismiss. Something has to be typed inor the cancel button must be clicked. With domenutextbyname the way your trying to call each rotate menu item needs to be done a little differently. check out the domenutextbyname constants at: http://www.nemetschek.net/support/custom/vscript/functionref/VSFunctionReference.html Fuge
  10. You can't pick tool modes in VS. Fuge
  11. Try using SetTool(-200); I think that works. Dave
  12. If you want to set an object tool and set active attributes by clicking on an object on the screen, that can be done for all the simpler objects. ccroft has the right idea about get/set and getobject type/ set tool. Writing the script wouldn't be too hard to write, just a bit of time. Go for it ccroft, I'll help if you get stuck.
  13. It sounds like someone just did a "Custom Tool/ Attribute..." from the Organize menu. Custom Tool/ Attribute just records the items checked and then resets them when you run the script. If I'm correct, that's a no brainer. Here's an example.HTHDave----------------------------------------Procedure CustTool;VAR Name:STRING;Result:BOOLEAN;BEGIN PushAttrs;FillFore(255);FillBack(39);FillPat(1);PenFore(4);PenBack(0);PenPat(2);PenSize(40);PenPat(2);Marker(0, 0.125000, 15); NameClass('None');Layer('Layer-1');CallTool(-203);PopAttrs;END;Run(CustTool);
  14. Try ThisDave-------------------------Procedure Numberthem;CONSTkRecName='MyRecord';kRecField='MyField'; VARobjhandle:HANDLE;NumberString:STRING;Num,x,y:REAL; BEGINNum:=RealDialog('Enter a starting number:','1');GetPt(x,y);Objhandle := PickObject(x,y);while Objhandle <> NIL doBeginSetRecord ( Objhandle , kRecName );NumberString:=Num2Str(0 , Num); SetRField ( Objhandle , kRecName , kRecField , NumberString );Num:=Num+1;GetPt(x,y);Objhandle := PickObject(x,y);End; END;Run (Numberthem);
  15. I don't know what exactly everyone's experience has been with VW9.x.x, but I have found working with VW 9.5.1 in OS9 to be pretty stable given that you allocate a ton of ram to it. I find VW's doesn't start working good until it's given a minimum of 300mb's. Also I jumped into OSX about 5 weeks ago and have found VW's to be even more stable there. I have to say I've been pleasantly surprised and have yet to crash VW's. Dave
  16. Thanks for the clarification Kev. The description for FSActlayer fooled two of us. Also heres the complete revised script.---------------------------------------------Procedure Numberthem;CONSTkRecName='MyRecord';kRecField='MyField'; VARobjhandle:HANDLE;NumberString:STRING;Num,x,y:REAL; BEGINNum:=1;GetPt(x,y);Objhandle := PickObject(x,y);while Objhandle <> NIL doBeginSetRecord ( Objhandle , kRecName );NumberString:=Num2Str(0 , Num); SetRField ( Objhandle , kRecName , kRecField , NumberString );Num:=Num+1;GetPt(x,y);Objhandle := PickObject(x,y);End; END;Run (Numberthem);
  17. No Way to clear the clipboard but you can clear the undo history.Dave---------------------------------Procedure ClearUndos;{Clears the undo history}VARYes:BOOLEAN;BEGINSysbeep;Yes:=YNDialog('Are you sure you want to clear the undo history?');If Yes THENBEGINUndoOff;END; END;Run (ClearUndos);
  18. Funny you asked that. The command FSActLayer is for "first selected object on the active layer" So objects should be numbered in the order they are selected, However FSActLayer doesn't seem to be working correctly in VW9.5.1 mac. No matter the order you select the objects everything is numbered in the order they were created. Same goes forusing FSObject(); A couple for the bug list I believe. Dave
  19. Jeff,Set the constant MyRecord and MyField to match the record and field your wanting to number, select your objects to number and this should do the trick. Dave--------------Procedure Numberthem;CONSTkRecName='MyRecord';kRecField='MyField'; VARobjhandle:HANDLE;NumberString:STRING;Num:REAL; BEGINNum:=1; objhandle :=FSActLayer; WHILE Objhandle <> NIL DO BEGINSetRecord ( Objhandle , kRecName );NumberString:=Num2Str(0 , Num); SetRField ( Objhandle , kRecName , kRecField , NumberString );Num:=Num+1;Objhandle := NextSObj ( Objhandle );END; END;Run (Numberthem); [ 05-30-2002: Message edited by: Fuge ]
  20. Paolo, If I understand you correctly. You can changethe classes attached to different object withina PIO. I don't quite understand how your trying to do it. Sorry I can't be more helpful. Dave
  21. Jeff, Tell us what you want to number exactly.a record field attached to a symbol?What criteria does your worksheet use tofind and count the symbols? More infowould be helpful. Dave
  22. Not sure if this can be done on Windows,but on Mac what I do is on one machine enter all the numbers in. Then shut down VectorWorks and copy the VectorWorks pref file of this machines into the pref folder of all the other machines. HTHDave
  23. See if this does what you want. Dave--------------------Procedure RenameClasses;VAR ClassName,NewName:STRING;i: INTEGER; BEGINi:=1; REPEATClassName:= ClassList(i);NewName:= Concat( 'OS-',ClassName );RenameClass ( ClassName, NewName );i:=i+1;UNTIL i = (ClassNum+1); Sysbeep;AlrtDialog('Renaming classes is complete!'); END;Run (RenameClasses);
  24. Another way to edit saved sheets-Go to the Window menu to Script Palettes to Saved Sheets. On Mac, while holding down the option key double on the sheet to edit it.Can't remember if it's the same for Windows. You can also do a command X to delete a saved sheet and command c ,command v to copy and paste a sheet as well. Dave
  25. I just looked in the workspace editorin VW9.5 and I have "Line into Segments...."odd that you don't have it and was told it doesn't exist any longer. Also I looked at vw 8.5 and have "Line into Segments...." there as well. Looking at the VW8.5 version the script doessn't have "Type" as a variable. At the top of any script there is an area where you need to define words that are place holders for values. A place to hold a number or word for example. These place holders can no longer be name "Type" because VW's uses that word internally for other specific tasks.Variable are listed under "VAR" in the script. Look in your script at i, nSegs, TVal, Type : INTEGER; Change the word "Type" to something unique like "Typexxx", there and anywhere elseit may appear in the script and the script should work. HTHDave
  • Create New...