求助版主：通过tcl脚本打开dsn文件怎么写？

zolamini

我现在找到两种方法：
0 S! S9 o) n1 r) u1：set lDesign [$lSession GetDesignAndSchematics $lDesignPath $lStatus]    这种智能获取到design，在capture中并没有窗口打开
. W$ [2 Y+ i& _! [) l# K3 v- S2：open $Designpath      不报错，但是没反应
是两个方法我都缺少一些参数限制吗？或者有其他方法？求版主指点

zolamini

哈哈哈，已经解决了，用socket就可以了，tcl还是很强大啊

长天落彩霞

历害，我有一个问题啊，如何获取当前打开设计的名字。

zolamini

长天落彩霞 发表于 2016-11-13 09:57
历害，我有一个问题啊，如何获取当前打开设计的名字。

4 g# X% M. z" o  ~7 ~+ V0 q" K; Eset lSession $:boSession_s_pDboSession
                if { [catch {set lDesign [GetActivePMDesign] }] } {
            puts "ERROR : $::errorInfo"
        }
$ T$ H8 g3 T& _$ O+ }. ?        catch{
         set lDesignName [DboTclHelper_sMakeCString]
         $lDesign GetName $lDesignName
         set lFilePath [DboTclHelper_sGetConstCharPtr $lDesignName]
0 Z' n: l) J6 W( U- E* @8 n         return $lFilePath
# ?# F. }* F! g, H         }

/ h/ O7 z8 K  \/ _/ ]4 o) H8 w" v2 J8 T

! p  D5 J& i. D7 Z$ C. m写在proc里面，引用package require DboTclWriteBasic 16.3.0

) l9 s3 ?* T- y# ?. b/ @1 _/ ~- wfilepath就是全路径名字

长天落彩霞

弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？
0 O1 P$ r+ n* @+ Q3 g8 ]

zolamini

长天落彩霞 发表于 2016-11-17 18:19
4 q& E6 |9 b) V9 P弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？

( ]- D. m& a9 P5 }获取文件名吧，唉，我还在找save命令一直没找到。。。。。

王开鑫55

我想知道这是什么语言，和skill一样可以自己设计原理图的功能？

leilei4908

zolamini 发表于 2016-11-10 08:49
哈哈哈，已经解决了，用socket就可以了，tcl还是很强大啊

$ q. v* m7 ^$ S" I& E% y& l0 N求解，是怎么用socket解决的
$ u$ A. Y' r9 c9 b0 c. z/ G% s