关于startapp打开应用程序问题

Kevin_98116 · 发表于 2014-2-5 23:25:14

各位大侠晚上好：
在下遇到这样一个问题，用startapp 打开新建打印样式styshwiz.exe文件后如何读取该styshwiz.exe 程序的运行状况，即新建的打印样式是否完成，若完成就执行刷新打印样式列表程序。还望各位不吝赐教，谢谢！
(defun NewPlotStyle ()
(startapp "EXPLORER.EXE" (findfile "styshwiz.exe"))
)

ZZXXQQ · 发表于 2014-2-6 08:45:15

如果应用程序没有返回值，就要在运行应用程序前保存当前图层信息，运行应用程序后再度获取图层信息，进行比较。

Kevin_98116 · 发表于 2014-2-6 10:17:57

ZZXXQQ 发表于 2014-2-6 08:45
如果应用程序没有返回值，就要在运行应用程序前保存当前图层信息，运行应用程序后再度获取图层信息，进行比 ...

这倒是一个好方法，

谢谢！不知道还有没有别的方法呢？

Kevin_98116 · 发表于 2014-2-6 12:04:27

ZZXXQQ 发表于 2014-2-6 08:45
如果应用程序没有返回值，就要在运行应用程序前保存当前图层信息，运行应用程序后再度获取图层信息，进行比 ...

试了下，这样比较会出现个新的问题，如果打印样式新建没完成直接关闭会导致程序进入死循环。
(defun NewPlotStyle ()
  (setq PlotStyles_list (list (GetPlotStylesList)))
  (startapp "EXPLORER.EXE" (findfile "styshwiz.exe"))
  (GetPrintersList)
  (setq Compare (list (GetPlotStylesList)))
  (while (equal PlotStyles_list Compare)
(GetPrintersList)
(setq Compare (list (GetPlotStylesList)))
  )
  (LoadPlotStylesList)
)

ZZXXQQ · 发表于 2014-2-7 08:37:35

偶已经看不懂了

ZZXXQQ · 发表于 2014-2-7 08:37:51

偶已经看不懂了

Kevin_98116 · 发表于 2014-2-8 08:34:41

呵呵，只能另外增加个刷新按钮解决了。

pengfei2010 · 发表于 2017-11-5 10:57:05

回帖是一种美德！感谢楼主的无私分享谢谢

账号		自动登录	找回密码
密码			注册

[提问] 关于startapp打开应用程序问题