EPICS Controls Argonne National Laboratory

Experimental Physics and
Industrial Control System

1994  1995  1996  1997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  <20092010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024  Index 1994  1995  1996  1997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  <20092010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024 
<== Date ==> <== Thread ==>

Subject: Re: Re: a small tcl/tk script question
From: "Silver" <[email protected]>
To: "Matthieu Bec" <[email protected]>
Cc: tech-talk <[email protected]>
Date: Fri, 26 Jun 2009 11:10:50 +0800
hi, Matthieu:

  I have tried it before, but failed. I tried again with exec "something" &, it works. a small tricks wasting my whole morning time. thanks a lot for your help.

======= At 2009-06-26, 10:44:22 you wrote: =======

>
>exec "something &"
>
>
>
>On 06/25/09 22:41, Silver wrote:
>> hi,
>> 
>>    I wrote a small tcl/tk script to implement a launcher. I want the user can start the multiple edm GUI by clicking the different item. While the problem is the second edm only can be opened after the first one is closed.
>>    Seems tcl/tk can't support fork/spawn command, how can I do it? thanks a lot in advance
>> 
>> following is the code:
>> 
>> #!/usr/bin/wish -f
>> 
>> package require tile
>> ttk::setTheme classic
>> ttk::treeview .tree
>> pack .tree -expand 1 -fill both
>> 
>> .tree insert {} end -id entry_ps -text "PowerSupply"
>> .tree insert {} end -id entry_timing -text "Timing"
>> .tree insert {} end -id entry_vacuum -text "Vacuum"
>> 
>> .tree insert entry_ps end -id ps1 -text "powersupply1" -tags "powersupply1"
>> .tree tag bind powersupply1<1>  powersupply1;
>> proc powersupply1 {} {
>>      puts "test1"
>>      execl "1.sh"
>> }
>> 
>> .tree insert entry_ps end -id ps2 -text "powersupply2" -tags "powersupply2"
>> .tree tag bind powersupply2<1>  powersupply2;
>> proc powersupply2 {} {
>>      puts "test2"
>>      execl "2.sh"
>> }
>> 
>> .tree configure -columns "comment"
>> .tree column comment -width 360 -anchor center
>> .tree heading comment -text "description"
>> .tree set ps1 comment "psxxxxx"
>> .tree set ps2 comment "psyyyyy"
>> 
>> 
>> Best regards
>> Geyang  2009-06-26
>> 
>> 
>
>
>-- 
>Matthieu Bec              Gemini Observatory
>Tel: +56 51 205785        c/o AURA, Casilla 603
>Fax: +56 51 205650        La Serena, Chile

= = = = = = = = = = = = = = = = = = = =
			

Best regards				 
Geyang 2009-06-26




Replies:
Re: a small tcl/tk script question Matthieu Bec
References:
a small tcl/tk script question Silver
Re: a small tcl/tk script question Matthieu Bec

Navigate by Date:
Prev: Re: a small tcl/tk script question Matthieu Bec
Next: Re: a small tcl/tk script question Matthieu Bec
Index: 1994  1995  1996  1997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  <20092010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024 
Navigate by Thread:
Prev: Re: a small tcl/tk script question Matthieu Bec
Next: Re: a small tcl/tk script question Matthieu Bec
Index: 1994  1995  1996  1997  1998  1999  2000  2001  2002  2003  2004  2005  2006  2007  2008  <20092010  2011  2012  2013  2014  2015  2016  2017  2018  2019  2020  2021  2022  2023  2024 
ANJ, 31 Jan 2014 Valid HTML 4.01! · Home · News · About · Base · Modules · Extensions · Distributions · Download ·
· Search · EPICS V4 · IRMIS · Talk · Bugs · Documents · Links · Licensing ·