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

zolamini

我现在找到两种方法：
1：set lDesign [$lSession GetDesignAndSchematics $lDesignPath $lStatus]    这种智能获取到design，在capture中并没有窗口打开
3 [" i: u" n/ V1 z$ q' Z, D1 J2：open $Designpath      不报错，但是没反应
是两个方法我都缺少一些参数限制吗？或者有其他方法？求版主指点
* O# d( H" y; ^6 _! Z" i* V: c1 E# G

zolamini

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

长天落彩霞

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

zolamini

长天落彩霞 发表于 2016-11-13 09:57
8 x$ b) n* t7 P+ ~6 T历害，我有一个问题啊，如何获取当前打开设计的名字。

/ x/ a% F$ h1 C5 {set lSession $:boSession_s_pDboSession
                if { [catch {set lDesign [GetActivePMDesign] }] } {
            puts "ERROR : $::errorInfo"
. B" P( J5 s& S/ y1 W2 y9 }        }
0 D. }5 _2 j7 N3 M        catch{
         set lDesignName [DboTclHelper_sMakeCString]
         $lDesign GetName $lDesignName
) M1 R, r6 o9 M% }         set lFilePath [DboTclHelper_sGetConstCharPtr $lDesignName]
& a1 {3 B0 U: _3 J) J         return $lFilePath
8 r. n' S0 |+ x( G         }
  }& M4 g' r" I' C& M


" D1 H; ?# R! B8 `% v7 L写在proc里面，引用package require DboTclWriteBasic 16.3.0
8 N- Y" c9 z8 i  w* d
+ M* ]9 M4 I( W, ^4 A# q, p# afilepath就是全路径名字
; y% M" N" p& z: N: O; f* F

长天落彩霞

弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？
( [- v* ~( O* B
) }% K- F6 q" [& R5 _( j6 u

zolamini

长天落彩霞 发表于 2016-11-17 18:19
% t; O1 i3 [3 V1 L弱弱的问一下，  $lDesign GetName $lDesignName  这个是什么意思？

获取文件名吧，唉，我还在找save命令一直没找到。。。。。
; y: Y) V8 N* W. x) y

王开鑫55

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

leilei4908

zolamini 发表于 2016-11-10 08:49
& _, P) ^- P2 g* \, d哈哈哈，已经解决了，用socket就可以了，tcl还是很强大啊

6 @! S$ a. T6 n0 s% R2 r7 H求解，是怎么用socket解决的
& _3 B2 w' D; i, b. P