13
0

Add scrollbar to LuaDialog

This commit is contained in:
Robin Gareus 2018-08-02 15:17:38 +02:00
parent 5006c731c7
commit 77d1982d1d
2 changed files with 21 additions and 1 deletions

View File

@ -710,7 +710,14 @@ Dialog::Dialog (std::string const& title, luabridge::LuaRef lr)
Gtk::Table* table = Gtk::manage (new Gtk::Table ());
table->set_col_spacings (20);
table->set_row_spacings (8);
_ad.get_vbox ()->pack_start (*table);
table->signal_size_allocate ().connect (sigc::mem_fun (this, &Dialog::table_size_alloc));
_scroller.set_shadow_type(Gtk::SHADOW_NONE);
_scroller.set_border_width(0);
_scroller.add (*table);
_scroller.set_policy (Gtk::POLICY_NEVER, Gtk::POLICY_NEVER);
_ad.get_vbox ()->pack_start (_scroller);
int row = 0;
int last_end = -1;
@ -771,3 +778,13 @@ Dialog::run (lua_State *L)
luabridge::push (L, rv);
return 1;
}
void
Dialog::table_size_alloc (Gtk::Allocation& allocation)
{
/* XXX: consider using 0.75 * screen-height instead of 512 */
if (allocation.get_height () > 512) {
_scroller.set_policy (Gtk::POLICY_NEVER, Gtk::POLICY_AUTOMATIC);
_ad.set_size_request (-1, 512);
}
}

View File

@ -89,7 +89,10 @@ public:
private:
Dialog (Dialog const&); // prevent copy construction
void table_size_alloc (Gtk::Allocation&);
ArdourDialog _ad;
Gtk::ScrolledWindow _scroller;
typedef std::vector<LuaDialogWidget*> DialogWidgets;
DialogWidgets _widgets;
std::string _title;