Как сделать GtkLabel прокручиваемым в GtkScrolledWindow

Question

Я разрабатываю GUI GUI внутри R, используя RGtk2. Часть GUI - это отображение последовательности белка (переменной длины). Белковая последовательность помещается в GtkLabel с включенной линеаризацией, а режим линии линии устанавливается на PANGO_WRAP_CHAR. GtkLabel, в свою очередь, помещается в GtkScrolledWindow. К сожалению, это не работает, поскольку GtkLabel не может запросить правильные размеры. Поэтому возникает вопрос: есть ли способ сделать прокручиваемый GtkLabel или есть другой виджет, который я должен использовать?

Пример кода:

window <- gtkWindow(show=FALSE) 
scroll <- gtkScrolledWindow() 
window$add(scroll) 
label <- gtkLabel() 
label$setLineWrap(TRUE) 
label$setLineWrapMode('PANGO_WRAP_CHAR') 
scroll$add(label) 

label$setText('THIS IS JUST AN EXAMPLE: ABCDEFGHIJKLMNOPQRSTUVXYZ') 
window$show() 

обратите внимание, что окно, возможно, придется изменить размер для этой проблемы, чтобы показать ...

Лучший Томас

Answer 1

Как GtkLabel не по своей сути «прокручивать ", вы должны добавить его в GtkScrolledWindow с видовым экраном. Функция gtk_scrolled_window_add_with_viewport используется в C для этого, но я не знаю, что такое эквивалент в R. scroll$addWithViewport(label)?

gtk_scrolled_window_add_with_viewport documentation