Raw Message

Message-ID: <b0f0ada60809171331u77d5466fy10552e3cdf36c719@mail.gmail.com>
Date: 2008-09-17T20:31:15Z
From: Gang Chen
Subject: trouble with tkgetOpenFile

I'm trying to use the following loop to open a window multiple times
to select files, but only the last window shows up. What am I missing?

library(tcltk)
nWin <- 6
fn <- vector('list', nWin)
for (ii in nWin) {
   fn[[ii]] <- tclvalue( tkgetOpenFile( filetypes =
       "{{Files} {.1D}} {{All files} *}",
       title = paste('Choose number', ii, 'time series file')))
}

TIA,
Gang