;;-----------------------------------* ;; * ;; Copyright 2021 Volker Burkert * ;; * ;; Setzt den Hintergrund auf Weiß * ;; * ;;-----------------------------------* (sd-defdialog 'SD_Hindergrundfarbe_Weiss :toolbox-button t :dialog-title '(SD_Hindergrundfarbe_Weiss :variables '( (set_pers_context "Toolbar-relative" vp_background :vport (oli::sd-inq-current-vp) :type :color :color1 16777215 :done complete) (set_vp_capping (oli::sd-inq-current-vp) :on) (set_vp_capping (oli::sd-inq-current-vp) :part-color) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_SHADED :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_EDGED :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_WIRE :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_HIDDEN :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_HIDDEN_DIMMED :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_MIXED :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_VERTICES :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_PART_TRANSPARENCY :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_FACE_TRANSPARENCY :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_FACE_COLOR :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_PART_REFLECTANCE :ON) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_FACE_REFLECTANCE :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_EDGE_COLOR :OFF) (SET_SHOW (oli::sd-inq-current-vp) :3DGEO_LABEL :OFF) (SET_SHOW (oli::sd-inq-current-vp) :DOCU_PLANES :OFF) (SET_SHOW (oli::sd-inq-current-vp) :COORD_SYSTEM :OFF) (SET_SHOW (oli::sd-inq-current-vp) :CLIP_PLANES :ON) (SET_SHOW (oli::sd-inq-current-vp) :CLIP_LINES :ON) (SET_SHOW (oli::sd-inq-current-vp) :CLIP_HATCHES :ON) (SET_SHOW (oli::sd-inq-current-vp) :FEATURE_PTS :ON) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_BORDER :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_LOCAL_AXIS :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_LABEL :ON) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_DIM_INACTIVE :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANE_SETS_MATCH_LINES :ON) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_2DGEO :ON) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_2DCONSTRUCTION :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_2DGEO_VERTICES :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_2DGEO_LABEL :OFF) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_HIDDEN :ON) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_2DGEO_COLOR :ON) (SET_SHOW (oli::sd-inq-current-vp) :WORKPLANES_2DGEO_LINE_TYPE :ON) )))