在 gWidgets 中正确获取挪威字符（在文本字符串中）答案

【问题标题】：Getting Norwegian characters ( in text strings) right in gWidgets在 gWidgets 中正确获取挪威字符（在文本字符串中）
【发布时间】：2016-04-10 08:19:33
【问题描述】：

我已经使用 gWidgets 在 R 中创建了一个 GUI。它运行良好，除非我必须使用仅在某些语言中发现的特殊字符，例如挪威语 (Å,Ø,Æ)。

在某些时候，mty 脚本会从文件 (dam.csv) 中读取值，其中一个值是具有挪威特殊字符的水库 (magasin) 的名称。即 Samsjøen

我的输入文件 dam.csv 包含以下数据

"magasin","HRV","damtop","starts","ends","QT"
"Samsjøen",486.7,488.5,1,200,"QT"

在 gbutton 中的某个地方我执行以下操作

rd<-read.csv("dam.csv")
svalue(dam)<-as.character(rd$magasin)

这是完整的 gbutton

#update dam data from a file
btn_dam <- gbutton(
  text      = "(5) Get Dam Characteristics,starts & end from file dam.csv (optional)",
  container = g2,
  handler   = function(h,...)
  {
    if(file.exists("dam.csv")){
      rd<-read.csv("dam.csv")
      svalue(dam)<-as.character(rd$magasin)
      svalue(hrv)<-as.character(rd$HRV)
      svalue(dtop)<-as.character(rd$damtop)
      svalue(Starts)<-as.character(rd$starts)
      svalue(Ends)<-as.character(rd$ends)
      svalue(qt)<-as.character(rd$QT)
    }else{
      svalue(status_bar) <-paste("File dam.csv is Missing")#**********************}
  }
  }
)

glabels/gedits 位于

g2 <- ggroup(F,container = win) #widget to conatin horizontal widgets

glabels/gedits 创建如下

#QT
txtb9 <- glabel("Label", container = g2)
qt<- gedit("QT", container = g2)
txtb4<- glabel("Reservoir Name: ", container =g2)
dam <- gedit("DamName", container = g2)
#HRV
txtb5 <- glabel("HRV: ", container = g2)
hrv <- gedit("275.00", container = g2)
#Damtop
txtb6 <- glabel("TOP: ", container = g2)
dtop <- gedit("276.50", container = g2)
#Starts
tsbx<-glabel("(6) STRART/END TIMESTEPS", container = g2,markup=TRUE)
txtb7 <- glabel("Start: ", container = g2)
Starts <- gedit("0", container = g2)
#Damtop
txtb8 <- glabel("End: ", container = g2)
Ends<- gedit("167", container = g2)

无论如何，结果是 Samsjøen 变成 SamsjÃ¸en 。如何保留从输入文件中读取的挪威字符？（请注意，我对嵌入在脚本中的 Norwegoan 字符没有类似的问题，因为它们没有被修改）

【问题讨论】：

标签： r string gwidgets

【解决方案1】：

抱歉，我无法重现此问题。我认为它与 Gtk 的设置有关。如果你直接通过RGtk使用，你能检查出同样的问题吗

library(RGtk2) b = gtkButton("Samsjøen") w = gtkWindow() w$add(b)

【讨论】：