Zobrazit plnou verzi příspěvku: mizející palety nástrojů

Ondřej Urban
21.11.2023, 15:22
Zdravím,máme takový oříšek.Používáme na desítkách počítačů palety nástrojů v lokálních adresářích (c:\...)Lispem při prvním nahrání ze síťových disků načteme i "cesty". Drží už léta.Teď nám to začalo dělat, že se palety načtou, ale po zavření a opětovném otevření je to v ....Při nabíhání CADu palety proskakují "že jsou", ale po ukončení načítání CADu zůstane jen prázdná paleta.Kontrolou cest k paletám zjištěno že je jen DEFAULT (ROAMABLEROOTPREFIX) cesta.Nějaký nápad proč mizí přidané cesty ? Přecházíme na ONEDRIVE, může to souviset ?díky moc

Vladimír Michl
21.11.2023, 16:45
Ten OneDrive spravuje ty "síťové disky"? Nebo synchronizuje ty lokální složky s kopiemi? Pokud ano, mohla by to být příčina, OneDrive různě zamyká a odemyká přístupy ke složce při snaze o její synchronizaci a řadě aplikací se to moc nelíbí.

Ondřej Urban
21.11.2023, 17:54
Nějaká synchro tam běží, zjistím podrobnosti.Ale určitě neběží na lokální "file" kde jsou ty cesty a pokud tam jednou zapíšu, je mě záhadou, že to zmizí. Do čeho se to vlastně ukládá ?ONEDRIVE z "c" řeší: dokumenty, obrázky, plochaale přecházíme od klasických síťových disků na cloud (onedrive)....díky
Ondřej Urban2023-11-21 18:01:53

steep1234
11.12.2023, 09:51
Zdravím,spolupracuju na tomto řešení s Ondrou. Palety už nemizí, problém byl zakopaný někde v lispu, který upravoval vyhledávací cestu palet. To už jsem opravil, nicméně teď se vyskytl problém jiný:Náš lisp, který by měl nastavovat podpůrné cesty vypadá následovně:(setq ACfiles (vla-get-files (vla-get-preferences (vlax-get-acad-object)))); Get the user's profile directory(setq userProfileDir (getenv "USERPROFILE")); Set support paths(setq searchpath (vla-get-supportpath ACfiles))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\Bloky")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\Bloky"))))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\PERI-CZ-menu\\DWG")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\PERI-CZ-menu\\DWG"))))(vla-put-supportpath ACfiles searchpath); Set tool palette paths(setq searchpath (vla-get-ToolPalettePath ACfiles))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\Nástroje PERI*")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\Nástroje PERI"))))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\Nástroje PERI\\Palettes*")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\Nástroje PERI\\Palettes"))))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\PERI UP*")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\PERI UP"))))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\PERI UP\\Palettes*")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\KatalogPeri\\PERI UP\\Palettes"))))(if (not (wcmatch searchpath (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\Bloky")))    (setq searchpath (strcat searchpath ";" (strcat userProfileDir "\\OneDrive - PERI Group\\Technika\\Software\\PERICAD\\Pro_vyvojare_-_podpurne_soubory\\Bloky"))))(vla-put-ToolPalettePath ACfiles searchpath)Cesty to nastaví, ale při každém startu Autocadu nastaví ToolPalette-path nově a zduplikuje, takže po týdnu práce tam cesty mám mnohokrát, na přiloženém obrázku už jsem je promazal pro přehlednost. U support paths (první část lispu) podmínka funguje, tam se cesty neduplikují.Dokázal byste prosím poradit?Moc díky za odpověďIng. Štěpán MudrákPERI, spol. s.r.o