CADwiesel's Forum

Hallo !

Erstmals danke für die tolle seite .....

bei dem lisp "switch_backcolor" ändert sich zwar die farbe, jedoch nicht die farbe des fadenkreuzes- sprich, cursor ist unsichtbar im weißen hintergrund...

Verwende Acad 2002 engl.

liebe grüße
Christian / Graz Austria

naja, deswegen heisst's ja auch switch_backcolor

für Fadenkreuz kannst du das nehmen:
; Rot
(vla-put-ModelCrosshairColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) 255)
; Gelb
(vla-put-ModelCrosshairColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) 65535)
; Grün
(vla-put-ModelCrosshairColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) 65280)
; Cyan
(vla-put-ModelCrosshairColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) 16776960)
; Blau
(vla-put-ModelCrosshairColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) 16711680)
; Magenta
(vla-put-ModelCrosshairColor (vla-get-display (vla-get-preferences (vlax-get-acad-object))) 16711935)