Pb liste déroulante dcl limité à 50 éléments

[gwn]

Bonjour

J'ai créer un programme en lisp + boite de dialogue en dcl pour selectionner dans une liste déroulante un des calques présents sur le document.

Voici le code dcl :

 

ML_CALQUE

: dialog

{

 

label = "ML_CALQUE";

 

: row {

 

: boxed_column {

label = "Liste de calque";

 

: popup_list {

key ="selections";

value ="1";

width = 40 ;

}

}

 

}

 

: row {

 

ok_cancel;

}

 

}

 

Et l'appel en lisp :

 

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

(if (not (new_dialog "ML_CALQUE" dcl_id))

(exit)

)

(start_list "selections" 1)

(mapcar 'add_list listecalque)

(end_list)

(action_tile "cancel" "(done_dialog)(setq userclick nil)")

(action_tile "accept" (strcat "(progn (setq calquechoisit (atof (get_tile \"selections\")))" "(done_dialog)(setq userclick T))"))

 

(start_dialog)

(unload_dialog dcl_id)

 

 

 

Mon problème c'est que si ma liste "listecalque" dépasse une cinquantaine d'éléments, la boite de dialogue ne me montre que les cinquantes (environ) premiers.

Y-a-t-il une limite dans le nombre d'élément que l'on peut afficher dans une liste déroulante?

Quelqu'un a-t-il une solution?

 

Merci d'avance!