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

zolamini

我现在找到两种方法：
1：set lDesign [$lSession GetDesignAndSchematics $lDesignPath $lStatus]    这种智能获取到design，在capture中并没有窗口打开
2：open $Designpath      不报错，但是没反应
7 x& a, T2 {& o  w1 H是两个方法我都缺少一些参数限制吗？或者有其他方法？求版主指点

; E2 K) F( `9 l; x% a

王开鑫55

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

zolamini

长天落彩霞 发表于 2016-11-17 18:19
+ @% @) @5 [$ k8 S% L弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？

获取文件名吧，唉，我还在找save命令一直没找到。。。。。

长天落彩霞

弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？

" Q0 _  M9 |4 l. f% ?( D+ D# \  ^

zolamini

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

set lSession $:boSession_s_pDboSession
2 a% B' m0 u8 ~                if { [catch {set lDesign [GetActivePMDesign] }] } {
/ S1 Z  F* q$ s( L            puts "ERROR : $::errorInfo"
        }
: i- F) ^8 t/ r        catch{
$ Q, t; c2 c. R         set lDesignName [DboTclHelper_sMakeCString]
- ]$ L1 i& k, ]3 H7 \) m         $lDesign GetName $lDesignName
         set lFilePath [DboTclHelper_sGetConstCharPtr $lDesignName]
7 P: `. W' c% a1 S         return $lFilePath
         }

5 h* {. L* d& t2 z# u8 n( _- s

写在proc里面，引用package require DboTclWriteBasic 16.3.0

7 |4 M: ?1 j/ D; i8 [% ]( `, rfilepath就是全路径名字
- w0 u$ F4 B1 \$ q2 T$ e! F. }
1 _& H! a, e2 y1 V5 c" u

长天落彩霞

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

zolamini

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