Hallo,
Ik moet regelmatig de achtergrond van mijn tekenvlak van kleur veranderen.
Normaal gaat dat via options-display- .... wat telkens een aantal kliks vraagt. Dus dacht ik, ik maak een knop in een werkbalk waarmee ik in één klik de kleur van mijn scherm verander. Ik dacht dit te kunnen doen via setvar en zo de juist systeemvariabele te kunnen ingeven , maar ik weet niet welke systeemvariabele ik hiervoor zo moeten gebruiken.
Eigenlijk zoek ik dus een macro die ik aan deze knop zou moeten hangen om het scherm in een bepaalde kleur te zetten.
Ik werk in acad2006
Alvast bedankt voor de moeite
Groeten
Woodyken
Citaat van: woody op wo 19 11 2008, 10:54:49
Hallo,
Ik moet regelmatig de achtergrond van mijn tekenvlak van kleur veranderen.
Normaal gaat dat via options-display- .... wat telkens een aantal kliks vraagt. Dus dacht ik, ik maak een knop in een werkbalk waarmee ik in één klik de kleur van mijn scherm verander. Ik dacht dit te kunnen doen via setvar en zo de juist systeemvariabele te kunnen ingeven , maar ik weet niet welke systeemvariabele ik hiervoor zo moeten gebruiken.
Eigenlijk zoek ik dus een macro die ik aan deze knop zou moeten hangen om het scherm in een bepaalde kleur te zetten.
Ik werk in acad2006
Alvast bedankt voor de moeite
Groeten
Woodyken
Beste Woody,
Met het onderstaande kun je de achtergrondkleur in stellen:
(vl-load-com)
(setq AutoCAD (vlax-get-acad-object))
(setq Optie (vla-get-Preferences AutoCAD))
(setq Scherm (vla-get-Display Optie))
(vla-put-GraphicsWinModelBackgrndColor Scherm (vlax-make-variant 0 19))Dus de macro wordt:
^C^C_(vl-load-com)
(setq AutoCAD (vlax-get-acad-object))
(setq Optie (vla-get-Preferences AutoCAD))
(setq Scherm (vla-get-Display Optie))
(vla-put-GraphicsWinModelBackgrndColor Scherm (vlax-make-variant 0 19))Voor witte kruisdraden moet U ook de volgende regel toevoegen:
(vlax-put-property Scherm 'ModelCrosshairColor 16777215)Met vriendelijke groet, HofCAD CSI
PS Zie evt. http://ww3.cad.de/foren/ubb/Forum145/HTML/001347.shtml
http://discussion.autodesk.com/forums/message.jspa?messageID=6062061
http://www.cadtutor.net/forum/showthread.php?p=159724
http://www.cadtutor.net/forum/showthread.php?t=863
Hofcad,
Ik heb de gegeven marco aan een werkbalkknop gekoppeld.
Als ik deze macro gebruik, wordt de schermachtergrond zwart.
Kan je me eens zeggen waar ik in de macro de kleur van de achtergrond kan wijzigen. Ik wil namelijk een knop maken die een witte achtergrond geeft, en een andere die grijs (kleur nr 9) geeft.
Bij het gebruik van de macro zie ik in de commandobalk achter de macro " nil "staan, ik weet niet of dat wat betekent.
Groetjes
Woody
Citaat van: woody op do 20 11 2008, 19:37:35
Hofcad,
Ik heb de gegeven marco aan een werkbalkknop gekoppeld.
Als ik deze macro gebruik, wordt de schermachtergrond zwart.
Kan je me eens zeggen waar ik in de macro de kleur van de achtergrond kan wijzigen. Ik wil namelijk een knop maken die een witte achtergrond geeft, en een andere die grijs (kleur nr 9) geeft.
Bij het gebruik van de macro zie ik in de commandobalk achter de macro " nil "staan, ik weet niet of dat wat betekent.
Groetjes
Woody
Beste Woody,
Uit http://ww3.cad.de/foren/ubb/Forum145/HTML/001347.shtml
;;; Schwarz: 0
;;; Weiß: 16777215
;;; Grau (Farbe 9): 12632256
Dus voor wit:
(vl-load-com)
(setq AutoCAD (vlax-get-acad-object))
(setq Optie (vla-get-Preferences AutoCAD))
(setq Scherm (vla-get-Display Optie))
(vla-put-GraphicsWinModelBackgrndColor Scherm (vlax-make-variant 16777215 19))Dus voor grijs:
(vl-load-com)
(setq AutoCAD (vlax-get-acad-object))
(setq Optie (vla-get-Preferences AutoCAD))
(setq Scherm (vla-get-Display Optie))
(vla-put-GraphicsWinModelBackgrndColor Scherm (vlax-make-variant 12632256 19))Met vriendelijke groet, HofCAD CSI
Hofcad,
Hartelijk bedankt voor deze gegevens, alles werkt zoals ik het bedoeld had.
Mijn probleem is opgelost, maar misschien nog een bijvraagje; weet er iemand waar ik een lijst vind met de getalwaarden (zoals in bovenstaande oplossingen) van de ander kleuren.
Groetjes
Woody
Ik ben zelf wat gaan zoeken en dit is het beste dat ik tot nu toe gevonden heb.
http://cloford.com/resources/colours/500col.htm
Groetjes
Woody
Citaat van: woody op vr 21 11 2008, 20:45:55
Ik ben zelf wat gaan zoeken en dit is het beste dat ik tot nu toe gevonden heb.
http://cloford.com/resources/colours/500col.htm
Groetjes
Woody
Beste Woody,
Indirect kan het bijvoorbeeld als volgt:
Als je een object (bijv. een cirkel) een true color heb gegeven,
dan kun je met het programma GETTRUECOLOR het kleurnummer
bepalen.
GetTrueColor.lsp kun je downloaden op:
http://www.menziengineering.ch/Downloads/Download.htm#101
Met vriendelijke groet, HofCAD CSI