ARKANCE - globální Platinum partner Autodesk ARKANCE | KONTAKT - CZ | SK | EN | DE
Již 10.000+ CAD tipů. Přes 118.500 registrovaných u nás, celkem 1.094.000 registrovaných (CZ+EN), přes 53.000 CAD/BIM bloků. Vyzkoušejte nový přesný Inženýrský kalkulátor. Kompletní příkazy AutoCADu a proměnné AutoCADu 2026.
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

?
CAD diskuze, rady, výměna zkušeností

CAD Fórum - Homepage Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion, 3ds Max, Vault a s dalšími CAD/BIM/PDM aplikacemi. Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy ARKANCE (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.arkance-systems.cz
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenoRozpoznani OS...

 Odpovědět Odpovědět archiv
Autor
splonk Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 25.lis.2006
Lokalita: ČR (Pha)
Používám:
AutoCAD/ACA'21, '24, RVT'21, '24
Stav: Offline
Bodů: 1273
Přímý odkaz na tuto zprávu Téma: Rozpoznani OS...
    Zasláno: 10.říj.2011 v 14:08
Dobry den
Potreboval bych do LISPu dostat "prepinac" ktery podle verze OS spusti aplikaci (nastavbu AutoCADu) budto pro napr. XP x32 nebo Win7 x64... Proste neco ve stylu:
"Pokud je OS x64 (nebo neco jako - pokud existuje *\Program Files (x86)\) tak spust APP x64 jinak spust APP x32"
 
Nize uvadim konkretni priklady tak, jak je pouzivam nyni:
=========================
x86
=========================
(defun c:nxtIMG ()
 (startapp "ImageEditor.exe")
 (princ)
)
=========================
x64
=========================
(defun c:nxtIMG64 ()
 (startapp "ImageEditor64.exe")
 (princ)
)
 
 
Urcite uznate ze je toto dosti "neprakticke"... dva ruzne prikazi na "totez" a kdyz beru v uvahu ze mi se ikonky v Pracovnim prostoru ACADu odkazuji na tento lispik, tak my logicku vypliva ze musim mit dva WorkSpaces pro ruzne OS
 
Dalsi dotaz zni, co se stane kdyz, vyse uvedene spojim nasledovne:
 
=========================
(defun c:nxtIMG_Universal ()
 (startapp "ImageEditor.exe")
 (startapp "ImageEditor64.exe")
 (princ)
)
=========================
Vyzkousel jsem to a funguje, akorat nevim jak moc velka chyba je kdyz ACAD nenajde jednu ze dvou aplikaci? Zadnou chybu to sice nehlasi ale...?
 
Moc dekuji
JASponza
 
 
JASponza

ACA (AutoCAD) 21, 24
RVT 21, 24

Win 10, 11 x64
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21914
Přímý odkaz na tuto zprávu Zasláno: 10.říj.2011 v 14:57
Lepší je to předem otestovat - buď verzi operačního systému nebo 32/64-bitovou verzi AutoCADu (což nemusí být vždy stejné). Tedy např.:
 

(vl-string-search "(x64)" (getvar "platform"))
 
Predikát 64-bitového AutoCADu:

(defun acad64bit-p ()
  (vl-load-com)
  (>
    (strlen
      (vl-prin1-to-string
        (vlax-get-acad-object)
      )
    )
    40
  )
)
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru
splonk Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 25.lis.2006
Lokalita: ČR (Pha)
Používám:
AutoCAD/ACA'21, '24, RVT'21, '24
Stav: Offline
Bodů: 1273
Přímý odkaz na tuto zprávu Zasláno: 11.říj.2011 v 11:40
Dobry den
Dekuji na zaslanem. Sice je to prilis na moje "programatorske" schopnosti... Vyrobil jsem nasledujici:

(defun c:nxti(/ PLATF)
  (setq PLATF (getvar "platform"))
  (if (= PLATF "Microsoft Windows NT Version 6.1 (x64)")
      (progn (startapp "nXtImageEditor64.exe")
      (princ "\n   ** nXtImageEditor64 was started **"))
      (progn (startapp "nXtImageEditor.exe")
      (princ "\n   ** nXtImageEditor was started **"))
  )
  (princ)
)
Vim, ze skusenejsi kolegove asi "placou" nad timto vyrobkem (ma to asi daleko k tomu aby to slo univerzalne pouzivat). Mne to funguje a (zatim) resi problem duplicitnich Workspaces.
 
Umel by mi nekdo napsat to same ale elegantneji (jako podminka k rozpoznani jakou App spustit, v tomto pripade asi staci vedet zda je system x86 nebo x64 - na tom zda je to XP, Vista nebo Win7 pochopitelne nezalezi).
 
Dekuji
JASponza
JASponza

ACA (AutoCAD) 21, 24
RVT 21, 24

Win 10, 11 x64
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21914
Přímý odkaz na tuto zprávu Zasláno: 11.říj.2011 v 11:58
Ano, bude to podobné:

(defun c:nxti ( / )
 (if (vl-string-search "(x64)" (getvar "platform"))
      (progn (startapp "nXtImageEditor64.exe")
      (princ "\n   ** nXtImageEditor64 was started **"))
      (progn (startapp "nXtImageEditor.exe")
      (princ "\n   ** nXtImageEditor was started **"))
 );if
 (princ)
)
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
Zpět nahoru
splonk Zobrazit panel
CAD/BIM manager
CAD/BIM manager
Avatar

Přihlášen: 25.lis.2006
Lokalita: ČR (Pha)
Používám:
AutoCAD/ACA'21, '24, RVT'21, '24
Stav: Offline
Bodů: 1273
Přímý odkaz na tuto zprávu Zasláno: 11.říj.2011 v 12:06
Dekuji pekne!
 
JASponza
JASponza

ACA (AutoCAD) 21, 24
RVT 21, 24

Win 10, 11 x64
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 2124:VIPJak změnit měřítko výkresu pouze v jedné ose (jen X, jen Y, jen Z)?
Tip 14050:VIPJak v detailu výkresu okótovat průměr nebo poloměr k neviditelné ose?
Tip 6424:VIPPoužití konstrukčních čar náčrtu ve výkresovém pohledu sestavy Inventoru.
Tip 11417:Jak vytvořit automatické osy otvorů v Inventoru?
Tip 8849:Kompatibilita AutoCADu for Mac s OS X 10.8 (Mountain Lion).
Tip 3992:Vypnutí zobrazení os normalizovaných součástí v AutoCADu Mechanical.


 Odpovědět Odpovědět

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 0,394 sekund.