さまざまなプロットを比較する GUI を R で作成しています。プロットを含むスクロール ウィンドウを実装しようとしています。
私が問題を抱えているのは、Rgtk2 を使用してスクロール ウィンドウのサイズを制御することです。
window = gtkWindow(show = FALSE)
hbox = gtkHBoxNew(homogeneous = FALSE, spacing = 0)
window$add(hbox)
vboxLoad = gtkVBoxNew(homogeneous = FALSE, spacing = 0)
hbox$add(vboxLoad)
scroll = gtkScrolledWindow()
vbox2 = gtkVBoxNew(homogeneous = FALSE, spacing = 0)
scroll$addWithViewport(vbox2)
vboxLoad$add(scroll)
framePlot = gtkFrameNew("Plot1")
framePlot2 = gtkFrameNew("Plot2")
vbox2$add(framePlot)
vbox2$add(framePlot2)
plot1 = gtkDrawingArea()
gtkWidgetSetSizeRequest(plot1,450,400)
asCairoDevice(plot1)
gtkWidgetShow(plot1)
framePlot$add(plot1)
plot2 = gtkDrawingArea()
gtkWidgetSetSizeRequest(plot2,450,400)
asCairoDevice(plot2)
gtkWidgetShow(plot2)
framePlot2$add(plot2)
必要なものに非常に近いものが得られますが、Rgtk2にはgtk_scrolled_window_set_min_content_widthオプションがなく、調整を使用して目的の効果を達成する方法がわかりません。
hadjustment = gtkAdjustmentNew(value = NULL, lower = NULL, upper = NULL, step.incr = NULL, page.incr = NULL, page.size = 600)
gtkScrolledWindowSetHadjustment(scroll, hadjustment)
鈍器としては機能しません。
どんな助けでも大歓迎です。