R 버튼이 크기가 조정되지 않습니다

Question

이것은 아마도 간단한 대답 일지 모르지만 나는 무엇을 시도해야할지 모르겠습니다. 문제를 동봉 했으므로 코드의 일부만 제공합니다. tkltk

이 버튼은 마우스로 모서리를 드래그하여 창을 크게 만들 때 모든 수평 공간을 차지한다고 가정합니다. 수직 크기는 동일하게 유지되어야합니다.

하나의 버튼 (아래 코드)에서는 작동하지만 버튼은 사용할 수 없습니다.

내가 내 자신의 질문에 대한 해결책을 발견 사전

require(tcltk) 

botos1 <- function(panel){panel} 
panel01<- tktoplevel(bg="darkcyan") 
row1 = tkframe(panel01,width = 500, height = 70, bg = "yellow",borderwidth = 3) 

tkgrid(row1) 
tkgrid.configure(row1,sticky="ew") 
tkgrid.columnconfigure(panel01,0,weight=1) 
tkgrid.rowconfigure(panel01,0,weight=1) 
tkgrid.rowconfigure(row1,0,weight=1) 
tkgrid.columnconfigure(row1,0,weight=1) 
tkgrid.configure(row1,sticky='nwe') 


bot1<- tkbutton(row1,text="Time series",width = 35,command=botos1) 

tkgrid(bot1) 
tkgrid.configure(bot1,sticky="ew") 

Answer 1

에 감사드립니다. 여기있어. 프레임 안에 프레임을 만들었습니다. 내부 프레임은 tkpack을 통해 처리되므로 버튼 크기를 쉽게 조절할 수 있습니다. 그러나 외부 프레임은 tkgrid를 통해 처리되므로 메인 패널 내에서 고정 된 위치를 지정할 수 있습니다.

require(tcltk) 

botos1 <- function(panel){panel} 
panel01<- tktoplevel(bg="darkcyan") 

row1 = tkframe(panel01,width = 500, height = 70, bg = "yellow",borderwidth = 3) 

tkgrid(row1,row=0) 
tkgrid.configure(row1,sticky="new") 
tkgrid.columnconfigure(panel01,0,weight=1) 

row11 = tkframe(row1,width = 450, height = 50, bg = "cyan",borderwidth = 3) 

bot1<- tkbutton(row11,text="Time series1",width = 35,command=botos1) 
bot2 <- tkbutton(row11,text="Time series2",width = 35,command=botos1) 
bot3 <- tkbutton(row11,text="Time series3",width = 35,command=botos1) 

tkpack(bot1,side="left",expand=TRUE,fill="both") 
tkpack(bot2,side="left",expand=TRUE,fill="both") 
tkpack(bot3,side="left",expand=TRUE,fill="both") 

tkpack(row11,anchor="nw",fill="both")