inline wk_widget concrete (widget w) { return wk_widget ((wk_widget_rep*) w.rep); }
file_chooser_widget_rep::file_chooser_widget_rep ( command cmd2, string type2): attribute_widget_rep (1), cmd (cmd2), type (type2) { ref_count++; tree t= stree_to_tree (call ("format-get-suffixes*", type)); int i, n= N(t); for (i=0; i<n; i++) suffix << ("." * as_string (t[i])); if (n == 0) suffix << string (""); SI sep= 3*PIXEL; int cw2n= 5; if (type == "directory") cw2n= 3; array<wk_widget> cw2 (cw2n); array<string> cn2 (cw2n); cw2[0]= glue_wk_widget (false, true, sep); cw2[1]= canvas_widget (wk_widget (tm_new<file_list_widget_rep> (this, suffix, true))); cn2[1]= "directories"; cw2[2]= glue_wk_widget (false, true, sep); if (type != "directory") { cw2[3]= canvas_widget (wk_widget (tm_new<file_list_widget_rep> (this, suffix, false))); cn2[3]= "files"; cw2[4]= glue_wk_widget (false, true, sep-PIXEL); } #ifdef OS_WIN32 wk_widget drive_menu = vertical_menu (array<wk_widget> ()); unsigned int driveMask = XGetDrivesMask(); char driveString[4] = "A:\\"; for (char x = 'A'; x <= 'Z'; x++) if(driveMask & (1 << (x - 'A'))) { driveString[0] = x; drive_menu << emit_insert (driveString, command_button (text_wk_widget (driveString), tm_new<drive_menu_command_rep> (this, driveString))); } array<wk_widget> drw (2); drw[0] = pullright_button (text_wk_widget (translate ("Drive")), drive_menu); drw[1] = text_wk_widget (""); // drw[1]= glue_wk_widget (false, true, sep); #endif int BUTTON_OK= BUTTON_FILE_OK; if (type == "directory") BUTTON_OK= BUTTON_DIR_OK; #ifdef OS_WIN32 array<wk_widget> cw3 (11); cw3[0]= glue_wk_widget (false, false, sep); cw3[1]= pulldown_button (text_wk_widget (translate ("Drive")), drive_menu, true); cw3[2]= glue_wk_widget (false, false, sep); cw3[3]= button_widget ("Home", BUTTON_HOME); cw3[4]= glue_wk_widget (false, false, sep); cw3[5]= button_widget ("Texts", BUTTON_TEXTS); cw3[6]= glue_wk_widget (true, false); cw3[7]= button_widget ("Ok", BUTTON_OK); cw3[8]= glue_wk_widget (false, false, sep); cw3[9]= button_widget ("Cancel", BUTTON_CANCEL); cw3[10]= glue_wk_widget (false, false, sep); #else array<wk_widget> cw3 (9); cw3[0]= glue_wk_widget (false, false, sep); cw3[1]= button_widget ("Home", BUTTON_HOME); cw3[2]= glue_wk_widget (false, false, sep); cw3[3]= button_widget ("Texts", BUTTON_TEXTS); cw3[4]= glue_wk_widget (true, false); cw3[5]= button_widget ("Ok", BUTTON_OK); cw3[6]= glue_wk_widget (false, false, sep); cw3[7]= button_widget ("Cancel", BUTTON_CANCEL); #ifdef OS_MACOS cw3[8]= glue_wk_widget (false, false, sep + 14*PIXEL); #else cw3[8]= glue_wk_widget (false, false, sep); #endif #endif int cwn= 11; if (type == "image") cwn= 16; if (type == "directory") cwn= 7; array<wk_widget> cw (cwn); array<string> cn (cwn); cw[0]= glue_wk_widget (true, false, 0, sep); cw[1]= input_widget ("Directory:", "Directory:", CHANGE_DIR); cn[1]= "directory"; cw[2]= glue_wk_widget (true, false, 0, sep); if (type == "directory") { cw[3]= horizontal_list (cw2, cn2); cn[3]= "list"; } if (type != "directory") { cw[3]= input_widget ("File:", "Directory:", CHANGE_FILE); cn[3]= "file"; cw[4]= glue_wk_widget (true, false, 0, sep); cw[5]= input_widget ("Suffixes:", "Directory:", CHANGE_SUFFIXES); cn[5]= "suffixes"; cw[6]= glue_wk_widget (true, false, 0, sep); cw[7]= horizontal_list (cw2, cn2); cn[7]= "list"; } if (type == "image") { array<wk_widget> imw (7); array<string> ims (7); imw[ 0]= input_widget ("width:", "y-position:", IMAGE_HSIZE); ims[ 0]= "hsize"; imw[ 1]= glue_wk_widget (true, false, 0, sep); imw[ 2]= input_widget ("height:", "y-position:", IMAGE_VSIZE); ims[ 2]= "vsize"; imw[ 3]= glue_wk_widget (true, false, 0, sep); imw[ 4]= input_widget ("x-position:", "y-position:", IMAGE_XPOS); ims[ 4]= "xpos"; imw[ 5]= glue_wk_widget (true, false, 0, sep); imw[ 6]= input_widget ("y-position:", "y-position:", IMAGE_YPOS); ims[ 6]= "ypos"; array<wk_widget> cw4 (5); array<string> cn4 (5); cw4[0] = glue_wk_widget (false, false, sep); cw4[1] = vertical_list (imw, ims); cn4[1] = "parameters"; cw4[2] = glue_wk_widget (false, false, sep); cw4[3] = tm_new<image_widget_rep> (); cn4[3] = "image"; cw4[4] = glue_wk_widget (false, false, sep); //cw[ 8] = glue_wk_widget (true, false, 0, sep); //cw[ 9] = separator_wk_widget (); cw[ 8] = glue_wk_widget (true, false, 0, sep); cw[ 9] = horizontal_list (cw4, cn4); cn[ 9] = "image"; cw[10] = glue_wk_widget (true, false, 0, sep); cw[11] = separator_wk_widget (); cw[12] = glue_wk_widget (true, false, 0, sep); } cw[cwn-3]= glue_wk_widget (true, false, 0, sep); cw[cwn-2]= horizontal_list (cw3); cn[cwn-2]= "buttons"; cw[cwn-1]= glue_wk_widget (true, false, 0, sep); a[0]= vertical_list (cw, cn); if (type != "directory") { string s; for (i=0; i<N(suffix); ++i) { if (i) s << " "; s << suffix[i]; } a[0]["suffixes"]["input"] << set_string ("input", s); } ref_count--; }