大家好,
我有一个简单的代码,通过从弹出列表中选择来创建块,并在插入之前以相同的方式设置其比例。然后程序返回到它的主页以进行另一个选择。问题是选择总是返回到列表的顶部,而不是记住最后一个选择。我尝试过单选按钮、切换和编辑框,并在这些方面取得了成功,但从来没有想过如何使用弹出列表。我将感谢任何人能提供的任何帮助。
提前感谢,希望有人能对此有所帮助。
秃鹰
DCL代码
- ///////////////////////////////////////////////////////////////////////////////////////
- sl : dialog {
- label = "Symbols Library";
- : boxed_column {
- label = "Symbol Image";
- : image {
- key = "im1";
- height = 7.66;
- fixed_height = true;
- width = 27.92;
- fixed_width = true;
- alignment = centered;
- color = 0;
- }
- : spacer {
- height = 0;
- }
- }
- : boxed_column {
- label = "Symbols List";
- : popup_list {
- key = "pl1";
- value = 0;
- }
- : spacer {
- height = 0;
- }
- }
- : boxed_column {
- label = "Drawing Scale";
- : popup_list {
- key = "ds1";
- value = 13;
- }
- : spacer {
- height = 0;
- }
- }
- : boxed_column {
- label = "Control Buttons";
- : button {
- label = "Insert";
- key = "accept";
- mnemonic = "I";
- is_default = true;
- }
- : button {
- label = "Cancel";
- key = "cancel";
- mnemonic = "C";
- is_cancel = true;
- }
- : spacer {
- height = 0;
- }
- }
- }
- ///////////////////////////////////////////////////////////////////////////////////////
LSP代码
|