FastFiber

instellingen (opgelost)

Gestart door Atwist, wo 20 05 2009, 10:24:26

Vorige topic - Volgende topic

Atwist

Hallo forumleden,

Ik werk momentueel aan verschillende opdrachten op zich is dat geen probleem maar het zijn opdrachten waar de klant zijn eigen layers wil gebruiken.
Zelf heb ik bv onder text knop een macro zitten dat de text op de layer teksten wordt geplaatst maar nu moet ik steeds of de macro wijzigen of de text telkens handmatig in de juiste klant layer zetten.
Is er ook een mogelijkheid dat ik de instellingen van klant 1 kan opslaan en ook van klant 2 ......? zodat ik snel kan wissellen van klant 1 naar klant 2.

Alvast bedankt voor jullie ondersteuning.
Atwist

AutoCad 2008.

julien

Je kan dat perfect onder een profiel steken, in autocad 'workspace' genaamd.

Atwist

Dank Julien,

Ik ga dit even uitproberen.
Atwist

AutoCad 2008.

Atwist

Hallo Julien,

Ik heb net wat zitten rotzooien maar het lukt niet, moet ik hier een compleet nieuw menu gaan maken met kopieeren plakken gaat het niet of ik doe iets fout.
Kan jij mij misschien een paar tips geven? :vreegoe:

Alvast bedankt.
Atwist

AutoCad 2008.

Manu

Onder Tools > Cad Standards vind je de Layer Translator.. ik vermoed dat je daar je oplossing moet gaan zoeken..


Groeten,

Manu
AutoCad 2000 - 2007 - 2008
Sketchup 4-5-6

roy_043

Beste Atwist,

Het is ook mogelijk om gebruik te maken van een aantal simpele lisp-routines.

Het idee is als volgt:
Als je een tekening opent in een map waarin zich een "KlantLayers.lsp" bevindt, dan worden daaruit laag-instellingen geladen. Ontbreekt het betreffende lsp-bestand dan worden de laag-instelling uit "defaultLayers.lsp" geladen. Dit gebeurt automatisch.
De laaggebonden macro's moeten eenmalig aangepast worden zodat de laag-instellingen uit de lisp-bestanden worden gebruikt.

Ook voor iemand met weinig kennis van lisp is dit te realiseren.

Laat even weten of je je hiervoor interesseert.

Groet, Roy.



Atwist

Manu,

Ik heb hier even gekeken het lijkt mij lastig om dit te doen (moet eerlijkheidshalve ook zeggen dat ik deze optie niet kende).


Roy_043,

Een lips is ook een mogelijkheid zit deze Lips in expert tools oid, heb namelijk niet veel ervaring met Lips maken heb tot nu toe altijd uit de voeten gekund met de gebruikelijke lips van expres tools of Lipssite, heb dus wel belangstelling hiervoor Roy_043.
Atwist

AutoCad 2008.

roy_043

#7
Beste Atwist,

Dit is de eerste stap in wat ik maar even het lisp-traject noem. In dit stadium is nog niets geautomatiseerd. Het doel van deze stap is jou een idee te geven van hoe e.e.a. werkt.

Bijgevoegd tref je aan: KlantLayers.lsp. In deze lisp worden lisp-variabelen gekoppeld aan laagnamen.

Code (KlantLayers.lsp) Selecteer

(setq
LayerSettingsTekst "FaJanssen-Tekst-Algemeen"
LayerSettingsOmtrek "FaJanssen-Lijnen"
LayerSettingsArcering "FaJanssen-Hatch"
)
(princ "Layer Settings voor de Firma Janssen zijn geladen")
(princ)


Om het uit te proberen doe je het volgende:

1.  Open een nieuwe tekening en sla die op in een map.
2.  Kopieer het bijgevoegde bestand KlantLayers.lsp naar deze map.
3.  Typ (Load "KlantLayers.lsp") op de commando-prompt (dit wordt t.z.t geautomatiseerd).
4.  Maak een aantal buttons aan (of pas bestaande buttons aan) en gebruik als proef de
    volgende twee macro's:
    ^C^C^C(command "_layer"  "_make" LayerSettingTekst "")_MTEXT
    ^C^C^C(command "_layer"  "_make" LayerSettingOmtrek "_color" "3" "" "")_PLINE
5.  Probeer de knoppen uit.
6.  Als het goed is moeten nu "FaJanssen"-lagen zijn aangemaakt.
7.  Wijzig nu KlantLayers.lsp. Dit gaat heel eenvoudig met Kladblok (=Notepad.exe).
    Vervang "FaJanssen" door bijv. "PietersenEnZonen".
8.  Omdat het lisp-bestand is gewijzigd moet je het opnieuw laden: typ opnieuw (Load "KlantLayers.lsp").
9.  Probeer de knoppen uit stap 5 opnieuw uit.
10. Het resultaat moet zijn dat er nu een aantal "Pietersen..."-lagen zijn aangemaakt.


Kortom:
Afhankelijk van het geladen lsp-bestand, KlantLayers.lsp, worden verschillende lagen aangemaakt door de macro's.

Als dit bij jou werkt en je nog steeds geïnteresseerd bent, laat het dan even weten.

Groet, Roy.

Atwist

Roy_043,

Mijn dank alvast, ik ga dit straks uitproberen had het liever nu gedaan maar het is nu een gekkenhuis bij mij op kantoor.
Je hoort nog van mij.
Atwist

AutoCad 2008.

Atwist

Heb gisteren verschillende dingen getest maar kom iet toe een goed resultaat.

Met workspace (Julien)
heb 2 x een workspace gemaakt in de eerste heb een kopie gemaakt van mijn huidige instellingen en de tweede heb ik de instelling gewijzigt zo als ik de wil hebben maar als ik dan van workspace wissel dan gaan de wijzigingen mee naar de andere dus is mijn standaard ook gewijzigt. Dus wat hier fout gaat weet ik niet.

Met klantlayers (Roy_043)
Hier heb ik de beschrijving gevolgt de kleur van de layer wissel wel naar kleur 3 maar de layernaam wisseld niet.

Met profil (idee van mij zelf)
Dit werkt ook niet de knop instelling gaan ook weer mij naar het andere profil, dus dit werkt ook niet.

Zijn er nog meer ideen of weet iemand wat ik fout doen dan hoor ik het graag.
Atwist

AutoCad 2008.

roy_043

Beste Atwist,

:oops: Er zitten typefouten in mijn vorige post:
:oops: De namen van de variabelen in de macro's komen niet overeen met die in de lisp.

Stap 4 had als volgt moeten zijn:

4.  Maak een aantal buttons aan (of pas bestaande buttons aan) en gebruik als proef de
    volgende twee macro's:
    ^C^C^C(command "_layer"  "_make" LayerSettingsTekst "")_MTEXT
    ^C^C^C(command "_layer"  "_make" LayerSettingsOmtrek "_color" "3" "" "")_PLINE

Sorry voor de verwarring.

Groet, Roy.

Atwist

Beste Roy_043,

Geen probleem hoor ik heb hierdoor zelf ook weer veel geleerd en heb een paar ander knoppen gewijzigd.
Ga nu jou voorbeeld uitproberen, je hoort nog van mij.
Atwist

AutoCad 2008.

Atwist

Best Roy_043,

Ben weer even bezig geweest maar de layer kleur werkt wel maar de rest niet , weet nu niet wat ik verkeerd doe.
Heb je misschien nog een optie.

Alvast bedankt.
Atwist

AutoCad 2008.

Atwist

Beste Roy_043,

Probleem gevonden Ik vergat telkens haakje (open en dicht) te gebruiken :?, krijg nu wel de layers van FA Jansen.
Is dit makelijk uit te breiden?
Zou je misschien een uitleg kunnen geven van 1 of 2 macro's wat deze comando's doen zodat ik deze misschien ergens anders ook kan gebruiken.

Alvast bedank voor je hulp. :vreegoe:
Atwist

AutoCad 2008.

roy_043

Beste Atwist,

Ik heb geprobeerd de zaak wat beter uit te werken.
Bijgevoegd twee bestanden:
ManageSettings.lsp (dit bestand hoef je in principe niet aan te passen)
ClientSettings.lsp (dit bestand moet je wel aanpassen).
Tevens moet je op basis van ClientSettings.lsp een DefaultSettings.lsp maken.

Hieronder de toelichting uit het bestand ManageSettings.lsp. Ik hoop dat e.e.a. hierdoor duidelijk wordt.

;;;
;;; LAAGCODES IN PLAATS VAN VASTE LAAGNAMEN GEBRUIKEN IN KNOP-MACRO'S
;;;
;;; De routines in dit lisp-bestand maken het mogelijk om per project andere laagnamen in knop-macro's te
;;; gebruiken. Uitgangspunt is dat laagnamen (inclusief kleur en lijntype) gekoppeld worden aan laagcodes.
;;; Deze laagcodes worden gebruikt in knop-macro's en kunnen per project anders worden ingesteld. Naast
;;; bestanden met instellingen per project kan ook een bestand met default-instellingen gebruikt worden.
;;;
;;; Benodigde bestanden:
;;; ==========================================================================================================
;;; ManageSettings.lsp     Dit bestand (waarnaar u nu kijkt!) moet zich in het zoekpad van het CAD-programma
;;;                        bevinden. Bij het opstarten van een dwg-bestand moet het automatisch worden
;;;                        geladen. Dit kan door het bestand op te nemen in de Startup Suite of door de
;;;                        volgende regel toe te voegen aan acaddoc.lsp:
;;;                        (load "ManageSettings.lsp")
;;; DefaultSettings.lsp    Dit bestand bevat de standaard- of default-instellingen. Het moet zich in het
;;;                        zoekpad van het CAD-programma bevinden.
;;; ClientSettings.lsp     Dit bestand bevat de project- of client-instellingen. Indien van toepassing moet
;;;                        dit bestand zich in de projectmap bevinden. Als dit bestand niet wordt gevonden
;;;                        dan worden de instellingen uit DefaultSettings.lsp gebruikt.
;;; ==========================================================================================================
;;;
;;; Voorbeeld voor een ClientSettings.lsp of DefaultSettings.lsp:
;;; ==========================================================================================================
;;;   (setq AllProjectLayers
;;;       '(
;;;   ;   Syntax:
;;;   ;            Opm.: Het lijntype continuous mag worden weggelaten.
;;;   ;                  Spaties mogen naar wens worden toegevoegd.
;;;   ;   ( "LaagCode"      "LaagNaam"            KleurNr. "LijnType" )
;;;   ; -------------------------------------------------------------------------
;;;       ( "LaagTekst"     "FaJanssen-Tekst-Algemeen"   1 )
;;;       ( "LaagLijnenAlg" "FaJanssen-Lijnen"           5 )
;;;       ( "LaagOmtrek"    "FaJanssen-Lijnen"           5 )
;;;       ( "LaagArcering"  "FaJanssen-Hatch"            3 )
;;;       ( "LaagHidden"    "FaJanssen-Streeplijn"     108 "hidden" )
;;;   ; -------------------------------------------------------------------------
;;;   ; Pas de gegevens tussen de stippellijnen hierboven aan. Indien nodig
;;;   ; kunnen regels worden toegevoegd. Let wel steeds op de juiste syntax.
;;;       )
;;;   )
;;;   ; -------------------------------------------------------------------------
;;;   (princ "Settings voor de Firma Janssen zijn geladen.")
;;;   ; -------------------------------------------------------------------------
;;;   ; Vervang de informatie tussen "" hierboven door een passende mededeling.
;;;   (princ)
;;; ==========================================================================================================
;;;
;;; In knop-macro's kunnen twee verschillende commando's worden gebruikt:
;;; (MakeLayer "????")     De laag waarna wordt verwezen door "????" wordt ingesteld. Als de laag al bestaat
;;;                        dan wordt deze opnieuw ingesteld met de kleur en het lijntype uit het
;;;                        instellingen-bestand.
;;; (SetLayer "????")      Als de laag waarna wordt verwezen door "????" al bestaat dan wordt deze ongewijzigd
;;;                        ingesteld. Bestaat de laag nog niet dan wordt deze op basis van "????" aangemaakt
;;;                        en ingesteld.
;;;
;;;                        *  "????" staat voor een laagcode die is ingesteld in een instellingen-bestand
;;;                           (zie het voorbeeld hierboven).
;;;
;;; Voorbeelden van knop-macro's:
;;; ==========================================================================================================
;;; ^C^C^C(MakeLayer "LaagTekst")_MTEXT
;;; ^C^C^C(SetLayer "LaagOmtrek")_PLINE
;;; ==========================================================================================================
;;;
;;; Elke laagcode die wordt gebruikt in de macro's moet terug te vinden zijn in het instellingen-bestand. Een
;;; laagcode mag maar één keer worden gebruikt in het instellingen-bestand. Het is wel mogelijk dat verschil-
;;; lende laagcodes aan dezelfde laag worden gekoppeld.
;;; De gebruiker is vrij om zijn eigen laagcodes te bedenken. Het is daarbij wel belangrijk om te onthouden
;;; dat laagcodes hoofdlettergevoelig zijn.
;;; Als tijdens een tekensessie laagcodes in ClientSettings.lsp of DefaultSettings.lsp worden gewijzigd dan
;;; moeten de instellingen opnieuw worden geladen. Gebruik hiervoor het commando: ManS (of: ManageSettings).
;;;
;;; ==========================================================================================================


Groet, Roy.