CADxp: petit soucis boite dcl - CADxp

Aller au contenu

Page 1 sur 1
  • Vous ne pouvez pas commencer un sujet
  • Vous ne pouvez pas répondre à ce sujet

petit soucis boite dcl

#1 Guest_-=micka=-_*

  • Groupe : Invités

Posté 24 juin 2011 - 07:55

Bonjour,

je suis actuellement en train d'essayer de créer une boite dcl, mais je rencontre quelques dificultés:
j'aimerai savoir s'il existe une commande (ou autre) qui me permettrait d'avoir en temps réel une valeur qui varierait en fonction de la valeur d'une liste déroulante qui serait dans cette meme boite dcl.

Pour m'expliquer:
j'ai créé une boite dcl avec 4 listes déroulantes, elles servent a définir le nombre d'éléments que je veux insérer contre une ligne que j'aurait mesurer avant.
mais pour savoir combien j'en veux il me faudrait déja un "encart" qui affichrait la longueur de la ligne
et un deuxieme "encart" qui m'indiquerait la place que qui reste contre la ligne.
donc ce deuxième "encart" se metrait a jour à chaque fois que je changerais les valeurs des listes déroulantes.

Je joins le lisp et le dcl de ce que j'ai fait:
Le Lisp:

(defun c:bdcl_140611 (/ liste n nbre)


  (setq liste_rh (list "0" "1"))

  (setq liste_b3m (list "0" "1" "2" "3" "4" "5" "6" ))

  (setq liste_b2m (list "0" "1" "2" "3" "4" "5" "6"))

  (setq liste_sh (list "0" "1"))


  (setq dcl_id (load_dialog "BDCL_140611.dcl"))


  (if (not (new_dialog "bdcl_140611" dcl_id))


    (exit)


  )


  (start_list "nbr_rh")


  (mapcar 'add_list liste_rh)


  (end_list)


  (action_tile


    "accept"


    "(setq nbre_rh (atof (nth (atoi (get_tile \"nbr_rh\")) liste_rh)))


    (done_dialog))"


  )

  


  (start_list "nbr_b3m")


  (mapcar 'add_list liste_b3m)


  (end_list)


  (action_tile


    "accept"


    "(setq nbre_b3m (atof (nth (atoi (get_tile \"nbr_b3m\")) liste_b3m)))


    (done_dialog))"


  )

  

  

  (start_list "nbr_b2m")


  (mapcar 'add_list liste_b2m)


  (end_list)


  (action_tile


    "accept"


    "(setq nbre_b2m (atof (nth (atoi (get_tile \"nbr_b2m\")) liste_2m)))


    (done_dialog))"


  )

  

  

  (start_list "nbr_sh")


  (mapcar 'add_list liste_sh)


  (end_list)


  

  (action_tile


    "accept"


    "(setq nbre_sh (atof (nth (atoi (get_tile \"nbr_sh\")) liste_sh)))


    (done_dialog))"


  )


  (start_dialog)


  (unload_dialog dcl_id)


  (princ nbre_rh)

  (princ nbre_b3m)

  (princ nbre_b2m)

  (princ nbre_sh)


  (princ)


) 

 


et le DCL/

bdcl_140611:dialog{


  label="Vue en élévation";


:boxed_row{


 :boxed_column{

    :boxed_column{

	label="Hauteur de l'ouvrage";

    

    }

    :boxed_column{

	label="Reste à coffrer";


    }

    }


:boxed_column{

   label="Choix des éléments";


  :boxed_column{


    label="Ré-hausse";


    :popup_list{


      label="Nombre :";


      key="nbr_rh";


      edit_width=10;


    }


  }


  :boxed_column{


    label="Banche de 3m";


    :popup_list{


      label="Nombre :";


      key="nbr_b3m";


      edit_width=10;


    }


  }


  

  :boxed_column{


    label="Banches de 2m";


    :popup_list{


      label="Nombre :";


      key="nbr_b2m";


      edit_width=10;


    }


  }


  

  :boxed_column{


    label="Sous-hausse";


    :popup_list{


      label="Nombre :";


      key="nbr_sh";


      edit_width=10;


    }


  }

  

  }

  

  }


  ok_cancel;


} 

 



Merci pour votre aide

0

#2 L'utilisateur est hors-ligne   Tramber 

  • ceinture rouge et blanche 8em dan
  • Groupe : Moderateurs
  • Messages : 8463
  • Inscrit(e) : 29-mars 03
  • LocationStrasbourg

Posté 24 juin 2011 - 10:12

Bonjour,
Ici c'est le forum ObjectDCL. Faut pas confondre.

Toujours incapable de trouver 5 min pour monter une DCL et apprendre (depuis 10 ans !), je ne peux t'aider.
Mais je sais que tu viens de poster une réponse à un sujet qui semble le même à 8h26.
STP : le bon forum + pas de doublons.

Hoppla bon courage.
Image IPB

Bureau d'études dessin.
Spécialiste Escaliers
Développement - Formation

./__\.
(.°=°.)
0

#3 Guest_-=micka=-_*

  • Groupe : Invités

Posté 24 juin 2011 - 10:30

ok désolé,
c'est que j'ai déja posté ce message sur un autre forum, je pensais que celui-ci était plus adapté, car "objetDCL" et boite DCL se ressemble.

Merci
bonne journée
0

Partager ce sujet :


Page 1 sur 1
  • Vous ne pouvez pas commencer un sujet
  • Vous ne pouvez pas répondre à ce sujet

1 utilisateur(s) en train de lire ce sujet
0 membre(s), 1 invité(s), 0 utilisateur(s) anonyme(s)