Question

我有一个闪亮的应用程序，带有一个动作按钮来更新数据。单击按钮后，我使用以下代码选择并读取csv文件。

updatebi <- function(x){

    y <- function(...) {
        pathname <- NULL;
        tryCatch({
            pathname <- read.csv(file.choose(), header = TRUE, stringsAsFactors = FALSE);

'dosomething'

df <- x 
mydb <- dbConnect(MySQL(), user = "root", password = "abba1221", dbname = "dbdb", host = "localhost")
dbWriteTable(mydb, name = "byname", value = df, overwrite = FALSE, append = FALSE, row.names = FALSE)
.rs.restartR()
}, error = function(ex) {
})
pathname;
    }
x <- y()
}

我尝试在Windows和OS X中使用此代码。文件选择对话框打开但始终隐藏在已打开的其他窗口后面。

如何使用file.choose（），以便文件选择对话框始终显示在前面。

Answer 1

我一直在寻找解决同一问题的方法。我尝试了这个：

std::vector

我试了一下，然后运行jchoose.files（）20或30次，每次都取消或选择一个文件，选择器始终弹出。它一次都没有被隐藏。仍然不确定100％，但看起来很有希望。

我也尝试了以下解决方案，但是文件选择器有时没有弹出。

library(rJava)
library(rChoiceDialogs)
jchoose.files()

在.r中的file.choose打开对话框后面弹出而不弹出

1 个答案: