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

zolamini

我现在找到两种方法：
5 M* H. M& }. A2 p% P5 V" o) Q( c  Q/ {1：set lDesign [$lSession GetDesignAndSchematics $lDesignPath $lStatus]    这种智能获取到design，在capture中并没有窗口打开
2：open $Designpath      不报错，但是没反应
是两个方法我都缺少一些参数限制吗？或者有其他方法？求版主指点

! _  Y5 K/ d2 V$ R6 k

zolamini

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

长天落彩霞

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

zolamini

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

set lSession $:boSession_s_pDboSession
/ _0 W* ~( g4 {, O                if { [catch {set lDesign [GetActivePMDesign] }] } {
            puts "ERROR : $::errorInfo"
3 k! q$ j* q9 @+ g. U  [) f5 I        }
        catch{
, M1 m( ?. ]: c4 B8 l         set lDesignName [DboTclHelper_sMakeCString]
& y5 [, E; u) {! ^2 c1 @         $lDesign GetName $lDesignName
, s, E% p! ]: i: H) X6 e6 O         set lFilePath [DboTclHelper_sGetConstCharPtr $lDesignName]
9 M0 K6 `4 @$ s% t% }7 V: A         return $lFilePath
         }
6 Z/ C6 c2 |* P) x" z- ~) Q

8 t5 V% P% i9 ?  L3 W+ G
写在proc里面，引用package require DboTclWriteBasic 16.3.0

8 L; ]6 Z2 k0 n5 |filepath就是全路径名字
& c& s+ b8 B7 J3 L/ ~
8 }' A6 F$ ^$ X3 G, L6 q

长天落彩霞

弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？
% w$ Z3 c; @5 ~, r

zolamini

长天落彩霞 发表于 2016-11-17 18:19
弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？

1 c5 Q& h1 ?7 o8 O( Z! [获取文件名吧，唉，我还在找save命令一直没找到。。。。。
: ?( O- U0 c3 l$ R

王开鑫55

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