| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Brühl und CIDEON: Synergien schaffen Wettbewerbsvorteile , ein Anwenderbericht
|
Autor
|
Thema: Suche Liste von Environment Variables (215 mal gelesen)
|
Mike DeMott Mitglied
Beiträge: 12 Registriert: 08.07.2002
|
erstellt am: 08. Jul. 2002 16:33 <-- editieren / zitieren --> Unities abgeben:
Hallo, kann jemand mir sagen wo ich eine Liste von Acad System Environment Variables bekomme? z.B. Acad, MaxArray, etc.?
Code: (getenv)
und Code: (setenv)
in der AutoCAD Hilfe bringt mir nicht weiter. Mike ------------------ Gruß, Mike Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Shame Mitglied Konstrukteur
Beiträge: 64 Registriert: 11.04.2002 Wenn eine Sache genetisch so versaut ist, bekommt man das mit mit Prügeln allein nicht korrigiert !!!!!<P>Win2K,A2k,ElsaWinner2k,256MBRAM
|
erstellt am: 09. Jul. 2002 07:19 <-- editieren / zitieren --> Unities abgeben: Nur für Mike DeMott
Hi Mike bei ACAD2K ist in der hilfe die übersicht der Systemvariablen (einfach bei suchen 'Systemvariablen' und 'übersicht' eintippen ) Meinst du diese ????? ------------------ Hope this Helps Gruß Michi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADchup Ehrenmitglied V.I.P. h.c.
Beiträge: 3336 Registriert: 14.03.2001 Sicher ist, dass nichts sicher ist. Selbst das nicht. Joachim Ringelnatz
|
erstellt am: 09. Jul. 2002 09:01 <-- editieren / zitieren --> Unities abgeben: Nur für Mike DeMott
Hi Mike, habe in den Autodesk Newsgroups folgendes Lisp gefunden, das Dir unter anderem auch den Status von Umgebungsvariablen ausgibt. Vielleicht hilfts schon mal weiter. Ansonsten müsstest Du Dich durch Deine Registry graben. (defun checkvars (/ varlist echo env var bads getvars getenvs both) (setq varlist '("PlotSpoolerNode" "PlotSpoolerDirectory" "AutoSaveFile" "TempDirectory" "DefaultPlotToFile" "ModeBits" "AlarmOnError" "ActiveAssistance" "PROXYWEBSEARCHNUMBER" "Use TODAY as Startup dialog" "ShowFullPathInTitle" "LayoutRegenControl" "SnapType" "ShowHyperlinkCursor" "ShowHyperlinkToolTip" "ShowPaperSize" "ObjectARXSupportPath" "ObjectDBXSupportPath" "ExplorerInsertUnits" "LineWeightDisplayScale" "MRUFilesToList" "HideWarningDialogs" "DatabaseTablesOpenMode" "SQLIndexInDwg" "InsertUnitsDefTarget" "InsertUnitsDefSource" "Measureinit" "AssignInsertUnits" "LoadPaletteBySession" "ShowOleScaleDialog" "ImageHighlight" "AutoSnapPolarAddAng" "LogFilePath" "SaveFilePath" "OffsetCurveGapType" "UcsIconNonActiveColor" "UcsIconActiveColor" "UcsIconLineWidth" "UcsIconCone" "UcsIconSize" "UcsIcon3d" "UCSAxisAng" "UCSView" "UCSOrtho" "XFadeCtl" "DisableTrueColor" "Trimmode" "CheckDrawingSignature" "PrinterDescDir" "PrinterStyleSheetDir" "PrinterConfigDir" "ShowPrintBorder" "ShowPaperMargins" "ShowPaperBackground" "CreateViewports" "ShowPlotSetup" "ShowRuler" "ShowTabs" "DefaultFormatForSave" "LineWeightUnits" "WHIPTHREAD" "WhipThreadEnable" "WhipArcEnable" "DefaultLayerZeroPlotStyle" "DefaultPlotStyle" "HatchAlertDisabled" "DatabaseWorkSpacePath" "TemplatePath" "MaxArray" "EdgeMode" "MaxHatch" "HatchType" "PlineType" "AVEMAP" "ImportPathInfo" "CursorSize" "ShowProxyGraphics" "ShowProxyDialog" "ARXDemandLoad" "TextWindow.FontPitchAndFamily" "TextWindow.FontItalic" "TextWindow.FontWeight" "TextWindow.FontHeight" "TextWindow.FontFace" "CmdLine.FontPitchAndFamily" "CmdLine.FontItalic" "CmdLine.FontWeight" "CmdLine.FontHeight" "CmdLine.FontFace" "FontPitchAndFamily" "FontItalic" "FontWeight" "FontHeight" "FontFace" "MonoVectors" "Plot preview background" "Autotracking vector" "LayoutXhairPickboxEtc" "XhairPickboxEtc" "TextWindow.BackColor" "TextWindow.ForeColor" "CmdLine.BackColor" "CmdLine.ForeColor" "Layout background" "Background" "MaxDwg" "CustomColors" "CmdHistLines" "CmdVisLines" "MaxApp" "ToolTips" "Scrollbars" "UseMenuHeader" "AcadClassic" "SDIMode" "NoStartUpDialog" "DemandLoadingModeler" "ScreenMenu" "DigitizerArbitration" "BmpOutCompression" "LogFileOpen" "ACADLOGFILE" "LOGFILE" "UserName" "ACADALTMENU" "ACADLspAsDoc" "AutoSnapTrackPath" "AutoSnapPolarDistance" "AutoSnapPolarAng" "AutoSnapPolarMode" "AutoSnapShowAperture" "AutoSnapSize" "AutoSnapColor" "OleHide" "XrefLoadPath" "Trim&ExtendProjectMode" "MaxOctTreeNodesToAllocate" "PostscriptQuality" "PickFirst" "PickDrag" "PickBox" "PickAuto" "PickAdd" "GripSize" "GripHot" "GripColor" "GripBlock" "Grips" "EntityExtentVariant" "AuditControlFlags" "MenuOptionFlags" "XrefControlFlags" "DisableGraphicsTextArea" "SDF_AttributeExtractTemplateFile" "ObjectSnapCursorSize" "StatusLine&CoordinateDisplay" "RasterPreview" "PlotRotationMode" "QAFlags" "CommandDialogs" "FileDialog" "RtDisplay" "ZoomFactor" "UseContextMenus" "ContextMenus" "MiddleButtonPan" "OsnapCoord" "XrefLazyLoadMode" "TextFill" "MTextEditor" "CustomDictionary" "MainDictionary" "PSOUT_PrologFileName" "AutomaticSaveMinutes" "DisableScreenMenuArea" "MaxSortEntries" "FontMappingFile" "EmergencyFont" "NetLocation" "IsaveBackupDwg" "IsavePercent" "MenuFile" ) ) (defun echo (fun item / value vtype) (setq value (fun item) vtype (type value) ) (if (= vtype 'LIST) (setq vtype (mapcar 'type value)) ) (princ item) (princ " ") (prin1 vtype) (if (vl-position item both) (princ " (both)") ) (terpri) ) (foreach item varlist (if (setq env (getenv item)) (setq getenvs (cons item getenvs)) ) (if (setq var (getvar item)) (setq getvars (cons item getvars)) ) (cond ((and (not env) (not var)) (setq bads (cons item bads))) ((and env var) (setq both (cons item both))) ) ) (princ (strcat "\nACADVER=" (getvar "acadver") " _VERNUM=" (getvar "_vernum") ) ) (princ "\n\nItems found via (getenv):\n") (if getenvs (foreach item (acad_strlsort getenvs) (echo getenv item)) (write-line "None") ) (princ "\nItems found via (getvar):\n") (if getvars (foreach item (acad_strlsort getvars) (echo getvar item)) (write-line "None") ) (princ "\nItems NOT found:\n") (if bads (mapcar 'write-line (acad_strlsort bads)) (write-line "None") ) (princ) ) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Mike DeMott Mitglied
Beiträge: 12 Registriert: 08.07.2002
|
erstellt am: 09. Jul. 2002 09:33 <-- editieren / zitieren --> Unities abgeben:
Hallo, @Shame Sorry, aber was Du meinst sind die Variabeln, die man mit (getvar) abrufen kann. Aber für Deine Mühe bekommst Du Unities! @CADchup Sowas habe ich gesucht! Unities! Gibt es irgenwo ausführlicher Dokumentation darüber? (Ich habe noch Unities zu verteilen) ------------------ Gruß, Mike Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |