itcl

0熱

2答えて

メソッドをコマンドボタンにアタッチしようとしましたが、次のエラーメッセージが表示されました。私はprocを添付すれば正常に動作します。これを行う方法？ % itcl::class a { method test {} {puts test} constructor {} { button .t.b -command test; grid config

1熱

1答えて

Itclのクラスメソッド内の自己参照

クラスのメンバメソッド内の現在のオブジェクトを参照することは可能ですか？ $childWidget SetParent $selfで$selfの等価何ができるか itcl::class widget { private variable inst method ChildCount {} { return [llength [keylkeys inst child

0熱

1答えて

tclに複数のリストのtclリストを作成するには？

私はdemoRoot demoSuite demoCaseやICなどの4つの異なる値を取得することができ、各オブジェクトを使用して$ M_OBJSとして格納された変数にオブジェクトのリストを持っているので、これらのそれぞれは、このようなリストのリストである必要があります： set data { {demoRoot1 demoSuite1 demoCase1 ic1} {demo

2熱

1答えて

Itcl：$ this変数の不一致

Tcl 8.5.9/Itcl 3.4からTcl 8.6.6/Itcl 4.0.5への私のプロジェクトの移行中に、私は$thisという変数の矛盾に直面しました。 puts "Tcl version : $tcl_patchLevel" puts "Itcl version : [package require Itcl]" itcl::class Base { public {

1熱

2答えて

itclのfalse値の真偽の構文を検証する良い方法は何ですか？

私は、真または偽の値の構文を検証し、コードのこの部分を持っている1のようなものがtrueで、0が偽と何か他の人が、その後オフエラー場合です： itcl::body boolean::validateSyntax {} \ { if {![string equal [getData] "1"] && \ ![string equal [getData] "0"] && \

0熱

1答えて

TCLのオブジェクト存在をチェック

オブジェクトがtclに存在するかどうかをチェックしたいと思います。私はinfo objectオプションを調べましたが、オブジェクトの存在に固有の何かを見つけられず、info existsはオブジェクトではなく変数に対してのみ機能します。 struct :: stackのオブジェクトを作成しました。 ::struct::stack aa (Dcode) 52 % info object class

0熱

1答えて

XMLファイルを生成するTCLスクリプトがありますか？

私はtcldomを使用してスクリプトを作っ： <testCases> <testCase> <root>SPB</root> <root>subscriberServices</root> <root>jmsServices</root> </testCase> </testCases> しかし、私は、出力は次のようになりたい：私は取得