try 
   DevNull = {New Tk.toplevel tkInit}
in
   {DevNull tkClose}
   {DevNull tk(blabla)}
catch 
   system(...) 
then
   {Show conditionCaught}
end