From e0830305a2c36bbc56f4a2dc0d009729592a438a Mon Sep 17 00:00:00 2001 From: Matthias Melcher Date: Thu, 5 Jan 2023 23:16:54 +0100 Subject: Add Fl_Tabs dragging in pulldown mode --- test/tabs.fl | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) (limited to 'test') diff --git a/test/tabs.fl b/test/tabs.fl index 814ffd82d..d13073507 100644 --- a/test/tabs.fl +++ b/test/tabs.fl @@ -14,12 +14,13 @@ Function {} {open } Fl_Tabs tabs_group {open tooltip {the various index cards test different aspects of the Fl_Tabs widget} xywh {10 35 315 260} selection_color 4 labelcolor 7 resizable + code0 {//o->handle_overflow(Fl_Tabs::OVERFLOW_PULLDOWN);} } { Fl_Group {} { label {Label&1} callback {if (Fl::callback_reason()==FL_REASON_CLOSED) o->parent()->remove(o);} selected - tooltip {this tab tests correct keyboard navigation between text input fields} xywh {10 60 315 235} selection_color 1 when 16 hide resizable + tooltip {this tab tests correct keyboard navigation between text input fields} xywh {10 60 315 235} selection_color 1 when 16 resizable } { Fl_Input {} { label {input:} @@ -38,7 +39,7 @@ Function {} {open Fl_Group {} { label {tab&2} callback {if (Fl::callback_reason()==FL_REASON_CLOSED) - o->parent()->remove(o);} selected + o->parent()->remove(o);} tooltip {tab2 tests among other things the cooperation of modal windows and tabs} xywh {10 60 315 235} selection_color 2 when 16 hide } { Fl_Button {} { @@ -66,7 +67,7 @@ Function {} {open Fl_Group {} { label {tab&3} callback {if (Fl::callback_reason()==FL_REASON_CLOSED) - o->parent()->remove(o);} selected + o->parent()->remove(o);} tooltip {tab3 checks for correct keyboard navigation} xywh {10 60 315 235} selection_color 3 when 16 hide } { Fl_Button {} { @@ -85,7 +86,7 @@ Function {} {open Fl_Group {} { label {&tab4} callback {if (Fl::callback_reason()==FL_REASON_CLOSED) - o->parent()->remove(o);} selected + o->parent()->remove(o);} tooltip {this tab shows the issue of indicating a selected tab if the tab layouts are very similar} xywh {10 60 315 235} selection_color 5 labeltype ENGRAVED_LABEL labelfont 2 when 16 hide } { Fl_Button {} { @@ -102,8 +103,8 @@ Function {} {open } } Fl_Group {} { - label {@fileprint &print} selected - tooltip {tab5 verifies if visibility requests are handled correctly} xywh {10 60 315 235} + label {@fileprint &print} + tooltip {tab5 verifies if visibility requests are handled correctly} xywh {10 60 315 235} hide } { Fl_Button {} { label button2 -- cgit v1.2.3