yjrun 发表于 2004-7-27 14:46:00

我更新了一下,不用if控制了,改用while来控制.

meflying 发表于 2004-7-27 15:28:00

至于(Odcl_Form_Center "zhongxian" "DclForm1")这句其实并没有执行，因为你执行到show的时候，主程序就停止了，知道你使用close后，而使用close后再使用center，效果你当然就看不到了。。。


你可以使用vlisp编辑器跟踪一下程序的执行顺序

yjrun 发表于 2004-7-27 18:08:00

我试了一下,我把


                                        ;显示DclForm1对话框<BR>       (Odcl_Form_Center "zhongxian" "DclForm1")<BR>       (setq bFlag t)                        ; 设置一个变量来控制重新显示对话框,bFlag为控制变量<BR>       (while bFlag<BR>                       (setq bFlag nil)                        ; 在选取中线程序没有执行前,将bFlag设为nil<BR>                       (Odcl_Form_Show "zhongxian" "DclForm1") ; 显示对话框<BR>       )


把center放到前面了,效果也没有变,每次打开都是上次关闭对话框的位置
页: 1 [2]
查看完整版本: 问一个objectdcl的问题?