小编Don*_*ows的帖子

我正在浏览一个switch条件语句的代码

char c1=65;
switch(c1){
  case 'A':
    System.out.println("one");
  default:
    System.out.println("two");
  case 'b':
    System.out.println("three");
}

虽然结果是"一二三",但在调试时我发现它首先进入案例A,这是A的ASCII值65,但是它也会执行所有剩余的案例,但是如果我放弃了; 然后它出来了,所以这意味着如果我们不放弃它将继续执行所有情况请告知.

我必须运行一个脚本,我必须提供一些密码作为参数.密码包含特殊字符.

假设我正在调用脚本test.tcl system$123.

试图访问arg时

set name [lindex $argv 0]

这些特殊字符将被忽略.

请帮帮我.

谢谢,Ramya.

全部,我想做的事:Proc A调用Proc B,使用B的uplevel命令我试图在proc A范围中设置变量.值具有空格时发生错误.

proc B { } {
    set string1 "Test"
    set string2 "Test with space"
    uplevel 1 set key1 $string1
    uplevel 1 set key2 $string2
    return 0
}

proc A { } {
    set res [B]
    puts "key1 is $key1"
    puts "key2 is $key2"
}

如果我注释掉key2,它工作正常.添加key2时,它会失败,并显示以下错误.

wrong # args: should be "set varName ?newValue?"
    while executing
"set key2 Test with space"

有关如何克服此错误的任何建议.感谢您的帮助.

在我的Tcl / Tk脚本中，有一个步骤删除一些txt文件。我用：

exec rm file1.txt

但是，如果文件不存在，则会出现错误消息，这将阻止脚本使用。我要做的是删除该文件（如果存在），如果不存在，则跳过该错误。有这样做的好方法吗？

好的，我找到了答案：file exists filename在这种情况下效果很好。

我希望tk代码删除以下小部件.它毁灭了吗？

Entry .scW.sf.frame.entry -background "#ffffff"
Button .scW.sf.frame.Button -command "open"

grid .scW.sf.frame.entry -in .scW.sf.frame -row 17 -column 2 -sticky ""
grid .scW.sf.frame.Button -in .scW.sf.frame -row 17 -column 3 -sticky "w"

代码如下.单独运行,顶部不会以任何方式编译,但底部段编译正常.

proc printbobs  {times {textd "cream corn"}} {
    for {set r 0} {$r<$times} {incr r}{
        puts $textd
    }
    return $times
}
printbobs 2 

proc printText {times2 {textp "hello word"}} {
    for {set i 0} {$i<$times2} {incr i} {
        puts $textp
    }
    return $times2
}
printText 2

我已经搜索过lappend $var1 $var2,但没有找到任何确切的答案,它将如何执行.

% set a {a b c}
a b c
% set b {d e}
d e
% puts [lappend $c $b]
can't read "c": no such variable     >>> here it throws error like variable not exist
% puts [lappend $a $b]
{d e}                      >>> here it doesn't throw any error, can someone explain it and how to print the value of $a, if $a is a new variable
% puts $$A
can't read "A": no …

希望一切都好。

我是 TCL 编程语言的新手，开始从事一个项目。

我想根据下表在这里创建一个哈希 -

我想创建一个名为MEM_GROUP 的散列，并想要访问值DDR1、DDR2等。假设我想打印属于Person3所有权的DDR3那么如何访问它？ 请帮我。