diff --git a/web/CXM_jquery_button.anubis b/web/CXM_jquery_button.anubis deleted file mode 100644 index e77adcc..0000000 --- a/web/CXM_jquery_button.anubis +++ /dev/null @@ -1,265 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 07/09/2012 - * Time: 15:10 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read calexium_lib/web/CXM_jquery.anubis -read calexium_lib/web/CXM_jquery_icons.anubis -read tools/basis.anubis -read system/string.anubis - - -public type JQuery_button: - jQuery_button( - String button_id, String button_name, String button_label, JQuery_Actioner actioner, JQuery_icon primary, JQuery_icon secondary // primary icon is for left icon, secondary icon is for right icon and button_id must set with an unique ID in order to have icons working - ) -. - -define String - jquery_button_get_onclick_action_window_options - ( - List(Other_Window_Option) options, - String formated_options - ) - = - if options is - { - [ ] then formated_options, - [ h . t ] then - if h is - { - resizable then - if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule - jquery_button_get_onclick_action_window_options( - t, - formated_options+"resizable='yes'" - ) - else - jquery_button_get_onclick_action_window_options( - t, - formated_options+", resizable='yes'" - ), - scrollbars then - if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule - jquery_button_get_onclick_action_window_options( - t, - formated_options+"scrollbars='yes'" - ) - else - jquery_button_get_onclick_action_window_options( - t, - formated_options+", scrollbars='yes'" - ), - width(w) then - if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule - jquery_button_get_onclick_action_window_options( - t, - formated_options+"width="+w - ) - else - jquery_button_get_onclick_action_window_options( - t, - formated_options+", width="+w - ), - height(h) then - if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule - jquery_button_get_onclick_action_window_options( - t, - formated_options+"height="+h - ) - else - jquery_button_get_onclick_action_window_options( - t, - formated_options+", height="+h - ) - } - } - . - -define HTML_Head_Tag - jquery_button_get_onclick_action - ( - String button_id, - JQuery_Actioner actioner - ) - = - if actioner is jQuery_actioner(target, act_type, str) then - if target is - { - same then - if act_type is - { - jqform then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){$('#"+str+"').submit();});});")), - jqlink then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){document.location='"+str+"';});});")), - }, - same(label) then - if act_type is - { - jqform then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){$('#"+str+"').submit();});});")), - jqlink then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){document.location='"+str+"';});});")), - }, - other(window_name, window_options) then - if act_type is - { - jqform then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){$('#"+str+"').submit();});});")), //il s'agit d'une soumision d'un formulaire => cela se fait uniquement dans la même fenêtre ! - jqlink then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){window.open('"+str+"', '"+window_name+"', '"+jquery_button_get_onclick_action_window_options(window_options, "")+"');});});")), - } - } - . - -define HTML_Partial_Content - _jquery_buttons - ( - List(JQuery_button) buttons, - List(HTML_Head_Tag) html_tags, - List(HTML_Off_Form) html_buttons - ) - = - if buttons is - { - [ ] then - partial_content( - reverse(html_tags), - sequence(reverse(html_buttons)) - ), - [ h . t ] then - if h is jQuery_button(id, name, label, actioner, primary, secondary) then - with onclick_action=jquery_button_get_onclick_action(id, actioner), - if id = "" then // if the ID is not set => we can't use icons in the buttonset. - _jquery_buttons( - t, - [ onclick_action . html_tags ], - [ - literal("") - . - html_buttons - ] - ) - else - if jquery_icon_to_string(primary) = "" then - if jquery_icon_to_string(secondary) = "" then - _jquery_buttons( - t, - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button();});")), - onclick_action - ] - +html_tags, - [ - literal("") - . - html_buttons - ] - ) - else - _jquery_buttons( - t, - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), - onclick_action - ] - +html_tags, - [ - literal("") - . - html_buttons - ] - ) - else - if jquery_icon_to_string(secondary) = "" then - _jquery_buttons( - t, - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"'}});});")), - onclick_action - ] - +html_tags, - [ - literal("") - . - html_buttons - ] - ) - else - _jquery_buttons( - t, - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"',secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), - onclick_action - ] - +html_tags, - [ - literal("") - . - html_buttons - ] - ) - } - . - -public define HTML_Partial_Content - jquery_buttons - ( - String buttons_container_id, - List(JQuery_button) buttons - ) - = - if _jquery_buttons(buttons, [], []) is partial_content(tags, html) then - partial_content( - [ js_inline(script("", "$(document).ready(function(){$('#"+buttons_container_id+"').buttonset();});")) ] + tags, - sequence([ - literal("
"), - html, - literal("
") - ]) - ) - . - -public define HTML_Partial_Content - jquery_button - ( - JQuery_button button - ) - = - if button is jQuery_button(id, name, label, actioner, primary, secondary) then - with onclick_action=jquery_button_get_onclick_action(id, actioner), - if jquery_icon_to_string(primary) = "" then - if jquery_icon_to_string(secondary) = "" then - partial_content( - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button();});")), - onclick_action - ], - literal("") - ) - else - partial_content( - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), - onclick_action - ], - literal("") - ) - else - if jquery_icon_to_string(secondary) = "" then - partial_content( - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"'}});});")), - onclick_action - ], - literal("") - ) - else - partial_content( - [ - js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"',secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), - onclick_action - ], - literal("") - ) - . diff --git a/web/CXM_jquery_datatable.anubis b/web/CXM_jquery_datatable.anubis deleted file mode 100644 index f542a02..0000000 --- a/web/CXM_jquery_datatable.anubis +++ /dev/null @@ -1,117 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 12/09/2012 - * Time: 16:14 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read calexium_lib/web/CXM_jquery.anubis -read calexium_lib/web/CXM_jquery_datatable_types.anubis -read calexium_lib/web/jquery/CXM_jquery_datatable_translation.anubis -read tools/basis.anubis -read system/string.anubis -read system/convert.anubis - -/* Initialize jQuery datatables */ -public define List(HTML_Head_Tag) - jquery_datatables_init - ( - String web_dir, - ) - = - [ - css(css_file("/css/jquery/jquery.dataTables.css")), - css(css_file("/css/jquery/jquery.dataTables_themeroller.css")), - js(js_file("/js/jquery/jquery.dataTables.min.js")) - ] - . - - -public define HTML_Partial_Content - jquery_datatable - ( - String table_id, - HTML_Off_Form table - ) - = - partial_content( - [ js_inline(script("", "$(document).ready(function(){$('#"+table_id+"').dataTable();});")) ], - table - ) - . - -public define HTML_Partial_Content - jquery_datatable - ( - String table_id, - HTML_Off_Form table, - Bool enable_jqueryui, - ) - = - if enable_jqueryui then - partial_content( - [ js_inline(script("", "$(document).ready(function(){$('#"+table_id+"').dataTable({\"bJQueryUI\":true});});")) ], - table - ) - else - jquery_datatable(table_id, table) - . - - -public define HTML_Partial_Content - jquery_datatable - ( - String table_id, - HTML_Off_Form table, - Bool enable_jqueryui, - Bool enable_pagination, - JQuery_datatable_pagination_type pagination_type, - Bool enable_change_page_length, // if true, "enable_pagination" must be true too. - Bool enable_search_field, - Bool enable_columns_sorting, - String lang - ) - = - partial_content( - [ - js_inline( - script( - "", - " - $(document).ready(function() - { - $('#"+table_id+"').dataTable( - { - \"bJQueryUI\":"+to_String(enable_jqueryui)+", - \"sPaginationType\":'"+jquery_datatable_pagination_type_to_string(pagination_type)+"', - \"bFilter\":"+to_String(enable_search_field)+", - \"bPaginate\":"+to_String(enable_pagination)+", - \"bLengthChange\":"+to_String(enable_change_page_length)+", - \"bSort\":"+to_String(enable_columns_sorting)+","+ - get_datatable_translation(lang)+" - }); - }); - " - ) - ) - ], - table - ) - . - -public define HTML_Partial_Content - jquery_datatable - ( - String table_id, - HTML_Off_Form table, - Bool enable_jqueryui, - Bool enable_pagination, - JQuery_datatable_pagination_type pagination_type, - Bool enable_change_page_length, // if true, "enable_pagination" must be true too. - Bool enable_search_field, - Bool enable_columns_sorting - ) = - jquery_datatable(table_id, table, enable_jqueryui, enable_pagination, pagination_type, enable_change_page_length, enable_search_field, enable_columns_sorting, "en"). diff --git a/web/CXM_jquery_datatable_types.anubis b/web/CXM_jquery_datatable_types.anubis deleted file mode 100644 index 5960d5a..0000000 --- a/web/CXM_jquery_datatable_types.anubis +++ /dev/null @@ -1,42 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 13/09/2012 - * Time: 10:12 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read tools/basis.anubis -read system/string.anubis - -public type JQuery_datatable_pagination_type: - jq_dt_pt_two_button, //default option - jq_dt_pt_full_numbers -. - -public define String - jquery_datatable_pagination_type_to_string - ( - JQuery_datatable_pagination_type pt - ) - = - if pt is - { - jq_dt_pt_two_button then "two_button", - jq_dt_pt_full_numbers then "full_numbers" - } - . - -public define JQuery_datatable_pagination_type - string_to_jquery_datatable_pagination_type - ( - String str - ) - = - with st=to_lower(str), - if st="two_button" then jq_dt_pt_two_button else - if st="full_numbers" then jq_dt_pt_full_numbers else - jq_dt_pt_two_button - . diff --git a/web/CXM_jquery_eudock.anubis b/web/CXM_jquery_eudock.anubis deleted file mode 100644 index ed2821f..0000000 --- a/web/CXM_jquery_eudock.anubis +++ /dev/null @@ -1,196 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 18/09/2012 - * Time: 17:28 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read calexium_lib/web/CXM_jquery.anubis -read calexium_lib/web/CXM_jquery_eudock_types.anubis -read tools/basis.anubis -read system/string.anubis -read system/convert.anubis - -/********************************************************************************************************/ -/********************************************************************************************************/ -/********************************************************************************************************/ -/********************************************************************************************************/ -/**************************************** ATTENTION !!! *******************************************/ -/************* Le mode 'object_alignment' n'est pas fonctionnel : NE PAS L'UTILISER ! ****************/ -/************************ Un recodage en jQuery de la lib JS est à prévoir **************************/ -/********************************************************************************************************/ -/********************************************************************************************************/ -/********************************************************************************************************/ -/********************************************************************************************************/ - -/* jQuery euDock initialization */ -public define List(HTML_Head_Tag) - jquery_eudock_init - ( - String web_dir, - ) - = - [ - js(js_file("/js/jquery/euDock.2.0.js")), - //js(js_file("/js/jquery/euDock.Blank.js")), // not needed for now - //js(js_file("/js/jquery/euDock.DivMousePos.js")), // not needed for now - //js(js_file("/js/jquery/euDock.Ghost.js")), // not needed for now - js(js_file("/js/jquery/euDock.Image.js")), - //js(js_file("/js/jquery/euDock.Label.js")) // not needed for now - ] - . - -/* Recursive format of the bar */ -define String - _jquery_eudock_format_bar - ( - List(JQ_eudock_imagebar) bar_images, - String formatted - ) - = - if bar_images is - { - [] then formatted, - [ h . t ] then - if h is - { - jq_eudock_bar_top(image) then - if t is - { - [] then _jquery_eudock_format_bar(t, formatted+"top :{euImage:{image:'"+image.image_url+"'}}"), - [ h . t] then _jquery_eudock_format_bar(t, formatted+"top :{euImage:{image:'"+image.image_url+"'}},") - }, - jq_eudock_bar_vertical(image) then - if t is - { - [] then _jquery_eudock_format_bar(t, formatted+"vertical :{euImage:{image:'"+image.image_url+"'}}"), - [ h . t] then _jquery_eudock_format_bar(t, formatted+"vertical :{euImage:{image:'"+image.image_url+"'}},") - }, - jq_eudock_bar_bottom(image) then - if t is - { - [] then _jquery_eudock_format_bar(t, formatted+"bottom :{euImage:{image:'"+image.image_url+"'}}"), - [ h . t] then _jquery_eudock_format_bar(t, formatted+"bottom :{euImage:{image:'"+image.image_url+"'}},") - }, - jq_eudock_bar_left(image) then - if t is - { - [] then _jquery_eudock_format_bar(t, formatted+"left :{euImage:{image:'"+image.image_url+"'}}"), - [ h . t] then _jquery_eudock_format_bar(t, formatted+"left :{euImage:{image:'"+image.image_url+"'}},") - }, - jq_eudock_bar_horizontal(image) then - if t is - { - [] then _jquery_eudock_format_bar(t, formatted+"horizontal :{euImage:{image:'"+image.image_url+"'}}"), - [ h . t] then _jquery_eudock_format_bar(t, formatted+"horizontal :{euImage:{image:'"+image.image_url+"'}},") - }, - jq_eudock_bar_right(image) then - if t is - { - [] then _jquery_eudock_format_bar(t, formatted+"right :{euImage:{image:'"+image.image_url+"'}}"), - [ h . t] then _jquery_eudock_format_bar(t, formatted+"right :{euImage:{image:'"+image.image_url+"'}},") - } - } - } - . - -/* Format the bar */ -define String - jquery_eudock_format_bar - ( - String dockname, - JQ_eudock_bar bar - ) - = - dockname+".setBar({"+ - _jquery_eudock_format_bar(bar.bar_images, "")+ - "});" - . - -/* Format 1 icon */ -define String - _jquery_eudock_format_icon - ( - String dockname, - JQ_euDock_Icon icon - ) - = - if icon is jq_eudock_icon(icon_image, link) then - " "+dockname+".addIcon(new Array({euImage:{image:'"+icon_image.image_url+"'}}), {link:'"+link+"'});\n" // space added at the beginning to avoid any js syntax error - . - -/* Format icons */ -define String - _jquery_eudock_format_icons - ( - String dockname, - List(JQ_euDock_Icon) icons, - String formatted - ) - = - if icons is - { - [] then formatted, - [ h . t ] then - _jquery_eudock_format_icons(dockname, t, formatted+ _jquery_eudock_format_icon(dockname, h)) - } - . - -/* Format icons */ -define String - jquery_eudock_format_icons - ( - String dockname, - List(JQ_euDock_Icon) icons - ) - = - _jquery_eudock_format_icons(dockname, icons, "") - . - -/* Format alignment */ -define String - jquery_eudock_format_alignment - ( - String dockname, - JQ_euDock_alignment alignment - ) - = - if alignment is - { - jq_eudock_screen_alignment(a, o) then - dockname+".setScreenAlign("+jq_eudock_align_to_string(a)+", "+o+");", - jq_eudock_object_alignment(o_id, o_al, o, p) then - dockname+".setObjectAlign('"+o_id+"', "+jq_eudock_object_align_to_string(o_al)+", "+o+", "+jq_eudock_position_to_string(p)+");", - jq_eudock_fixed_alignment(x, y, p) then - dockname+".setPointAlign("+x+", "+y+", "+jq_eudock_position_to_string(p)+");" - } - // "+dockname+".setScreenAlign("+jq_eudock_position_to_string(position)+",0); - . - -/* Creation of an euDock */ -public define HTML_Partial_Content - jquery_eudock - ( - JQ_euDock dock - ) - = - with dockname="dock_"+now, // dock name is suffixed with a timestamp to guarantee its uniqueness - if dock is jq_eudock(bar, icons, icon_offset, alignment) then - partial_content - ( - [ - js_inline(script("", " - euEnv.imageBasePath=\"\"; - var "+dockname+"=new euDock(); - "+jquery_eudock_format_alignment(dockname, alignment)+" - "+jquery_eudock_format_bar(dockname, bar)+" - "+dockname+".setIconsOffset("+icon_offset+"); - "+jquery_eudock_format_icons(dockname, icons)+" - ")) - ], - literal("") // euDock does not need to return HTML content => it's javascript only ! - ) - . diff --git a/web/CXM_jquery_eudock_types.anubis b/web/CXM_jquery_eudock_types.anubis deleted file mode 100644 index b6dd0bd..0000000 --- a/web/CXM_jquery_eudock_types.anubis +++ /dev/null @@ -1,194 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 18/09/2012 - * Time: 17:48 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read calexium_lib/web/CXM_jquery.anubis -read tools/basis.anubis -read system/string.anubis -read system/convert.anubis - -/* jQuery euDock "euImage" type */ -public type JQ_euDock_euImage: - jq_eudock_euimage(String image_url) // url must be set from web server root. example: "/images/mydock/icon-1.png" -. - -/* jQuery euDock image bar type */ -public type JQ_eudock_imagebar: - jq_eudock_bar_top(JQ_euDock_euImage image), - jq_eudock_bar_vertical(JQ_euDock_euImage image), - jq_eudock_bar_bottom(JQ_euDock_euImage image), - jq_eudock_bar_left(JQ_euDock_euImage image), - jq_eudock_bar_horizontal(JQ_euDock_euImage image), - jq_eudock_bar_right(JQ_euDock_euImage image) -. - -/* jQuery euDock bar type */ -public type JQ_eudock_bar: - jq_eudock_bar(List(JQ_eudock_imagebar) bar_images) -. - -/* jQuery euDock align type */ -public type JQ_eudock_align: - jq_eudock_align_top, - jq_eudock_align_left, - jq_eudock_align_bottom, - jq_eudock_align_right -. - -/* JQ_eudock_align to string */ -public define String - jq_eudock_align_to_string - ( - JQ_eudock_align a - ) - = - if a is - { - jq_eudock_align_top then "euUP", - jq_eudock_align_left then "euLEFT", - jq_eudock_align_bottom then "euDOWN", - jq_eudock_align_right then "euRIGHT" - } - . - -/* string to JQ_eudock_align */ -public define JQ_eudock_align - string_to_jq_eudock_align - ( - String s - ) - = - if s="euUP" then jq_eudock_align_top - else if s="euLEFT" then jq_eudock_align_left - else if s="euDOWN" then jq_eudock_align_bottom - else if s="euRIGHT" then jq_eudock_align_right - else jq_eudock_align_top // we decide that top position is default. - . - -/* jQuery euDock position type */ -public type JQ_eudock_position: - jq_eudock_position_top, - jq_eudock_position_left, - jq_eudock_position_bottom, - jq_eudock_position_right, - jq_eudock_position_horizontal, - jq_eudock_position_vertical -. - -/* JQ_eudock_position to string */ -public define String - jq_eudock_position_to_string - ( - JQ_eudock_position p - ) - = - if p is - { - jq_eudock_position_top then "euUP", - jq_eudock_position_left then "euLEFT", - jq_eudock_position_bottom then "euDOWN", - jq_eudock_position_right then "euRIGHT", - jq_eudock_position_horizontal then "euHORIZONTAL", - jq_eudock_position_vertical then "euVERTICAL" - } - . - -/* string to JQ_eudock_position */ -public define JQ_eudock_position - string_to_jq_eudock_position - ( - String s - ) - = - if s="euUP" then jq_eudock_position_top - else if s="euLEFT" then jq_eudock_position_left - else if s="euDOWN" then jq_eudock_position_bottom - else if s="euRIGHT" then jq_eudock_position_right - else if s="euHORIZONTAL" then jq_eudock_position_horizontal - else if s="euVERTICAL" then jq_eudock_position_vertical - else jq_eudock_position_top // we decide that top position is default. - . - -/* jQuery euDock objectAlign type */ -public type JQ_eudock_object_align: - jq_eudock_object_align_top, - jq_eudock_object_align_left, - jq_eudock_object_align_bottom, - jq_eudock_object_align_right, - jq_eudock_object_align_center -. - -/* JQ_eudock_object_align to string */ -public define String - jq_eudock_object_align_to_string - ( - JQ_eudock_object_align oa - ) - = - if oa is - { - jq_eudock_object_align_top then "euUP", - jq_eudock_object_align_left then "euLEFT", - jq_eudock_object_align_bottom then "euDOWN", - jq_eudock_object_align_right then "euRIGHT", - jq_eudock_object_align_center then "euCENTER" - } - . - -/* string to JQ_eudock_object_align */ -public define JQ_eudock_object_align - string_to_jq_eudock_object_align - ( - String s - ) - = - if s="euUP" then jq_eudock_object_align_top - else if s="euLEFT" then jq_eudock_object_align_left - else if s="euDOWN" then jq_eudock_object_align_bottom - else if s="euRIGHT" then jq_eudock_object_align_right - else if s="euCENTER" then jq_eudock_object_align_center - else jq_eudock_object_align_top // we decide that top position is default. - . - -/* jQuery euDock alignment */ -public type JQ_euDock_alignment: - jq_eudock_screen_alignment( - JQ_eudock_align align, - Int offset /* see icon_offset in JQ_euDock type definition */ - ), - jq_eudock_object_alignment( - String object_id, - JQ_eudock_object_align object_align, - Int offset, /* see icon_offset in JQ_euDock type definition */ - JQ_eudock_position position - ), - jq_eudock_fixed_alignment( - Int x, - Int y, - JQ_eudock_position position - ) -. - -/* jQuery euDock icon type */ -public type JQ_euDock_Icon: - jq_eudock_icon( - JQ_euDock_euImage icon_image, - String link - ) -. - -/* jQuery "euDock" type */ -public type JQ_euDock: - jq_eudock( - JQ_eudock_bar bar, // it's the "graphical bar" under icons. - List(JQ_euDock_Icon) icons, - Int icon_offset, // number of icons should be let in "blank space". Example: if icon size is 32px and icon_offset is 2 => the first icon is displayed 64px from the "left" border of the dock and the last icon is displayed 64px from the "right" border of the dock - JQ_euDock_alignment alignment // dock position - ) -. diff --git a/web/CXM_jquery_icons.anubis b/web/CXM_jquery_icons.anubis deleted file mode 100644 index f456bb2..0000000 --- a/web/CXM_jquery_icons.anubis +++ /dev/null @@ -1,560 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 08/09/2012 - * Time: 16:35 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read tools/basis.anubis -read system/string.anubis - -public type JQuery_icon: - ui_icon_carat_1_n, - ui_icon_carat_1_ne, - ui_icon_carat_1_e, - ui_icon_carat_1_se, - ui_icon_carat_1_s, - ui_icon_carat_1_sw, - ui_icon_carat_1_w, - ui_icon_carat_1_nw, - ui_icon_carat_2_n_s, - ui_icon_carat_2_e_w, - ui_icon_triangle_1_n, - ui_icon_triangle_1_ne, - ui_icon_triangle_1_e, - ui_icon_triangle_1_se, - ui_icon_triangle_1_s, - ui_icon_triangle_1_sw, - ui_icon_triangle_1_w, - ui_icon_triangle_1_nw, - ui_icon_triangle_2_n_s, - ui_icon_triangle_2_e_w, - ui_icon_arrow_1_n, - ui_icon_arrow_1_ne, - ui_icon_arrow_1_e, - ui_icon_arrow_1_se, - ui_icon_arrow_1_s, - ui_icon_arrow_1_sw, - ui_icon_arrow_1_w, - ui_icon_arrow_1_nw, - ui_icon_arrow_2_n_s, - ui_icon_arrow_2_ne_sw, - ui_icon_arrow_2_e_w, - ui_icon_arrow_2_se_nw, - ui_icon_arrowstop_1_n, - ui_icon_arrowstop_1_e, - ui_icon_arrowstop_1_s, - ui_icon_arrowstop_1_w, - ui_icon_arrowthick_1_n, - ui_icon_arrowthick_1_ne, - ui_icon_arrowthick_1_e, - ui_icon_arrowthick_1_se, - ui_icon_arrowthick_1_s, - ui_icon_arrowthick_1_sw, - ui_icon_arrowthick_1_w, - ui_icon_arrowthick_1_nw, - ui_icon_arrowthick_2_n_s, - ui_icon_arrowthick_2_ne_sw, - ui_icon_arrowthick_2_e_w, - ui_icon_arrowthick_2_se_nw, - ui_icon_arrowthickstop_1_n, - ui_icon_arrowthickstop_1_e, - ui_icon_arrowthickstop_1_s, - ui_icon_arrowthickstop_1_w, - ui_icon_arrowreturnthick_1_w, - ui_icon_arrowreturnthick_1_n, - ui_icon_arrowreturnthick_1_e, - ui_icon_arrowreturnthick_1_s, - ui_icon_arrowreturn_1_w, - ui_icon_arrowreturn_1_n, - ui_icon_arrowreturn_1_e, - ui_icon_arrowreturn_1_s, - ui_icon_arrowrefresh_1_w, - ui_icon_arrowrefresh_1_n, - ui_icon_arrowrefresh_1_e, - ui_icon_arrowrefresh_1_s, - ui_icon_arrow_4, - ui_icon_arrow_4_diag, - ui_icon_extlink, - ui_icon_newwin, - ui_icon_refresh, - ui_icon_shuffle, - ui_icon_transfer_e_w, - ui_icon_transferthick_e_w, - ui_icon_folder_collapsed, - ui_icon_folder_open, - ui_icon_document, - ui_icon_document_b, - ui_icon_note, - ui_icon_mail_closed, - ui_icon_mail_open, - ui_icon_suitcase, - ui_icon_comment, - ui_icon_person, - ui_icon_print, - ui_icon_trash, - ui_icon_locked, - ui_icon_unlocked, - ui_icon_bookmark, - ui_icon_tag, - ui_icon_home, - ui_icon_flag, - ui_icon_calculator, - ui_icon_cart, - ui_icon_pencil, - ui_icon_clock, - ui_icon_disk, - ui_icon_calendar, - ui_icon_zoomin, - ui_icon_zoomout, - ui_icon_search, - ui_icon_wrench, - ui_icon_gear, - ui_icon_heart, - ui_icon_star, - ui_icon_link, - ui_icon_cancel, - ui_icon_plus, - ui_icon_plusthick, - ui_icon_minus, - ui_icon_minusthick, - ui_icon_close, - ui_icon_closethick, - ui_icon_key, - ui_icon_lightbulb, - ui_icon_scissors, - ui_icon_clipboard, - ui_icon_copy, - ui_icon_contact, - ui_icon_image, - ui_icon_video, - ui_icon_script, - ui_icon_alert, - ui_icon_info, - ui_icon_notice, - ui_icon_help, - ui_icon_check, - ui_icon_bullet, - ui_icon_radio_off, - ui_icon_radio_on, - ui_icon_pin_w, - ui_icon_pin_s, - ui_icon_play, - ui_icon_pause, - ui_icon_seek_next, - ui_icon_seek_prev, - ui_icon_seek_end, - ui_icon_seek_first, - ui_icon_stop, - ui_icon_eject, - ui_icon_volume_off, - ui_icon_volume_on, - ui_icon_power, - ui_icon_signal_diag, - ui_icon_signal, - ui_icon_battery_0, - ui_icon_battery_1, - ui_icon_battery_2, - ui_icon_battery_3, - ui_icon_circle_plus, - ui_icon_circle_minus, - ui_icon_circle_close, - ui_icon_circle_triangle_e, - ui_icon_circle_triangle_s, - ui_icon_circle_triangle_w, - ui_icon_circle_triangle_n, - ui_icon_circle_arrow_e, - ui_icon_circle_arrow_s, - ui_icon_circle_arrow_w, - ui_icon_circle_arrow_n, - ui_icon_circle_zoomin, - ui_icon_circle_zoomout, - ui_icon_circle_check, - ui_icon_circlesmall_plus, - ui_icon_circlesmall_minus, - ui_icon_circlesmall_close, - ui_icon_squaresmall_plus, - ui_icon_squaresmall_minus, - ui_icon_squaresmall_close, - ui_icon_grip_dotted_vertical, - ui_icon_grip_dotted_horizontal, - ui_icon_grip_solid_vertical, - ui_icon_grip_solid_horizontal, - ui_icon_gripsmall_diagonal_se, - ui_icon_grip_diagonal_se, - jq_icon_none, - jq_custom_icon(String) // for custom icon => set it to CSS class name used to display icon => for creating a such CSS class please refer to jQueryUI Theme CSS file and see how it's done with the othe icon classes -. - -public define String - jquery_icon_to_string - ( - JQuery_icon icon - ) - = - if icon is - { - ui_icon_carat_1_n then "ui-icon-carat-1-n", - ui_icon_carat_1_ne then "ui-icon-carat-1-ne", - ui_icon_carat_1_e then "ui-icon-carat-1-e", - ui_icon_carat_1_se then "ui-icon-carat-1-se", - ui_icon_carat_1_s then "ui-icon-carat-1-s", - ui_icon_carat_1_sw then "ui-icon-carat-1-sw", - ui_icon_carat_1_w then "ui-icon-carat-1-w", - ui_icon_carat_1_nw then "ui-icon-carat-1-nw", - ui_icon_carat_2_n_s then "ui-icon-carat-2-n-s", - ui_icon_carat_2_e_w then "ui-icon-carat-2-e-w", - ui_icon_triangle_1_n then "ui-icon-triangle-1-n", - ui_icon_triangle_1_ne then "ui-icon-triangle-1-ne", - ui_icon_triangle_1_e then "ui-icon-triangle-1-e", - ui_icon_triangle_1_se then "ui-icon-triangle-1-se", - ui_icon_triangle_1_s then "ui-icon-triangle-1-s", - ui_icon_triangle_1_sw then "ui-icon-triangle-1-sw", - ui_icon_triangle_1_w then "ui-icon-triangle-1-w", - ui_icon_triangle_1_nw then "ui-icon-triangle-1-nw", - ui_icon_triangle_2_n_s then "ui-icon-triangle-2-n-s", - ui_icon_triangle_2_e_w then "ui-icon-triangle-2-e-w", - ui_icon_arrow_1_n then "ui-icon-arrow-1-n", - ui_icon_arrow_1_ne then "ui-icon-arrow-1-ne", - ui_icon_arrow_1_e then "ui-icon-arrow-1-e", - ui_icon_arrow_1_se then "ui-icon-arrow-1-se", - ui_icon_arrow_1_s then "ui-icon-arrow-1-s", - ui_icon_arrow_1_sw then "ui-icon-arrow-1-sw", - ui_icon_arrow_1_w then "ui-icon-arrow-1-w", - ui_icon_arrow_1_nw then "ui-icon-arrow-1-nw", - ui_icon_arrow_2_n_s then "ui-icon-arrow-2-n-s", - ui_icon_arrow_2_ne_sw then "ui-icon-arrow-2-ne-sw", - ui_icon_arrow_2_e_w then "ui-icon-arrow-2-e-w", - ui_icon_arrow_2_se_nw then "ui-icon-arrow-2-se-nw", - ui_icon_arrowstop_1_n then "ui-icon-arrowstop-1-n", - ui_icon_arrowstop_1_e then "ui-icon-arrowstop-1-e", - ui_icon_arrowstop_1_s then "ui-icon-arrowstop-1-s", - ui_icon_arrowstop_1_w then "ui-icon-arrowstop-1-w", - ui_icon_arrowthick_1_n then "ui-icon-arrowthick-1-n", - ui_icon_arrowthick_1_ne then "ui-icon-arrowthick-1-ne", - ui_icon_arrowthick_1_e then "ui-icon-arrowthick-1-e", - ui_icon_arrowthick_1_se then "ui-icon-arrowthick-1-se", - ui_icon_arrowthick_1_s then "ui-icon-arrowthick-1-s", - ui_icon_arrowthick_1_sw then "ui-icon-arrowthick-1-sw", - ui_icon_arrowthick_1_w then "ui-icon-arrowthick-1-w", - ui_icon_arrowthick_1_nw then "ui-icon-arrowthick-1-nw", - ui_icon_arrowthick_2_n_s then "ui-icon-arrowthick-2-n-s", - ui_icon_arrowthick_2_ne_sw then "ui-icon-arrowthick-2-ne-sw", - ui_icon_arrowthick_2_e_w then "ui-icon-arrowthick-2-e-w", - ui_icon_arrowthick_2_se_nw then "ui-icon-arrowthick-2-se-nw", - ui_icon_arrowthickstop_1_n then "ui-icon-arrowthickstop-1-n", - ui_icon_arrowthickstop_1_e then "ui-icon-arrowthickstop-1-e", - ui_icon_arrowthickstop_1_s then "ui-icon-arrowthickstop-1-s", - ui_icon_arrowthickstop_1_w then "ui-icon-arrowthickstop-1-w", - ui_icon_arrowreturnthick_1_w then "ui-icon-arrowreturnthick-1-w", - ui_icon_arrowreturnthick_1_n then "ui-icon-arrowreturnthick-1-n", - ui_icon_arrowreturnthick_1_e then "ui-icon-arrowreturnthick-1-e", - ui_icon_arrowreturnthick_1_s then "ui-icon-arrowreturnthick-1-s", - ui_icon_arrowreturn_1_w then "ui-icon-arrowreturn-1-w", - ui_icon_arrowreturn_1_n then "ui-icon-arrowreturn-1-n", - ui_icon_arrowreturn_1_e then "ui-icon-arrowreturn-1-e", - ui_icon_arrowreturn_1_s then "ui-icon-arrowreturn-1-s", - ui_icon_arrowrefresh_1_w then "ui-icon-arrowrefresh-1-w", - ui_icon_arrowrefresh_1_n then "ui-icon-arrowrefresh-1-n", - ui_icon_arrowrefresh_1_e then "ui-icon-arrowrefresh-1-e", - ui_icon_arrowrefresh_1_s then "ui-icon-arrowrefresh-1-s", - ui_icon_arrow_4 then "ui-icon-arrow-4", - ui_icon_arrow_4_diag then "ui-icon-arrow-4-diag", - ui_icon_extlink then "ui-icon-extlink", - ui_icon_newwin then "ui-icon-newwin", - ui_icon_refresh then "ui-icon-refresh", - ui_icon_shuffle then "ui-icon-shuffle", - ui_icon_transfer_e_w then "ui-icon-transfer-e-w", - ui_icon_transferthick_e_w then "ui-icon-transferthick-e-w", - ui_icon_folder_collapsed then "ui-icon-folder-collapsed", - ui_icon_folder_open then "ui-icon-folder-open", - ui_icon_document then "ui-icon-document", - ui_icon_document_b then "ui-icon-document-b", - ui_icon_note then "ui-icon-note", - ui_icon_mail_closed then "ui-icon-mail-closed", - ui_icon_mail_open then "ui-icon-mail-open", - ui_icon_suitcase then "ui-icon-suitcase", - ui_icon_comment then "ui-icon-comment", - ui_icon_person then "ui-icon-person", - ui_icon_print then "ui-icon-print", - ui_icon_trash then "ui-icon-trash", - ui_icon_locked then "ui-icon-locked", - ui_icon_unlocked then "ui-icon-unlocked", - ui_icon_bookmark then "ui-icon-bookmark", - ui_icon_tag then "ui-icon-tag", - ui_icon_home then "ui-icon-home", - ui_icon_flag then "ui-icon-flag", - ui_icon_calculator then "ui-icon-calculator", - ui_icon_cart then "ui-icon-cart", - ui_icon_pencil then "ui-icon-pencil", - ui_icon_clock then "ui-icon-clock", - ui_icon_disk then "ui-icon-disk", - ui_icon_calendar then "ui-icon-calendar", - ui_icon_zoomin then "ui-icon-zoomin", - ui_icon_zoomout then "ui-icon-zoomout", - ui_icon_search then "ui-icon-search", - ui_icon_wrench then "ui-icon-wrench", - ui_icon_gear then "ui-icon-gear", - ui_icon_heart then "ui-icon-heart", - ui_icon_star then "ui-icon-star", - ui_icon_link then "ui-icon-link", - ui_icon_cancel then "ui-icon-cancel", - ui_icon_plus then "ui-icon-plus", - ui_icon_plusthick then "ui-icon-plusthick", - ui_icon_minus then "ui-icon-minus", - ui_icon_minusthick then "ui-icon-minusthick", - ui_icon_close then "ui-icon-close", - ui_icon_closethick then "ui-icon-closethick", - ui_icon_key then "ui-icon-key", - ui_icon_lightbulb then "ui-icon-lightbulb", - ui_icon_scissors then "ui-icon-scissors", - ui_icon_clipboard then "ui-icon-clipboard", - ui_icon_copy then "ui-icon-copy", - ui_icon_contact then "ui-icon-contact", - ui_icon_image then "ui-icon-image", - ui_icon_video then "ui-icon-video", - ui_icon_script then "ui-icon-script", - ui_icon_alert then "ui-icon-alert", - ui_icon_info then "ui-icon-info", - ui_icon_notice then "ui-icon-notice", - ui_icon_help then "ui-icon-help", - ui_icon_check then "ui-icon-check", - ui_icon_bullet then "ui-icon-bullet", - ui_icon_radio_off then "ui-icon-radio-off", - ui_icon_radio_on then "ui-icon-radio-on", - ui_icon_pin_w then "ui-icon-pin-w", - ui_icon_pin_s then "ui-icon-pin-s", - ui_icon_play then "ui-icon-play", - ui_icon_pause then "ui-icon-pause", - ui_icon_seek_next then "ui-icon-seek-next", - ui_icon_seek_prev then "ui-icon-seek-prev", - ui_icon_seek_end then "ui-icon-seek-end", - ui_icon_seek_first then "ui-icon-seek-first", - ui_icon_stop then "ui-icon-stop", - ui_icon_eject then "ui-icon-eject", - ui_icon_volume_off then "ui-icon-volume-off", - ui_icon_volume_on then "ui-icon-volume-on", - ui_icon_power then "ui-icon-power", - ui_icon_signal_diag then "ui-icon-signal-diag", - ui_icon_signal then "ui-icon-signal", - ui_icon_battery_0 then "ui-icon-battery-0", - ui_icon_battery_1 then "ui-icon-battery-1", - ui_icon_battery_2 then "ui-icon-battery-2", - ui_icon_battery_3 then "ui-icon-battery-3", - ui_icon_circle_plus then "ui-icon-circle-plus", - ui_icon_circle_minus then "ui-icon-circle-minus", - ui_icon_circle_close then "ui-icon-circle-close", - ui_icon_circle_triangle_e then "ui-icon-circle-triangle-e", - ui_icon_circle_triangle_s then "ui-icon-circle-triangle-s", - ui_icon_circle_triangle_w then "ui-icon-circle-triangle-w", - ui_icon_circle_triangle_n then "ui-icon-circle-triangle-n", - ui_icon_circle_arrow_e then "ui-icon-circle-arrow-e", - ui_icon_circle_arrow_s then "ui-icon-circle-arrow-s", - ui_icon_circle_arrow_w then "ui-icon-circle-arrow-w", - ui_icon_circle_arrow_n then "ui-icon-circle-arrow-n", - ui_icon_circle_zoomin then "ui-icon-circle-zoomin", - ui_icon_circle_zoomout then "ui-icon-circle-zoomout", - ui_icon_circle_check then "ui-icon-circle-check", - ui_icon_circlesmall_plus then "ui-icon-circlesmall-plus", - ui_icon_circlesmall_minus then "ui-icon-circlesmall-minus", - ui_icon_circlesmall_close then "ui-icon-circlesmall-close", - ui_icon_squaresmall_plus then "ui-icon-squaresmall-plus", - ui_icon_squaresmall_minus then "ui-icon-squaresmall-minus", - ui_icon_squaresmall_close then "ui-icon-squaresmall-close", - ui_icon_grip_dotted_vertical then "ui-icon-grip-dotted-vertical", - ui_icon_grip_dotted_horizontal then "ui-icon-grip-dotted-horizontal", - ui_icon_grip_solid_vertical then "ui-icon-grip-solid-vertical", - ui_icon_grip_solid_horizontal then "ui-icon-grip-solid-horizontal", - ui_icon_gripsmall_diagonal_se then "ui-icon-gripsmall-diagonal-se", - ui_icon_grip_diagonal_se then "ui-icon-grip-diagonal-se", - jq_icon_none then "", - jq_custom_icon(str) then str - } - . - -public define JQuery_icon - string_to_jquery_icon - ( - String icon_class - ) - = - with ic=to_lower(icon_class), - if ic = "ui-icon-carat-1-n" then ui_icon_carat_1_n else - if ic = "ui-icon-carat-1-ne" then ui_icon_carat_1_ne else - if ic = "ui-icon-carat-1-e" then ui_icon_carat_1_e else - if ic = "ui-icon-carat-1-se" then ui_icon_carat_1_se else - if ic = "ui-icon-carat-1-s" then ui_icon_carat_1_s else - if ic = "ui-icon-carat-1-sw" then ui_icon_carat_1_sw else - if ic = "ui-icon-carat-1-w" then ui_icon_carat_1_w else - if ic = "ui-icon-carat-1-nw" then ui_icon_carat_1_nw else - if ic = "ui-icon-carat-2-n-s" then ui_icon_carat_2_n_s else - if ic = "ui-icon-carat-2-e-w" then ui_icon_carat_2_e_w else - if ic = "ui-icon-triangle-1-n" then ui_icon_triangle_1_n else - if ic = "ui-icon-triangle-1-ne" then ui_icon_triangle_1_ne else - if ic = "ui-icon-triangle-1-e" then ui_icon_triangle_1_e else - if ic = "ui-icon-triangle-1-se" then ui_icon_triangle_1_se else - if ic = "ui-icon-triangle-1-s" then ui_icon_triangle_1_s else - if ic = "ui-icon-triangle-1-sw" then ui_icon_triangle_1_sw else - if ic = "ui-icon-triangle-1-w" then ui_icon_triangle_1_w else - if ic = "ui-icon-triangle-1-nw" then ui_icon_triangle_1_nw else - if ic = "ui-icon-triangle-2-n-s" then ui_icon_triangle_2_n_s else - if ic = "ui-icon-triangle-2-e-w" then ui_icon_triangle_2_e_w else - if ic = "ui-icon-arrow-1-n" then ui_icon_arrow_1_n else - if ic = "ui-icon-arrow-1-ne" then ui_icon_arrow_1_ne else - if ic = "ui-icon-arrow-1-e" then ui_icon_arrow_1_e else - if ic = "ui-icon-arrow-1-se" then ui_icon_arrow_1_se else - if ic = "ui-icon-arrow-1-s" then ui_icon_arrow_1_s else - if ic = "ui-icon-arrow-1-sw" then ui_icon_arrow_1_sw else - if ic = "ui-icon-arrow-1-w" then ui_icon_arrow_1_w else - if ic = "ui-icon-arrow-1-nw" then ui_icon_arrow_1_nw else - if ic = "ui-icon-arrow-2-n-s" then ui_icon_arrow_2_n_s else - if ic = "ui-icon-arrow-2-ne-sw" then ui_icon_arrow_2_ne_sw else - if ic = "ui-icon-arrow-2-e-w" then ui_icon_arrow_2_e_w else - if ic = "ui-icon-arrow-2-se-nw" then ui_icon_arrow_2_se_nw else - if ic = "ui-icon-arrowstop-1-n" then ui_icon_arrowstop_1_n else - if ic = "ui-icon-arrowstop-1-e" then ui_icon_arrowstop_1_e else - if ic = "ui-icon-arrowstop-1-s" then ui_icon_arrowstop_1_s else - if ic = "ui-icon-arrowstop-1-w" then ui_icon_arrowstop_1_w else - if ic = "ui-icon-arrowthick-1-n" then ui_icon_arrowthick_1_n else - if ic = "ui-icon-arrowthick-1-ne" then ui_icon_arrowthick_1_ne else - if ic = "ui-icon-arrowthick-1-e" then ui_icon_arrowthick_1_e else - if ic = "ui-icon-arrowthick-1-se" then ui_icon_arrowthick_1_se else - if ic = "ui-icon-arrowthick-1-s" then ui_icon_arrowthick_1_s else - if ic = "ui-icon-arrowthick-1-sw" then ui_icon_arrowthick_1_sw else - if ic = "ui-icon-arrowthick-1-w" then ui_icon_arrowthick_1_w else - if ic = "ui-icon-arrowthick-1-nw" then ui_icon_arrowthick_1_nw else - if ic = "ui-icon-arrowthick-2-n-s" then ui_icon_arrowthick_2_n_s else - if ic = "ui-icon-arrowthick-2-ne-sw" then ui_icon_arrowthick_2_ne_sw else - if ic = "ui-icon-arrowthick-2-e-w" then ui_icon_arrowthick_2_e_w else - if ic = "ui-icon-arrowthick-2-se-nw" then ui_icon_arrowthick_2_se_nw else - if ic = "ui-icon-arrowthickstop-1-n" then ui_icon_arrowthickstop_1_n else - if ic = "ui-icon-arrowthickstop-1-e" then ui_icon_arrowthickstop_1_e else - if ic = "ui-icon-arrowthickstop-1-s" then ui_icon_arrowthickstop_1_s else - if ic = "ui-icon-arrowthickstop-1-w" then ui_icon_arrowthickstop_1_w else - if ic = "ui-icon-arrowreturnthick-1-w" then ui_icon_arrowreturnthick_1_w else - if ic = "ui-icon-arrowreturnthick-1-n" then ui_icon_arrowreturnthick_1_n else - if ic = "ui-icon-arrowreturnthick-1-e" then ui_icon_arrowreturnthick_1_e else - if ic = "ui-icon-arrowreturnthick-1-s" then ui_icon_arrowreturnthick_1_s else - if ic = "ui-icon-arrowreturn-1-w" then ui_icon_arrowreturn_1_w else - if ic = "ui-icon-arrowreturn-1-n" then ui_icon_arrowreturn_1_n else - if ic = "ui-icon-arrowreturn-1-e" then ui_icon_arrowreturn_1_e else - if ic = "ui-icon-arrowreturn-1-s" then ui_icon_arrowreturn_1_s else - if ic = "ui-icon-arrowrefresh-1-w" then ui_icon_arrowrefresh_1_w else - if ic = "ui-icon-arrowrefresh-1-n" then ui_icon_arrowrefresh_1_n else - if ic = "ui-icon-arrowrefresh-1-e" then ui_icon_arrowrefresh_1_e else - if ic = "ui-icon-arrowrefresh-1-s" then ui_icon_arrowrefresh_1_s else - if ic = "ui-icon-arrow-4" then ui_icon_arrow_4 else - if ic = "ui-icon-arrow-4-diag" then ui_icon_arrow_4_diag else - if ic = "ui-icon-extlink" then ui_icon_extlink else - if ic = "ui-icon-newwin" then ui_icon_newwin else - if ic = "ui-icon-refresh" then ui_icon_refresh else - if ic = "ui-icon-shuffle" then ui_icon_shuffle else - if ic = "ui-icon-transfer-e-w" then ui_icon_transfer_e_w else - if ic = "ui-icon-transferthick-e-w" then ui_icon_transferthick_e_w else - if ic = "ui-icon-folder-collapsed" then ui_icon_folder_collapsed else - if ic = "ui-icon-folder-open" then ui_icon_folder_open else - if ic = "ui-icon-document" then ui_icon_document else - if ic = "ui-icon-document-b" then ui_icon_document_b else - if ic = "ui-icon-note" then ui_icon_note else - if ic = "ui-icon-mail-closed" then ui_icon_mail_closed else - if ic = "ui-icon-mail-open" then ui_icon_mail_open else - if ic = "ui-icon-suitcase" then ui_icon_suitcase else - if ic = "ui-icon-comment" then ui_icon_comment else - if ic = "ui-icon-person" then ui_icon_person else - if ic = "ui-icon-print" then ui_icon_print else - if ic = "ui-icon-trash" then ui_icon_trash else - if ic = "ui-icon-locked" then ui_icon_locked else - if ic = "ui-icon-unlocked" then ui_icon_unlocked else - if ic = "ui-icon-bookmark" then ui_icon_bookmark else - if ic = "ui-icon-tag" then ui_icon_tag else - if ic = "ui-icon-home" then ui_icon_home else - if ic = "ui-icon-flag" then ui_icon_flag else - if ic = "ui-icon-calculator" then ui_icon_calculator else - if ic = "ui-icon-cart" then ui_icon_cart else - if ic = "ui-icon-pencil" then ui_icon_pencil else - if ic = "ui-icon-clock" then ui_icon_clock else - if ic = "ui-icon-disk" then ui_icon_disk else - if ic = "ui-icon-calendar" then ui_icon_calendar else - if ic = "ui-icon-zoomin" then ui_icon_zoomin else - if ic = "ui-icon-zoomout" then ui_icon_zoomout else - if ic = "ui-icon-search" then ui_icon_search else - if ic = "ui-icon-wrench" then ui_icon_wrench else - if ic = "ui-icon-gear" then ui_icon_gear else - if ic = "ui-icon-heart" then ui_icon_heart else - if ic = "ui-icon-star" then ui_icon_star else - if ic = "ui-icon-link" then ui_icon_link else - if ic = "ui-icon-cancel" then ui_icon_cancel else - if ic = "ui-icon-plus" then ui_icon_plus else - if ic = "ui-icon-plusthick" then ui_icon_plusthick else - if ic = "ui-icon-minus" then ui_icon_minus else - if ic = "ui-icon-minusthick" then ui_icon_minusthick else - if ic = "ui-icon-close" then ui_icon_close else - if ic = "ui-icon-closethick" then ui_icon_closethick else - if ic = "ui-icon-key" then ui_icon_key else - if ic = "ui-icon-lightbulb" then ui_icon_lightbulb else - if ic = "ui-icon-scissors" then ui_icon_scissors else - if ic = "ui-icon-clipboard" then ui_icon_clipboard else - if ic = "ui-icon-copy" then ui_icon_copy else - if ic = "ui-icon-contact" then ui_icon_contact else - if ic = "ui-icon-image" then ui_icon_image else - if ic = "ui-icon-video" then ui_icon_video else - if ic = "ui-icon-script" then ui_icon_script else - if ic = "ui-icon-alert" then ui_icon_alert else - if ic = "ui-icon-info" then ui_icon_info else - if ic = "ui-icon-notice" then ui_icon_notice else - if ic = "ui-icon-help" then ui_icon_help else - if ic = "ui-icon-check" then ui_icon_check else - if ic = "ui-icon-bullet" then ui_icon_bullet else - if ic = "ui-icon-radio-off" then ui_icon_radio_off else - if ic = "ui-icon-radio-on" then ui_icon_radio_on else - if ic = "ui-icon-pin-w" then ui_icon_pin_w else - if ic = "ui-icon-pin-s" then ui_icon_pin_s else - if ic = "ui-icon-play" then ui_icon_play else - if ic = "ui-icon-pause" then ui_icon_pause else - if ic = "ui-icon-seek-next" then ui_icon_seek_next else - if ic = "ui-icon-seek-prev" then ui_icon_seek_prev else - if ic = "ui-icon-seek-end" then ui_icon_seek_end else - if ic = "ui-icon-seek-first" then ui_icon_seek_first else - if ic = "ui-icon-stop" then ui_icon_stop else - if ic = "ui-icon-eject" then ui_icon_eject else - if ic = "ui-icon-volume-off" then ui_icon_volume_off else - if ic = "ui-icon-volume-on" then ui_icon_volume_on else - if ic = "ui-icon-power" then ui_icon_power else - if ic = "ui-icon-signal-diag" then ui_icon_signal_diag else - if ic = "ui-icon-signal" then ui_icon_signal else - if ic = "ui-icon-battery-0" then ui_icon_battery_0 else - if ic = "ui-icon-battery-1" then ui_icon_battery_1 else - if ic = "ui-icon-battery-2" then ui_icon_battery_2 else - if ic = "ui-icon-battery-3" then ui_icon_battery_3 else - if ic = "ui-icon-circle-plus" then ui_icon_circle_plus else - if ic = "ui-icon-circle-minus" then ui_icon_circle_minus else - if ic = "ui-icon-circle-close" then ui_icon_circle_close else - if ic = "ui-icon-circle-triangle-e" then ui_icon_circle_triangle_e else - if ic = "ui-icon-circle-triangle-s" then ui_icon_circle_triangle_s else - if ic = "ui-icon-circle-triangle-w" then ui_icon_circle_triangle_w else - if ic = "ui-icon-circle-triangle-n" then ui_icon_circle_triangle_n else - if ic = "ui-icon-circle-arrow-e" then ui_icon_circle_arrow_e else - if ic = "ui-icon-circle-arrow-s" then ui_icon_circle_arrow_s else - if ic = "ui-icon-circle-arrow-w" then ui_icon_circle_arrow_w else - if ic = "ui-icon-circle-arrow-n" then ui_icon_circle_arrow_n else - if ic = "ui-icon-circle-zoomin" then ui_icon_circle_zoomin else - if ic = "ui-icon-circle-zoomout" then ui_icon_circle_zoomout else - if ic = "ui-icon-circle-check" then ui_icon_circle_check else - if ic = "ui-icon-circlesmall-plus" then ui_icon_circlesmall_plus else - if ic = "ui-icon-circlesmall-minus" then ui_icon_circlesmall_minus else - if ic = "ui-icon-circlesmall-close" then ui_icon_circlesmall_close else - if ic = "ui-icon-squaresmall-plus" then ui_icon_squaresmall_plus else - if ic = "ui-icon-squaresmall-minus" then ui_icon_squaresmall_minus else - if ic = "ui-icon-squaresmall-close" then ui_icon_squaresmall_close else - if ic = "ui-icon-grip-dotted-vertical" then ui_icon_grip_dotted_vertical else - if ic = "ui-icon-grip-dotted-horizontal" then ui_icon_grip_dotted_horizontal else - if ic = "ui-icon-grip-solid-vertical" then ui_icon_grip_solid_vertical else - if ic = "ui-icon-grip-solid-horizontal" then ui_icon_grip_solid_horizontal else - if ic = "ui-icon-gripsmall-diagonal-se" then ui_icon_gripsmall_diagonal_se else - if ic = "ui-icon-grip-diagonal-se" then ui_icon_grip_diagonal_se else - if ic = "" then jq_icon_none else - jq_custom_icon(ic) - . diff --git a/web/CXM_jquery_tabs.anubis b/web/CXM_jquery_tabs.anubis deleted file mode 100644 index d01ac23..0000000 --- a/web/CXM_jquery_tabs.anubis +++ /dev/null @@ -1,94 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 04/09/2012 - * Time: 16:19 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read tools/basis.anubis - -public type JQuery_tab: - jQuery_tab(String title, HTML_Partial_Content content) -. - - // Helper to be compatible with the first version of JQuery_tab which - // take HTML_Off_Form as second argument instead of HTML_Partial_Content. - -public define JQuery_tab - jQuery_tab - ( - String title, - HTML_Off_Form content - )= - jQuery_tab(title, partial_content([], content)). - - -define HTML_Partial_Content - _jquery_tabs - ( - String tabs_container_id, - List(JQuery_tab) tabs, - String tabs_titles, - List(HTML_Off_Form) tabs_contents, - List(HTML_Head_Tag) tabs_heads, - Int count - ) - = - if tabs is - { - [ ] then - partial_content( - reverse(tabs_heads), - sequence([ - literal(""), - sequence(reverse(tabs_contents)) - ]) - ), - [ h . t ] then - if h is jQuery_tab(title, p_content) then - if p_content is partial_content(tags, content) then - _jquery_tabs( - tabs_container_id, - t, - tabs_titles + "
  • "+title+"
    • ", - [ - sequence([ - literal("
    "), - content, - literal("
    ") - ]) - . - tabs_contents - ], - tags + tabs_heads, - count+1 - ) - } - . - - -public define HTML_Partial_Content - jquery_tabs - ( - String tabs_container_id, - List(JQuery_tab) tabs - ) - = - if _jquery_tabs(tabs_container_id, tabs, "", [], [], 0) is partial_content(tags, html) then - partial_content( - [ - js_inline(script("", "$(document).ready(function(){$('#"+tabs_container_id+"').tabs();});")) - . - tags - ], - sequence([ - literal("
    "), - html, - literal("
    ") - ]) - ) - . - diff --git a/web/CXM_jquery_tiptip.anubis b/web/CXM_jquery_tiptip.anubis deleted file mode 100644 index c478f22..0000000 --- a/web/CXM_jquery_tiptip.anubis +++ /dev/null @@ -1,135 +0,0 @@ -/* - * Created by PyramIDE. - * User: Jeremy - * Date: 18/09/2012 - * Time: 15:42 - * - * To change this template use Tools | Options | Coding | Edit Standard Headers. - */ - -read calexium_lib/web/CXM_making_a_web_site.anubis -read calexium_lib/web/CXM_jquery.anubis -read tools/basis.anubis -read system/string.anubis -read system/convert.anubis - -/* jQuery tipTip position type */ -public type JQ_tiptip_position: - jq_tiptip_top, - jq_tiptip_left, - jq_tiptip_bottom, // is default - jq_tiptip_right -. - -/* position to string */ -public define String - jq_tiptip_position_to_string - ( - JQ_tiptip_position p - ) - = - if p is - { - jq_tiptip_top then "top", - jq_tiptip_left then "left", - jq_tiptip_bottom then "bottom", - jq_tiptip_right then "right" - } - . - -/* position to string */ -public define JQ_tiptip_position - string_to_jq_tiptip_position - ( - String s - ) - = - if s="top" then jq_tiptip_top - else if s="left" then jq_tiptip_left - else if s="bottom" then jq_tiptip_bottom - else if s="right" then jq_tiptip_right - else jq_tiptip_bottom //is default - . - -/* Initialize jQuery tipTip */ -public define List(HTML_Head_Tag) - jquery_tiptip_init - ( - String web_dir, - ) - = - [ - css(css_file("/css/jquery/tipTip.css")), - js(js_file("/js/jquery/jquery.tipTip.minified.js")) - ] - . - - -/* Create a tipTip tooltip with a HTML_Partial_Content and position */ -public define HTML_Partial_Content - jquery_tiptip - ( - String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! - String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix - HTML_Partial_Content tooltip_partial_content, - JQ_tiptip_position position - ) - = - if tooltip_partial_content is partial_content(head, body) then - partial_content( - [ - js_inline(script("", " - $(document).ready(function() - { - var tooltip_"+now+"=$('#"+tooltip_id+"-"+now+"').html(); - $('#"+rollovered_id+"').tipTip({maxWidth: 'auto', edgeOffset: 10, defaultPosition: \""+jq_tiptip_position_to_string(position)+"\", content: tooltip_"+now+"}); - }); - ")) - . - head - ], - sequence([ - literal("
    "), - body, - literal("
    ") - ]) - ) - . - -/* Create a tipTip tooltip with a HTML_Off_Form and position */ -public define HTML_Partial_Content - jquery_tiptip - ( - String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! - String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix - HTML_Off_Form html_content, - JQ_tiptip_position position - ) - = - jquery_tiptip(rollovered_id, tooltip_id, partial_content([], html_content), position) - . - -/* Create a tipTip tooltip with a HTML_Partial_Content */ -public define HTML_Partial_Content - jquery_tiptip - ( - String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! - String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix - HTML_Partial_Content tooltip_partial_content - ) - = - jquery_tiptip(rollovered_id, tooltip_id, tooltip_partial_content, jq_tiptip_bottom) - . - -/* Create a tipTip tooltip with a HTML_Off_Form */ -public define HTML_Partial_Content - jquery_tiptip - ( - String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! - String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix - HTML_Off_Form html_content - ) - = - jquery_tiptip(rollovered_id, tooltip_id, partial_content([], html_content)) - . - diff --git a/web/jQuery/CXM_jquery_button.anubis b/web/jQuery/CXM_jquery_button.anubis new file mode 100644 index 0000000..e77adcc --- /dev/null +++ b/web/jQuery/CXM_jquery_button.anubis @@ -0,0 +1,265 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 07/09/2012 + * Time: 15:10 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read calexium_lib/web/CXM_jquery.anubis +read calexium_lib/web/CXM_jquery_icons.anubis +read tools/basis.anubis +read system/string.anubis + + +public type JQuery_button: + jQuery_button( + String button_id, String button_name, String button_label, JQuery_Actioner actioner, JQuery_icon primary, JQuery_icon secondary // primary icon is for left icon, secondary icon is for right icon and button_id must set with an unique ID in order to have icons working + ) +. + +define String + jquery_button_get_onclick_action_window_options + ( + List(Other_Window_Option) options, + String formated_options + ) + = + if options is + { + [ ] then formated_options, + [ h . t ] then + if h is + { + resizable then + if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule + jquery_button_get_onclick_action_window_options( + t, + formated_options+"resizable='yes'" + ) + else + jquery_button_get_onclick_action_window_options( + t, + formated_options+", resizable='yes'" + ), + scrollbars then + if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule + jquery_button_get_onclick_action_window_options( + t, + formated_options+"scrollbars='yes'" + ) + else + jquery_button_get_onclick_action_window_options( + t, + formated_options+", scrollbars='yes'" + ), + width(w) then + if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule + jquery_button_get_onclick_action_window_options( + t, + formated_options+"width="+w + ) + else + jquery_button_get_onclick_action_window_options( + t, + formated_options+", width="+w + ), + height(h) then + if formated_options="" then // si c'est vide on ne prefixe pas avec une virgule + jquery_button_get_onclick_action_window_options( + t, + formated_options+"height="+h + ) + else + jquery_button_get_onclick_action_window_options( + t, + formated_options+", height="+h + ) + } + } + . + +define HTML_Head_Tag + jquery_button_get_onclick_action + ( + String button_id, + JQuery_Actioner actioner + ) + = + if actioner is jQuery_actioner(target, act_type, str) then + if target is + { + same then + if act_type is + { + jqform then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){$('#"+str+"').submit();});});")), + jqlink then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){document.location='"+str+"';});});")), + }, + same(label) then + if act_type is + { + jqform then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){$('#"+str+"').submit();});});")), + jqlink then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){document.location='"+str+"';});});")), + }, + other(window_name, window_options) then + if act_type is + { + jqform then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){$('#"+str+"').submit();});});")), //il s'agit d'une soumision d'un formulaire => cela se fait uniquement dans la même fenêtre ! + jqlink then js_inline(script("", "$(document).ready(function(){$('#"+button_id+"').click(function(){window.open('"+str+"', '"+window_name+"', '"+jquery_button_get_onclick_action_window_options(window_options, "")+"');});});")), + } + } + . + +define HTML_Partial_Content + _jquery_buttons + ( + List(JQuery_button) buttons, + List(HTML_Head_Tag) html_tags, + List(HTML_Off_Form) html_buttons + ) + = + if buttons is + { + [ ] then + partial_content( + reverse(html_tags), + sequence(reverse(html_buttons)) + ), + [ h . t ] then + if h is jQuery_button(id, name, label, actioner, primary, secondary) then + with onclick_action=jquery_button_get_onclick_action(id, actioner), + if id = "" then // if the ID is not set => we can't use icons in the buttonset. + _jquery_buttons( + t, + [ onclick_action . html_tags ], + [ + literal("") + . + html_buttons + ] + ) + else + if jquery_icon_to_string(primary) = "" then + if jquery_icon_to_string(secondary) = "" then + _jquery_buttons( + t, + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button();});")), + onclick_action + ] + +html_tags, + [ + literal("") + . + html_buttons + ] + ) + else + _jquery_buttons( + t, + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), + onclick_action + ] + +html_tags, + [ + literal("") + . + html_buttons + ] + ) + else + if jquery_icon_to_string(secondary) = "" then + _jquery_buttons( + t, + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"'}});});")), + onclick_action + ] + +html_tags, + [ + literal("") + . + html_buttons + ] + ) + else + _jquery_buttons( + t, + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"',secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), + onclick_action + ] + +html_tags, + [ + literal("") + . + html_buttons + ] + ) + } + . + +public define HTML_Partial_Content + jquery_buttons + ( + String buttons_container_id, + List(JQuery_button) buttons + ) + = + if _jquery_buttons(buttons, [], []) is partial_content(tags, html) then + partial_content( + [ js_inline(script("", "$(document).ready(function(){$('#"+buttons_container_id+"').buttonset();});")) ] + tags, + sequence([ + literal("
    "), + html, + literal("
    ") + ]) + ) + . + +public define HTML_Partial_Content + jquery_button + ( + JQuery_button button + ) + = + if button is jQuery_button(id, name, label, actioner, primary, secondary) then + with onclick_action=jquery_button_get_onclick_action(id, actioner), + if jquery_icon_to_string(primary) = "" then + if jquery_icon_to_string(secondary) = "" then + partial_content( + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button();});")), + onclick_action + ], + literal("") + ) + else + partial_content( + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), + onclick_action + ], + literal("") + ) + else + if jquery_icon_to_string(secondary) = "" then + partial_content( + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"'}});});")), + onclick_action + ], + literal("") + ) + else + partial_content( + [ + js_inline(script("", "$(document).ready(function(){$('#"+id+"').button({icons:{primary:'"+jquery_icon_to_string(primary)+"',secondary:'"+jquery_icon_to_string(secondary)+"'}});});")), + onclick_action + ], + literal("") + ) + . diff --git a/web/jQuery/CXM_jquery_datatable.anubis b/web/jQuery/CXM_jquery_datatable.anubis new file mode 100644 index 0000000..f542a02 --- /dev/null +++ b/web/jQuery/CXM_jquery_datatable.anubis @@ -0,0 +1,117 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 12/09/2012 + * Time: 16:14 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read calexium_lib/web/CXM_jquery.anubis +read calexium_lib/web/CXM_jquery_datatable_types.anubis +read calexium_lib/web/jquery/CXM_jquery_datatable_translation.anubis +read tools/basis.anubis +read system/string.anubis +read system/convert.anubis + +/* Initialize jQuery datatables */ +public define List(HTML_Head_Tag) + jquery_datatables_init + ( + String web_dir, + ) + = + [ + css(css_file("/css/jquery/jquery.dataTables.css")), + css(css_file("/css/jquery/jquery.dataTables_themeroller.css")), + js(js_file("/js/jquery/jquery.dataTables.min.js")) + ] + . + + +public define HTML_Partial_Content + jquery_datatable + ( + String table_id, + HTML_Off_Form table + ) + = + partial_content( + [ js_inline(script("", "$(document).ready(function(){$('#"+table_id+"').dataTable();});")) ], + table + ) + . + +public define HTML_Partial_Content + jquery_datatable + ( + String table_id, + HTML_Off_Form table, + Bool enable_jqueryui, + ) + = + if enable_jqueryui then + partial_content( + [ js_inline(script("", "$(document).ready(function(){$('#"+table_id+"').dataTable({\"bJQueryUI\":true});});")) ], + table + ) + else + jquery_datatable(table_id, table) + . + + +public define HTML_Partial_Content + jquery_datatable + ( + String table_id, + HTML_Off_Form table, + Bool enable_jqueryui, + Bool enable_pagination, + JQuery_datatable_pagination_type pagination_type, + Bool enable_change_page_length, // if true, "enable_pagination" must be true too. + Bool enable_search_field, + Bool enable_columns_sorting, + String lang + ) + = + partial_content( + [ + js_inline( + script( + "", + " + $(document).ready(function() + { + $('#"+table_id+"').dataTable( + { + \"bJQueryUI\":"+to_String(enable_jqueryui)+", + \"sPaginationType\":'"+jquery_datatable_pagination_type_to_string(pagination_type)+"', + \"bFilter\":"+to_String(enable_search_field)+", + \"bPaginate\":"+to_String(enable_pagination)+", + \"bLengthChange\":"+to_String(enable_change_page_length)+", + \"bSort\":"+to_String(enable_columns_sorting)+","+ + get_datatable_translation(lang)+" + }); + }); + " + ) + ) + ], + table + ) + . + +public define HTML_Partial_Content + jquery_datatable + ( + String table_id, + HTML_Off_Form table, + Bool enable_jqueryui, + Bool enable_pagination, + JQuery_datatable_pagination_type pagination_type, + Bool enable_change_page_length, // if true, "enable_pagination" must be true too. + Bool enable_search_field, + Bool enable_columns_sorting + ) = + jquery_datatable(table_id, table, enable_jqueryui, enable_pagination, pagination_type, enable_change_page_length, enable_search_field, enable_columns_sorting, "en"). diff --git a/web/jQuery/CXM_jquery_datatable_types.anubis b/web/jQuery/CXM_jquery_datatable_types.anubis new file mode 100644 index 0000000..5960d5a --- /dev/null +++ b/web/jQuery/CXM_jquery_datatable_types.anubis @@ -0,0 +1,42 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 13/09/2012 + * Time: 10:12 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read tools/basis.anubis +read system/string.anubis + +public type JQuery_datatable_pagination_type: + jq_dt_pt_two_button, //default option + jq_dt_pt_full_numbers +. + +public define String + jquery_datatable_pagination_type_to_string + ( + JQuery_datatable_pagination_type pt + ) + = + if pt is + { + jq_dt_pt_two_button then "two_button", + jq_dt_pt_full_numbers then "full_numbers" + } + . + +public define JQuery_datatable_pagination_type + string_to_jquery_datatable_pagination_type + ( + String str + ) + = + with st=to_lower(str), + if st="two_button" then jq_dt_pt_two_button else + if st="full_numbers" then jq_dt_pt_full_numbers else + jq_dt_pt_two_button + . diff --git a/web/jQuery/CXM_jquery_eudock.anubis b/web/jQuery/CXM_jquery_eudock.anubis new file mode 100644 index 0000000..ed2821f --- /dev/null +++ b/web/jQuery/CXM_jquery_eudock.anubis @@ -0,0 +1,196 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 18/09/2012 + * Time: 17:28 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read calexium_lib/web/CXM_jquery.anubis +read calexium_lib/web/CXM_jquery_eudock_types.anubis +read tools/basis.anubis +read system/string.anubis +read system/convert.anubis + +/********************************************************************************************************/ +/********************************************************************************************************/ +/********************************************************************************************************/ +/********************************************************************************************************/ +/**************************************** ATTENTION !!! *******************************************/ +/************* Le mode 'object_alignment' n'est pas fonctionnel : NE PAS L'UTILISER ! ****************/ +/************************ Un recodage en jQuery de la lib JS est à prévoir **************************/ +/********************************************************************************************************/ +/********************************************************************************************************/ +/********************************************************************************************************/ +/********************************************************************************************************/ + +/* jQuery euDock initialization */ +public define List(HTML_Head_Tag) + jquery_eudock_init + ( + String web_dir, + ) + = + [ + js(js_file("/js/jquery/euDock.2.0.js")), + //js(js_file("/js/jquery/euDock.Blank.js")), // not needed for now + //js(js_file("/js/jquery/euDock.DivMousePos.js")), // not needed for now + //js(js_file("/js/jquery/euDock.Ghost.js")), // not needed for now + js(js_file("/js/jquery/euDock.Image.js")), + //js(js_file("/js/jquery/euDock.Label.js")) // not needed for now + ] + . + +/* Recursive format of the bar */ +define String + _jquery_eudock_format_bar + ( + List(JQ_eudock_imagebar) bar_images, + String formatted + ) + = + if bar_images is + { + [] then formatted, + [ h . t ] then + if h is + { + jq_eudock_bar_top(image) then + if t is + { + [] then _jquery_eudock_format_bar(t, formatted+"top :{euImage:{image:'"+image.image_url+"'}}"), + [ h . t] then _jquery_eudock_format_bar(t, formatted+"top :{euImage:{image:'"+image.image_url+"'}},") + }, + jq_eudock_bar_vertical(image) then + if t is + { + [] then _jquery_eudock_format_bar(t, formatted+"vertical :{euImage:{image:'"+image.image_url+"'}}"), + [ h . t] then _jquery_eudock_format_bar(t, formatted+"vertical :{euImage:{image:'"+image.image_url+"'}},") + }, + jq_eudock_bar_bottom(image) then + if t is + { + [] then _jquery_eudock_format_bar(t, formatted+"bottom :{euImage:{image:'"+image.image_url+"'}}"), + [ h . t] then _jquery_eudock_format_bar(t, formatted+"bottom :{euImage:{image:'"+image.image_url+"'}},") + }, + jq_eudock_bar_left(image) then + if t is + { + [] then _jquery_eudock_format_bar(t, formatted+"left :{euImage:{image:'"+image.image_url+"'}}"), + [ h . t] then _jquery_eudock_format_bar(t, formatted+"left :{euImage:{image:'"+image.image_url+"'}},") + }, + jq_eudock_bar_horizontal(image) then + if t is + { + [] then _jquery_eudock_format_bar(t, formatted+"horizontal :{euImage:{image:'"+image.image_url+"'}}"), + [ h . t] then _jquery_eudock_format_bar(t, formatted+"horizontal :{euImage:{image:'"+image.image_url+"'}},") + }, + jq_eudock_bar_right(image) then + if t is + { + [] then _jquery_eudock_format_bar(t, formatted+"right :{euImage:{image:'"+image.image_url+"'}}"), + [ h . t] then _jquery_eudock_format_bar(t, formatted+"right :{euImage:{image:'"+image.image_url+"'}},") + } + } + } + . + +/* Format the bar */ +define String + jquery_eudock_format_bar + ( + String dockname, + JQ_eudock_bar bar + ) + = + dockname+".setBar({"+ + _jquery_eudock_format_bar(bar.bar_images, "")+ + "});" + . + +/* Format 1 icon */ +define String + _jquery_eudock_format_icon + ( + String dockname, + JQ_euDock_Icon icon + ) + = + if icon is jq_eudock_icon(icon_image, link) then + " "+dockname+".addIcon(new Array({euImage:{image:'"+icon_image.image_url+"'}}), {link:'"+link+"'});\n" // space added at the beginning to avoid any js syntax error + . + +/* Format icons */ +define String + _jquery_eudock_format_icons + ( + String dockname, + List(JQ_euDock_Icon) icons, + String formatted + ) + = + if icons is + { + [] then formatted, + [ h . t ] then + _jquery_eudock_format_icons(dockname, t, formatted+ _jquery_eudock_format_icon(dockname, h)) + } + . + +/* Format icons */ +define String + jquery_eudock_format_icons + ( + String dockname, + List(JQ_euDock_Icon) icons + ) + = + _jquery_eudock_format_icons(dockname, icons, "") + . + +/* Format alignment */ +define String + jquery_eudock_format_alignment + ( + String dockname, + JQ_euDock_alignment alignment + ) + = + if alignment is + { + jq_eudock_screen_alignment(a, o) then + dockname+".setScreenAlign("+jq_eudock_align_to_string(a)+", "+o+");", + jq_eudock_object_alignment(o_id, o_al, o, p) then + dockname+".setObjectAlign('"+o_id+"', "+jq_eudock_object_align_to_string(o_al)+", "+o+", "+jq_eudock_position_to_string(p)+");", + jq_eudock_fixed_alignment(x, y, p) then + dockname+".setPointAlign("+x+", "+y+", "+jq_eudock_position_to_string(p)+");" + } + // "+dockname+".setScreenAlign("+jq_eudock_position_to_string(position)+",0); + . + +/* Creation of an euDock */ +public define HTML_Partial_Content + jquery_eudock + ( + JQ_euDock dock + ) + = + with dockname="dock_"+now, // dock name is suffixed with a timestamp to guarantee its uniqueness + if dock is jq_eudock(bar, icons, icon_offset, alignment) then + partial_content + ( + [ + js_inline(script("", " + euEnv.imageBasePath=\"\"; + var "+dockname+"=new euDock(); + "+jquery_eudock_format_alignment(dockname, alignment)+" + "+jquery_eudock_format_bar(dockname, bar)+" + "+dockname+".setIconsOffset("+icon_offset+"); + "+jquery_eudock_format_icons(dockname, icons)+" + ")) + ], + literal("") // euDock does not need to return HTML content => it's javascript only ! + ) + . diff --git a/web/jQuery/CXM_jquery_eudock_types.anubis b/web/jQuery/CXM_jquery_eudock_types.anubis new file mode 100644 index 0000000..b6dd0bd --- /dev/null +++ b/web/jQuery/CXM_jquery_eudock_types.anubis @@ -0,0 +1,194 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 18/09/2012 + * Time: 17:48 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read calexium_lib/web/CXM_jquery.anubis +read tools/basis.anubis +read system/string.anubis +read system/convert.anubis + +/* jQuery euDock "euImage" type */ +public type JQ_euDock_euImage: + jq_eudock_euimage(String image_url) // url must be set from web server root. example: "/images/mydock/icon-1.png" +. + +/* jQuery euDock image bar type */ +public type JQ_eudock_imagebar: + jq_eudock_bar_top(JQ_euDock_euImage image), + jq_eudock_bar_vertical(JQ_euDock_euImage image), + jq_eudock_bar_bottom(JQ_euDock_euImage image), + jq_eudock_bar_left(JQ_euDock_euImage image), + jq_eudock_bar_horizontal(JQ_euDock_euImage image), + jq_eudock_bar_right(JQ_euDock_euImage image) +. + +/* jQuery euDock bar type */ +public type JQ_eudock_bar: + jq_eudock_bar(List(JQ_eudock_imagebar) bar_images) +. + +/* jQuery euDock align type */ +public type JQ_eudock_align: + jq_eudock_align_top, + jq_eudock_align_left, + jq_eudock_align_bottom, + jq_eudock_align_right +. + +/* JQ_eudock_align to string */ +public define String + jq_eudock_align_to_string + ( + JQ_eudock_align a + ) + = + if a is + { + jq_eudock_align_top then "euUP", + jq_eudock_align_left then "euLEFT", + jq_eudock_align_bottom then "euDOWN", + jq_eudock_align_right then "euRIGHT" + } + . + +/* string to JQ_eudock_align */ +public define JQ_eudock_align + string_to_jq_eudock_align + ( + String s + ) + = + if s="euUP" then jq_eudock_align_top + else if s="euLEFT" then jq_eudock_align_left + else if s="euDOWN" then jq_eudock_align_bottom + else if s="euRIGHT" then jq_eudock_align_right + else jq_eudock_align_top // we decide that top position is default. + . + +/* jQuery euDock position type */ +public type JQ_eudock_position: + jq_eudock_position_top, + jq_eudock_position_left, + jq_eudock_position_bottom, + jq_eudock_position_right, + jq_eudock_position_horizontal, + jq_eudock_position_vertical +. + +/* JQ_eudock_position to string */ +public define String + jq_eudock_position_to_string + ( + JQ_eudock_position p + ) + = + if p is + { + jq_eudock_position_top then "euUP", + jq_eudock_position_left then "euLEFT", + jq_eudock_position_bottom then "euDOWN", + jq_eudock_position_right then "euRIGHT", + jq_eudock_position_horizontal then "euHORIZONTAL", + jq_eudock_position_vertical then "euVERTICAL" + } + . + +/* string to JQ_eudock_position */ +public define JQ_eudock_position + string_to_jq_eudock_position + ( + String s + ) + = + if s="euUP" then jq_eudock_position_top + else if s="euLEFT" then jq_eudock_position_left + else if s="euDOWN" then jq_eudock_position_bottom + else if s="euRIGHT" then jq_eudock_position_right + else if s="euHORIZONTAL" then jq_eudock_position_horizontal + else if s="euVERTICAL" then jq_eudock_position_vertical + else jq_eudock_position_top // we decide that top position is default. + . + +/* jQuery euDock objectAlign type */ +public type JQ_eudock_object_align: + jq_eudock_object_align_top, + jq_eudock_object_align_left, + jq_eudock_object_align_bottom, + jq_eudock_object_align_right, + jq_eudock_object_align_center +. + +/* JQ_eudock_object_align to string */ +public define String + jq_eudock_object_align_to_string + ( + JQ_eudock_object_align oa + ) + = + if oa is + { + jq_eudock_object_align_top then "euUP", + jq_eudock_object_align_left then "euLEFT", + jq_eudock_object_align_bottom then "euDOWN", + jq_eudock_object_align_right then "euRIGHT", + jq_eudock_object_align_center then "euCENTER" + } + . + +/* string to JQ_eudock_object_align */ +public define JQ_eudock_object_align + string_to_jq_eudock_object_align + ( + String s + ) + = + if s="euUP" then jq_eudock_object_align_top + else if s="euLEFT" then jq_eudock_object_align_left + else if s="euDOWN" then jq_eudock_object_align_bottom + else if s="euRIGHT" then jq_eudock_object_align_right + else if s="euCENTER" then jq_eudock_object_align_center + else jq_eudock_object_align_top // we decide that top position is default. + . + +/* jQuery euDock alignment */ +public type JQ_euDock_alignment: + jq_eudock_screen_alignment( + JQ_eudock_align align, + Int offset /* see icon_offset in JQ_euDock type definition */ + ), + jq_eudock_object_alignment( + String object_id, + JQ_eudock_object_align object_align, + Int offset, /* see icon_offset in JQ_euDock type definition */ + JQ_eudock_position position + ), + jq_eudock_fixed_alignment( + Int x, + Int y, + JQ_eudock_position position + ) +. + +/* jQuery euDock icon type */ +public type JQ_euDock_Icon: + jq_eudock_icon( + JQ_euDock_euImage icon_image, + String link + ) +. + +/* jQuery "euDock" type */ +public type JQ_euDock: + jq_eudock( + JQ_eudock_bar bar, // it's the "graphical bar" under icons. + List(JQ_euDock_Icon) icons, + Int icon_offset, // number of icons should be let in "blank space". Example: if icon size is 32px and icon_offset is 2 => the first icon is displayed 64px from the "left" border of the dock and the last icon is displayed 64px from the "right" border of the dock + JQ_euDock_alignment alignment // dock position + ) +. diff --git a/web/jQuery/CXM_jquery_icons.anubis b/web/jQuery/CXM_jquery_icons.anubis new file mode 100644 index 0000000..f456bb2 --- /dev/null +++ b/web/jQuery/CXM_jquery_icons.anubis @@ -0,0 +1,560 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 08/09/2012 + * Time: 16:35 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read tools/basis.anubis +read system/string.anubis + +public type JQuery_icon: + ui_icon_carat_1_n, + ui_icon_carat_1_ne, + ui_icon_carat_1_e, + ui_icon_carat_1_se, + ui_icon_carat_1_s, + ui_icon_carat_1_sw, + ui_icon_carat_1_w, + ui_icon_carat_1_nw, + ui_icon_carat_2_n_s, + ui_icon_carat_2_e_w, + ui_icon_triangle_1_n, + ui_icon_triangle_1_ne, + ui_icon_triangle_1_e, + ui_icon_triangle_1_se, + ui_icon_triangle_1_s, + ui_icon_triangle_1_sw, + ui_icon_triangle_1_w, + ui_icon_triangle_1_nw, + ui_icon_triangle_2_n_s, + ui_icon_triangle_2_e_w, + ui_icon_arrow_1_n, + ui_icon_arrow_1_ne, + ui_icon_arrow_1_e, + ui_icon_arrow_1_se, + ui_icon_arrow_1_s, + ui_icon_arrow_1_sw, + ui_icon_arrow_1_w, + ui_icon_arrow_1_nw, + ui_icon_arrow_2_n_s, + ui_icon_arrow_2_ne_sw, + ui_icon_arrow_2_e_w, + ui_icon_arrow_2_se_nw, + ui_icon_arrowstop_1_n, + ui_icon_arrowstop_1_e, + ui_icon_arrowstop_1_s, + ui_icon_arrowstop_1_w, + ui_icon_arrowthick_1_n, + ui_icon_arrowthick_1_ne, + ui_icon_arrowthick_1_e, + ui_icon_arrowthick_1_se, + ui_icon_arrowthick_1_s, + ui_icon_arrowthick_1_sw, + ui_icon_arrowthick_1_w, + ui_icon_arrowthick_1_nw, + ui_icon_arrowthick_2_n_s, + ui_icon_arrowthick_2_ne_sw, + ui_icon_arrowthick_2_e_w, + ui_icon_arrowthick_2_se_nw, + ui_icon_arrowthickstop_1_n, + ui_icon_arrowthickstop_1_e, + ui_icon_arrowthickstop_1_s, + ui_icon_arrowthickstop_1_w, + ui_icon_arrowreturnthick_1_w, + ui_icon_arrowreturnthick_1_n, + ui_icon_arrowreturnthick_1_e, + ui_icon_arrowreturnthick_1_s, + ui_icon_arrowreturn_1_w, + ui_icon_arrowreturn_1_n, + ui_icon_arrowreturn_1_e, + ui_icon_arrowreturn_1_s, + ui_icon_arrowrefresh_1_w, + ui_icon_arrowrefresh_1_n, + ui_icon_arrowrefresh_1_e, + ui_icon_arrowrefresh_1_s, + ui_icon_arrow_4, + ui_icon_arrow_4_diag, + ui_icon_extlink, + ui_icon_newwin, + ui_icon_refresh, + ui_icon_shuffle, + ui_icon_transfer_e_w, + ui_icon_transferthick_e_w, + ui_icon_folder_collapsed, + ui_icon_folder_open, + ui_icon_document, + ui_icon_document_b, + ui_icon_note, + ui_icon_mail_closed, + ui_icon_mail_open, + ui_icon_suitcase, + ui_icon_comment, + ui_icon_person, + ui_icon_print, + ui_icon_trash, + ui_icon_locked, + ui_icon_unlocked, + ui_icon_bookmark, + ui_icon_tag, + ui_icon_home, + ui_icon_flag, + ui_icon_calculator, + ui_icon_cart, + ui_icon_pencil, + ui_icon_clock, + ui_icon_disk, + ui_icon_calendar, + ui_icon_zoomin, + ui_icon_zoomout, + ui_icon_search, + ui_icon_wrench, + ui_icon_gear, + ui_icon_heart, + ui_icon_star, + ui_icon_link, + ui_icon_cancel, + ui_icon_plus, + ui_icon_plusthick, + ui_icon_minus, + ui_icon_minusthick, + ui_icon_close, + ui_icon_closethick, + ui_icon_key, + ui_icon_lightbulb, + ui_icon_scissors, + ui_icon_clipboard, + ui_icon_copy, + ui_icon_contact, + ui_icon_image, + ui_icon_video, + ui_icon_script, + ui_icon_alert, + ui_icon_info, + ui_icon_notice, + ui_icon_help, + ui_icon_check, + ui_icon_bullet, + ui_icon_radio_off, + ui_icon_radio_on, + ui_icon_pin_w, + ui_icon_pin_s, + ui_icon_play, + ui_icon_pause, + ui_icon_seek_next, + ui_icon_seek_prev, + ui_icon_seek_end, + ui_icon_seek_first, + ui_icon_stop, + ui_icon_eject, + ui_icon_volume_off, + ui_icon_volume_on, + ui_icon_power, + ui_icon_signal_diag, + ui_icon_signal, + ui_icon_battery_0, + ui_icon_battery_1, + ui_icon_battery_2, + ui_icon_battery_3, + ui_icon_circle_plus, + ui_icon_circle_minus, + ui_icon_circle_close, + ui_icon_circle_triangle_e, + ui_icon_circle_triangle_s, + ui_icon_circle_triangle_w, + ui_icon_circle_triangle_n, + ui_icon_circle_arrow_e, + ui_icon_circle_arrow_s, + ui_icon_circle_arrow_w, + ui_icon_circle_arrow_n, + ui_icon_circle_zoomin, + ui_icon_circle_zoomout, + ui_icon_circle_check, + ui_icon_circlesmall_plus, + ui_icon_circlesmall_minus, + ui_icon_circlesmall_close, + ui_icon_squaresmall_plus, + ui_icon_squaresmall_minus, + ui_icon_squaresmall_close, + ui_icon_grip_dotted_vertical, + ui_icon_grip_dotted_horizontal, + ui_icon_grip_solid_vertical, + ui_icon_grip_solid_horizontal, + ui_icon_gripsmall_diagonal_se, + ui_icon_grip_diagonal_se, + jq_icon_none, + jq_custom_icon(String) // for custom icon => set it to CSS class name used to display icon => for creating a such CSS class please refer to jQueryUI Theme CSS file and see how it's done with the othe icon classes +. + +public define String + jquery_icon_to_string + ( + JQuery_icon icon + ) + = + if icon is + { + ui_icon_carat_1_n then "ui-icon-carat-1-n", + ui_icon_carat_1_ne then "ui-icon-carat-1-ne", + ui_icon_carat_1_e then "ui-icon-carat-1-e", + ui_icon_carat_1_se then "ui-icon-carat-1-se", + ui_icon_carat_1_s then "ui-icon-carat-1-s", + ui_icon_carat_1_sw then "ui-icon-carat-1-sw", + ui_icon_carat_1_w then "ui-icon-carat-1-w", + ui_icon_carat_1_nw then "ui-icon-carat-1-nw", + ui_icon_carat_2_n_s then "ui-icon-carat-2-n-s", + ui_icon_carat_2_e_w then "ui-icon-carat-2-e-w", + ui_icon_triangle_1_n then "ui-icon-triangle-1-n", + ui_icon_triangle_1_ne then "ui-icon-triangle-1-ne", + ui_icon_triangle_1_e then "ui-icon-triangle-1-e", + ui_icon_triangle_1_se then "ui-icon-triangle-1-se", + ui_icon_triangle_1_s then "ui-icon-triangle-1-s", + ui_icon_triangle_1_sw then "ui-icon-triangle-1-sw", + ui_icon_triangle_1_w then "ui-icon-triangle-1-w", + ui_icon_triangle_1_nw then "ui-icon-triangle-1-nw", + ui_icon_triangle_2_n_s then "ui-icon-triangle-2-n-s", + ui_icon_triangle_2_e_w then "ui-icon-triangle-2-e-w", + ui_icon_arrow_1_n then "ui-icon-arrow-1-n", + ui_icon_arrow_1_ne then "ui-icon-arrow-1-ne", + ui_icon_arrow_1_e then "ui-icon-arrow-1-e", + ui_icon_arrow_1_se then "ui-icon-arrow-1-se", + ui_icon_arrow_1_s then "ui-icon-arrow-1-s", + ui_icon_arrow_1_sw then "ui-icon-arrow-1-sw", + ui_icon_arrow_1_w then "ui-icon-arrow-1-w", + ui_icon_arrow_1_nw then "ui-icon-arrow-1-nw", + ui_icon_arrow_2_n_s then "ui-icon-arrow-2-n-s", + ui_icon_arrow_2_ne_sw then "ui-icon-arrow-2-ne-sw", + ui_icon_arrow_2_e_w then "ui-icon-arrow-2-e-w", + ui_icon_arrow_2_se_nw then "ui-icon-arrow-2-se-nw", + ui_icon_arrowstop_1_n then "ui-icon-arrowstop-1-n", + ui_icon_arrowstop_1_e then "ui-icon-arrowstop-1-e", + ui_icon_arrowstop_1_s then "ui-icon-arrowstop-1-s", + ui_icon_arrowstop_1_w then "ui-icon-arrowstop-1-w", + ui_icon_arrowthick_1_n then "ui-icon-arrowthick-1-n", + ui_icon_arrowthick_1_ne then "ui-icon-arrowthick-1-ne", + ui_icon_arrowthick_1_e then "ui-icon-arrowthick-1-e", + ui_icon_arrowthick_1_se then "ui-icon-arrowthick-1-se", + ui_icon_arrowthick_1_s then "ui-icon-arrowthick-1-s", + ui_icon_arrowthick_1_sw then "ui-icon-arrowthick-1-sw", + ui_icon_arrowthick_1_w then "ui-icon-arrowthick-1-w", + ui_icon_arrowthick_1_nw then "ui-icon-arrowthick-1-nw", + ui_icon_arrowthick_2_n_s then "ui-icon-arrowthick-2-n-s", + ui_icon_arrowthick_2_ne_sw then "ui-icon-arrowthick-2-ne-sw", + ui_icon_arrowthick_2_e_w then "ui-icon-arrowthick-2-e-w", + ui_icon_arrowthick_2_se_nw then "ui-icon-arrowthick-2-se-nw", + ui_icon_arrowthickstop_1_n then "ui-icon-arrowthickstop-1-n", + ui_icon_arrowthickstop_1_e then "ui-icon-arrowthickstop-1-e", + ui_icon_arrowthickstop_1_s then "ui-icon-arrowthickstop-1-s", + ui_icon_arrowthickstop_1_w then "ui-icon-arrowthickstop-1-w", + ui_icon_arrowreturnthick_1_w then "ui-icon-arrowreturnthick-1-w", + ui_icon_arrowreturnthick_1_n then "ui-icon-arrowreturnthick-1-n", + ui_icon_arrowreturnthick_1_e then "ui-icon-arrowreturnthick-1-e", + ui_icon_arrowreturnthick_1_s then "ui-icon-arrowreturnthick-1-s", + ui_icon_arrowreturn_1_w then "ui-icon-arrowreturn-1-w", + ui_icon_arrowreturn_1_n then "ui-icon-arrowreturn-1-n", + ui_icon_arrowreturn_1_e then "ui-icon-arrowreturn-1-e", + ui_icon_arrowreturn_1_s then "ui-icon-arrowreturn-1-s", + ui_icon_arrowrefresh_1_w then "ui-icon-arrowrefresh-1-w", + ui_icon_arrowrefresh_1_n then "ui-icon-arrowrefresh-1-n", + ui_icon_arrowrefresh_1_e then "ui-icon-arrowrefresh-1-e", + ui_icon_arrowrefresh_1_s then "ui-icon-arrowrefresh-1-s", + ui_icon_arrow_4 then "ui-icon-arrow-4", + ui_icon_arrow_4_diag then "ui-icon-arrow-4-diag", + ui_icon_extlink then "ui-icon-extlink", + ui_icon_newwin then "ui-icon-newwin", + ui_icon_refresh then "ui-icon-refresh", + ui_icon_shuffle then "ui-icon-shuffle", + ui_icon_transfer_e_w then "ui-icon-transfer-e-w", + ui_icon_transferthick_e_w then "ui-icon-transferthick-e-w", + ui_icon_folder_collapsed then "ui-icon-folder-collapsed", + ui_icon_folder_open then "ui-icon-folder-open", + ui_icon_document then "ui-icon-document", + ui_icon_document_b then "ui-icon-document-b", + ui_icon_note then "ui-icon-note", + ui_icon_mail_closed then "ui-icon-mail-closed", + ui_icon_mail_open then "ui-icon-mail-open", + ui_icon_suitcase then "ui-icon-suitcase", + ui_icon_comment then "ui-icon-comment", + ui_icon_person then "ui-icon-person", + ui_icon_print then "ui-icon-print", + ui_icon_trash then "ui-icon-trash", + ui_icon_locked then "ui-icon-locked", + ui_icon_unlocked then "ui-icon-unlocked", + ui_icon_bookmark then "ui-icon-bookmark", + ui_icon_tag then "ui-icon-tag", + ui_icon_home then "ui-icon-home", + ui_icon_flag then "ui-icon-flag", + ui_icon_calculator then "ui-icon-calculator", + ui_icon_cart then "ui-icon-cart", + ui_icon_pencil then "ui-icon-pencil", + ui_icon_clock then "ui-icon-clock", + ui_icon_disk then "ui-icon-disk", + ui_icon_calendar then "ui-icon-calendar", + ui_icon_zoomin then "ui-icon-zoomin", + ui_icon_zoomout then "ui-icon-zoomout", + ui_icon_search then "ui-icon-search", + ui_icon_wrench then "ui-icon-wrench", + ui_icon_gear then "ui-icon-gear", + ui_icon_heart then "ui-icon-heart", + ui_icon_star then "ui-icon-star", + ui_icon_link then "ui-icon-link", + ui_icon_cancel then "ui-icon-cancel", + ui_icon_plus then "ui-icon-plus", + ui_icon_plusthick then "ui-icon-plusthick", + ui_icon_minus then "ui-icon-minus", + ui_icon_minusthick then "ui-icon-minusthick", + ui_icon_close then "ui-icon-close", + ui_icon_closethick then "ui-icon-closethick", + ui_icon_key then "ui-icon-key", + ui_icon_lightbulb then "ui-icon-lightbulb", + ui_icon_scissors then "ui-icon-scissors", + ui_icon_clipboard then "ui-icon-clipboard", + ui_icon_copy then "ui-icon-copy", + ui_icon_contact then "ui-icon-contact", + ui_icon_image then "ui-icon-image", + ui_icon_video then "ui-icon-video", + ui_icon_script then "ui-icon-script", + ui_icon_alert then "ui-icon-alert", + ui_icon_info then "ui-icon-info", + ui_icon_notice then "ui-icon-notice", + ui_icon_help then "ui-icon-help", + ui_icon_check then "ui-icon-check", + ui_icon_bullet then "ui-icon-bullet", + ui_icon_radio_off then "ui-icon-radio-off", + ui_icon_radio_on then "ui-icon-radio-on", + ui_icon_pin_w then "ui-icon-pin-w", + ui_icon_pin_s then "ui-icon-pin-s", + ui_icon_play then "ui-icon-play", + ui_icon_pause then "ui-icon-pause", + ui_icon_seek_next then "ui-icon-seek-next", + ui_icon_seek_prev then "ui-icon-seek-prev", + ui_icon_seek_end then "ui-icon-seek-end", + ui_icon_seek_first then "ui-icon-seek-first", + ui_icon_stop then "ui-icon-stop", + ui_icon_eject then "ui-icon-eject", + ui_icon_volume_off then "ui-icon-volume-off", + ui_icon_volume_on then "ui-icon-volume-on", + ui_icon_power then "ui-icon-power", + ui_icon_signal_diag then "ui-icon-signal-diag", + ui_icon_signal then "ui-icon-signal", + ui_icon_battery_0 then "ui-icon-battery-0", + ui_icon_battery_1 then "ui-icon-battery-1", + ui_icon_battery_2 then "ui-icon-battery-2", + ui_icon_battery_3 then "ui-icon-battery-3", + ui_icon_circle_plus then "ui-icon-circle-plus", + ui_icon_circle_minus then "ui-icon-circle-minus", + ui_icon_circle_close then "ui-icon-circle-close", + ui_icon_circle_triangle_e then "ui-icon-circle-triangle-e", + ui_icon_circle_triangle_s then "ui-icon-circle-triangle-s", + ui_icon_circle_triangle_w then "ui-icon-circle-triangle-w", + ui_icon_circle_triangle_n then "ui-icon-circle-triangle-n", + ui_icon_circle_arrow_e then "ui-icon-circle-arrow-e", + ui_icon_circle_arrow_s then "ui-icon-circle-arrow-s", + ui_icon_circle_arrow_w then "ui-icon-circle-arrow-w", + ui_icon_circle_arrow_n then "ui-icon-circle-arrow-n", + ui_icon_circle_zoomin then "ui-icon-circle-zoomin", + ui_icon_circle_zoomout then "ui-icon-circle-zoomout", + ui_icon_circle_check then "ui-icon-circle-check", + ui_icon_circlesmall_plus then "ui-icon-circlesmall-plus", + ui_icon_circlesmall_minus then "ui-icon-circlesmall-minus", + ui_icon_circlesmall_close then "ui-icon-circlesmall-close", + ui_icon_squaresmall_plus then "ui-icon-squaresmall-plus", + ui_icon_squaresmall_minus then "ui-icon-squaresmall-minus", + ui_icon_squaresmall_close then "ui-icon-squaresmall-close", + ui_icon_grip_dotted_vertical then "ui-icon-grip-dotted-vertical", + ui_icon_grip_dotted_horizontal then "ui-icon-grip-dotted-horizontal", + ui_icon_grip_solid_vertical then "ui-icon-grip-solid-vertical", + ui_icon_grip_solid_horizontal then "ui-icon-grip-solid-horizontal", + ui_icon_gripsmall_diagonal_se then "ui-icon-gripsmall-diagonal-se", + ui_icon_grip_diagonal_se then "ui-icon-grip-diagonal-se", + jq_icon_none then "", + jq_custom_icon(str) then str + } + . + +public define JQuery_icon + string_to_jquery_icon + ( + String icon_class + ) + = + with ic=to_lower(icon_class), + if ic = "ui-icon-carat-1-n" then ui_icon_carat_1_n else + if ic = "ui-icon-carat-1-ne" then ui_icon_carat_1_ne else + if ic = "ui-icon-carat-1-e" then ui_icon_carat_1_e else + if ic = "ui-icon-carat-1-se" then ui_icon_carat_1_se else + if ic = "ui-icon-carat-1-s" then ui_icon_carat_1_s else + if ic = "ui-icon-carat-1-sw" then ui_icon_carat_1_sw else + if ic = "ui-icon-carat-1-w" then ui_icon_carat_1_w else + if ic = "ui-icon-carat-1-nw" then ui_icon_carat_1_nw else + if ic = "ui-icon-carat-2-n-s" then ui_icon_carat_2_n_s else + if ic = "ui-icon-carat-2-e-w" then ui_icon_carat_2_e_w else + if ic = "ui-icon-triangle-1-n" then ui_icon_triangle_1_n else + if ic = "ui-icon-triangle-1-ne" then ui_icon_triangle_1_ne else + if ic = "ui-icon-triangle-1-e" then ui_icon_triangle_1_e else + if ic = "ui-icon-triangle-1-se" then ui_icon_triangle_1_se else + if ic = "ui-icon-triangle-1-s" then ui_icon_triangle_1_s else + if ic = "ui-icon-triangle-1-sw" then ui_icon_triangle_1_sw else + if ic = "ui-icon-triangle-1-w" then ui_icon_triangle_1_w else + if ic = "ui-icon-triangle-1-nw" then ui_icon_triangle_1_nw else + if ic = "ui-icon-triangle-2-n-s" then ui_icon_triangle_2_n_s else + if ic = "ui-icon-triangle-2-e-w" then ui_icon_triangle_2_e_w else + if ic = "ui-icon-arrow-1-n" then ui_icon_arrow_1_n else + if ic = "ui-icon-arrow-1-ne" then ui_icon_arrow_1_ne else + if ic = "ui-icon-arrow-1-e" then ui_icon_arrow_1_e else + if ic = "ui-icon-arrow-1-se" then ui_icon_arrow_1_se else + if ic = "ui-icon-arrow-1-s" then ui_icon_arrow_1_s else + if ic = "ui-icon-arrow-1-sw" then ui_icon_arrow_1_sw else + if ic = "ui-icon-arrow-1-w" then ui_icon_arrow_1_w else + if ic = "ui-icon-arrow-1-nw" then ui_icon_arrow_1_nw else + if ic = "ui-icon-arrow-2-n-s" then ui_icon_arrow_2_n_s else + if ic = "ui-icon-arrow-2-ne-sw" then ui_icon_arrow_2_ne_sw else + if ic = "ui-icon-arrow-2-e-w" then ui_icon_arrow_2_e_w else + if ic = "ui-icon-arrow-2-se-nw" then ui_icon_arrow_2_se_nw else + if ic = "ui-icon-arrowstop-1-n" then ui_icon_arrowstop_1_n else + if ic = "ui-icon-arrowstop-1-e" then ui_icon_arrowstop_1_e else + if ic = "ui-icon-arrowstop-1-s" then ui_icon_arrowstop_1_s else + if ic = "ui-icon-arrowstop-1-w" then ui_icon_arrowstop_1_w else + if ic = "ui-icon-arrowthick-1-n" then ui_icon_arrowthick_1_n else + if ic = "ui-icon-arrowthick-1-ne" then ui_icon_arrowthick_1_ne else + if ic = "ui-icon-arrowthick-1-e" then ui_icon_arrowthick_1_e else + if ic = "ui-icon-arrowthick-1-se" then ui_icon_arrowthick_1_se else + if ic = "ui-icon-arrowthick-1-s" then ui_icon_arrowthick_1_s else + if ic = "ui-icon-arrowthick-1-sw" then ui_icon_arrowthick_1_sw else + if ic = "ui-icon-arrowthick-1-w" then ui_icon_arrowthick_1_w else + if ic = "ui-icon-arrowthick-1-nw" then ui_icon_arrowthick_1_nw else + if ic = "ui-icon-arrowthick-2-n-s" then ui_icon_arrowthick_2_n_s else + if ic = "ui-icon-arrowthick-2-ne-sw" then ui_icon_arrowthick_2_ne_sw else + if ic = "ui-icon-arrowthick-2-e-w" then ui_icon_arrowthick_2_e_w else + if ic = "ui-icon-arrowthick-2-se-nw" then ui_icon_arrowthick_2_se_nw else + if ic = "ui-icon-arrowthickstop-1-n" then ui_icon_arrowthickstop_1_n else + if ic = "ui-icon-arrowthickstop-1-e" then ui_icon_arrowthickstop_1_e else + if ic = "ui-icon-arrowthickstop-1-s" then ui_icon_arrowthickstop_1_s else + if ic = "ui-icon-arrowthickstop-1-w" then ui_icon_arrowthickstop_1_w else + if ic = "ui-icon-arrowreturnthick-1-w" then ui_icon_arrowreturnthick_1_w else + if ic = "ui-icon-arrowreturnthick-1-n" then ui_icon_arrowreturnthick_1_n else + if ic = "ui-icon-arrowreturnthick-1-e" then ui_icon_arrowreturnthick_1_e else + if ic = "ui-icon-arrowreturnthick-1-s" then ui_icon_arrowreturnthick_1_s else + if ic = "ui-icon-arrowreturn-1-w" then ui_icon_arrowreturn_1_w else + if ic = "ui-icon-arrowreturn-1-n" then ui_icon_arrowreturn_1_n else + if ic = "ui-icon-arrowreturn-1-e" then ui_icon_arrowreturn_1_e else + if ic = "ui-icon-arrowreturn-1-s" then ui_icon_arrowreturn_1_s else + if ic = "ui-icon-arrowrefresh-1-w" then ui_icon_arrowrefresh_1_w else + if ic = "ui-icon-arrowrefresh-1-n" then ui_icon_arrowrefresh_1_n else + if ic = "ui-icon-arrowrefresh-1-e" then ui_icon_arrowrefresh_1_e else + if ic = "ui-icon-arrowrefresh-1-s" then ui_icon_arrowrefresh_1_s else + if ic = "ui-icon-arrow-4" then ui_icon_arrow_4 else + if ic = "ui-icon-arrow-4-diag" then ui_icon_arrow_4_diag else + if ic = "ui-icon-extlink" then ui_icon_extlink else + if ic = "ui-icon-newwin" then ui_icon_newwin else + if ic = "ui-icon-refresh" then ui_icon_refresh else + if ic = "ui-icon-shuffle" then ui_icon_shuffle else + if ic = "ui-icon-transfer-e-w" then ui_icon_transfer_e_w else + if ic = "ui-icon-transferthick-e-w" then ui_icon_transferthick_e_w else + if ic = "ui-icon-folder-collapsed" then ui_icon_folder_collapsed else + if ic = "ui-icon-folder-open" then ui_icon_folder_open else + if ic = "ui-icon-document" then ui_icon_document else + if ic = "ui-icon-document-b" then ui_icon_document_b else + if ic = "ui-icon-note" then ui_icon_note else + if ic = "ui-icon-mail-closed" then ui_icon_mail_closed else + if ic = "ui-icon-mail-open" then ui_icon_mail_open else + if ic = "ui-icon-suitcase" then ui_icon_suitcase else + if ic = "ui-icon-comment" then ui_icon_comment else + if ic = "ui-icon-person" then ui_icon_person else + if ic = "ui-icon-print" then ui_icon_print else + if ic = "ui-icon-trash" then ui_icon_trash else + if ic = "ui-icon-locked" then ui_icon_locked else + if ic = "ui-icon-unlocked" then ui_icon_unlocked else + if ic = "ui-icon-bookmark" then ui_icon_bookmark else + if ic = "ui-icon-tag" then ui_icon_tag else + if ic = "ui-icon-home" then ui_icon_home else + if ic = "ui-icon-flag" then ui_icon_flag else + if ic = "ui-icon-calculator" then ui_icon_calculator else + if ic = "ui-icon-cart" then ui_icon_cart else + if ic = "ui-icon-pencil" then ui_icon_pencil else + if ic = "ui-icon-clock" then ui_icon_clock else + if ic = "ui-icon-disk" then ui_icon_disk else + if ic = "ui-icon-calendar" then ui_icon_calendar else + if ic = "ui-icon-zoomin" then ui_icon_zoomin else + if ic = "ui-icon-zoomout" then ui_icon_zoomout else + if ic = "ui-icon-search" then ui_icon_search else + if ic = "ui-icon-wrench" then ui_icon_wrench else + if ic = "ui-icon-gear" then ui_icon_gear else + if ic = "ui-icon-heart" then ui_icon_heart else + if ic = "ui-icon-star" then ui_icon_star else + if ic = "ui-icon-link" then ui_icon_link else + if ic = "ui-icon-cancel" then ui_icon_cancel else + if ic = "ui-icon-plus" then ui_icon_plus else + if ic = "ui-icon-plusthick" then ui_icon_plusthick else + if ic = "ui-icon-minus" then ui_icon_minus else + if ic = "ui-icon-minusthick" then ui_icon_minusthick else + if ic = "ui-icon-close" then ui_icon_close else + if ic = "ui-icon-closethick" then ui_icon_closethick else + if ic = "ui-icon-key" then ui_icon_key else + if ic = "ui-icon-lightbulb" then ui_icon_lightbulb else + if ic = "ui-icon-scissors" then ui_icon_scissors else + if ic = "ui-icon-clipboard" then ui_icon_clipboard else + if ic = "ui-icon-copy" then ui_icon_copy else + if ic = "ui-icon-contact" then ui_icon_contact else + if ic = "ui-icon-image" then ui_icon_image else + if ic = "ui-icon-video" then ui_icon_video else + if ic = "ui-icon-script" then ui_icon_script else + if ic = "ui-icon-alert" then ui_icon_alert else + if ic = "ui-icon-info" then ui_icon_info else + if ic = "ui-icon-notice" then ui_icon_notice else + if ic = "ui-icon-help" then ui_icon_help else + if ic = "ui-icon-check" then ui_icon_check else + if ic = "ui-icon-bullet" then ui_icon_bullet else + if ic = "ui-icon-radio-off" then ui_icon_radio_off else + if ic = "ui-icon-radio-on" then ui_icon_radio_on else + if ic = "ui-icon-pin-w" then ui_icon_pin_w else + if ic = "ui-icon-pin-s" then ui_icon_pin_s else + if ic = "ui-icon-play" then ui_icon_play else + if ic = "ui-icon-pause" then ui_icon_pause else + if ic = "ui-icon-seek-next" then ui_icon_seek_next else + if ic = "ui-icon-seek-prev" then ui_icon_seek_prev else + if ic = "ui-icon-seek-end" then ui_icon_seek_end else + if ic = "ui-icon-seek-first" then ui_icon_seek_first else + if ic = "ui-icon-stop" then ui_icon_stop else + if ic = "ui-icon-eject" then ui_icon_eject else + if ic = "ui-icon-volume-off" then ui_icon_volume_off else + if ic = "ui-icon-volume-on" then ui_icon_volume_on else + if ic = "ui-icon-power" then ui_icon_power else + if ic = "ui-icon-signal-diag" then ui_icon_signal_diag else + if ic = "ui-icon-signal" then ui_icon_signal else + if ic = "ui-icon-battery-0" then ui_icon_battery_0 else + if ic = "ui-icon-battery-1" then ui_icon_battery_1 else + if ic = "ui-icon-battery-2" then ui_icon_battery_2 else + if ic = "ui-icon-battery-3" then ui_icon_battery_3 else + if ic = "ui-icon-circle-plus" then ui_icon_circle_plus else + if ic = "ui-icon-circle-minus" then ui_icon_circle_minus else + if ic = "ui-icon-circle-close" then ui_icon_circle_close else + if ic = "ui-icon-circle-triangle-e" then ui_icon_circle_triangle_e else + if ic = "ui-icon-circle-triangle-s" then ui_icon_circle_triangle_s else + if ic = "ui-icon-circle-triangle-w" then ui_icon_circle_triangle_w else + if ic = "ui-icon-circle-triangle-n" then ui_icon_circle_triangle_n else + if ic = "ui-icon-circle-arrow-e" then ui_icon_circle_arrow_e else + if ic = "ui-icon-circle-arrow-s" then ui_icon_circle_arrow_s else + if ic = "ui-icon-circle-arrow-w" then ui_icon_circle_arrow_w else + if ic = "ui-icon-circle-arrow-n" then ui_icon_circle_arrow_n else + if ic = "ui-icon-circle-zoomin" then ui_icon_circle_zoomin else + if ic = "ui-icon-circle-zoomout" then ui_icon_circle_zoomout else + if ic = "ui-icon-circle-check" then ui_icon_circle_check else + if ic = "ui-icon-circlesmall-plus" then ui_icon_circlesmall_plus else + if ic = "ui-icon-circlesmall-minus" then ui_icon_circlesmall_minus else + if ic = "ui-icon-circlesmall-close" then ui_icon_circlesmall_close else + if ic = "ui-icon-squaresmall-plus" then ui_icon_squaresmall_plus else + if ic = "ui-icon-squaresmall-minus" then ui_icon_squaresmall_minus else + if ic = "ui-icon-squaresmall-close" then ui_icon_squaresmall_close else + if ic = "ui-icon-grip-dotted-vertical" then ui_icon_grip_dotted_vertical else + if ic = "ui-icon-grip-dotted-horizontal" then ui_icon_grip_dotted_horizontal else + if ic = "ui-icon-grip-solid-vertical" then ui_icon_grip_solid_vertical else + if ic = "ui-icon-grip-solid-horizontal" then ui_icon_grip_solid_horizontal else + if ic = "ui-icon-gripsmall-diagonal-se" then ui_icon_gripsmall_diagonal_se else + if ic = "ui-icon-grip-diagonal-se" then ui_icon_grip_diagonal_se else + if ic = "" then jq_icon_none else + jq_custom_icon(ic) + . diff --git a/web/jQuery/CXM_jquery_tabs.anubis b/web/jQuery/CXM_jquery_tabs.anubis new file mode 100644 index 0000000..d01ac23 --- /dev/null +++ b/web/jQuery/CXM_jquery_tabs.anubis @@ -0,0 +1,94 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 04/09/2012 + * Time: 16:19 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read tools/basis.anubis + +public type JQuery_tab: + jQuery_tab(String title, HTML_Partial_Content content) +. + + // Helper to be compatible with the first version of JQuery_tab which + // take HTML_Off_Form as second argument instead of HTML_Partial_Content. + +public define JQuery_tab + jQuery_tab + ( + String title, + HTML_Off_Form content + )= + jQuery_tab(title, partial_content([], content)). + + +define HTML_Partial_Content + _jquery_tabs + ( + String tabs_container_id, + List(JQuery_tab) tabs, + String tabs_titles, + List(HTML_Off_Form) tabs_contents, + List(HTML_Head_Tag) tabs_heads, + Int count + ) + = + if tabs is + { + [ ] then + partial_content( + reverse(tabs_heads), + sequence([ + literal(""), + sequence(reverse(tabs_contents)) + ]) + ), + [ h . t ] then + if h is jQuery_tab(title, p_content) then + if p_content is partial_content(tags, content) then + _jquery_tabs( + tabs_container_id, + t, + tabs_titles + "
  • "+title+"
    • ", + [ + sequence([ + literal("
    "), + content, + literal("
    ") + ]) + . + tabs_contents + ], + tags + tabs_heads, + count+1 + ) + } + . + + +public define HTML_Partial_Content + jquery_tabs + ( + String tabs_container_id, + List(JQuery_tab) tabs + ) + = + if _jquery_tabs(tabs_container_id, tabs, "", [], [], 0) is partial_content(tags, html) then + partial_content( + [ + js_inline(script("", "$(document).ready(function(){$('#"+tabs_container_id+"').tabs();});")) + . + tags + ], + sequence([ + literal("
    "), + html, + literal("
    ") + ]) + ) + . + diff --git a/web/jQuery/CXM_jquery_tiptip.anubis b/web/jQuery/CXM_jquery_tiptip.anubis new file mode 100644 index 0000000..c478f22 --- /dev/null +++ b/web/jQuery/CXM_jquery_tiptip.anubis @@ -0,0 +1,135 @@ +/* + * Created by PyramIDE. + * User: Jeremy + * Date: 18/09/2012 + * Time: 15:42 + * + * To change this template use Tools | Options | Coding | Edit Standard Headers. + */ + +read calexium_lib/web/CXM_making_a_web_site.anubis +read calexium_lib/web/CXM_jquery.anubis +read tools/basis.anubis +read system/string.anubis +read system/convert.anubis + +/* jQuery tipTip position type */ +public type JQ_tiptip_position: + jq_tiptip_top, + jq_tiptip_left, + jq_tiptip_bottom, // is default + jq_tiptip_right +. + +/* position to string */ +public define String + jq_tiptip_position_to_string + ( + JQ_tiptip_position p + ) + = + if p is + { + jq_tiptip_top then "top", + jq_tiptip_left then "left", + jq_tiptip_bottom then "bottom", + jq_tiptip_right then "right" + } + . + +/* position to string */ +public define JQ_tiptip_position + string_to_jq_tiptip_position + ( + String s + ) + = + if s="top" then jq_tiptip_top + else if s="left" then jq_tiptip_left + else if s="bottom" then jq_tiptip_bottom + else if s="right" then jq_tiptip_right + else jq_tiptip_bottom //is default + . + +/* Initialize jQuery tipTip */ +public define List(HTML_Head_Tag) + jquery_tiptip_init + ( + String web_dir, + ) + = + [ + css(css_file("/css/jquery/tipTip.css")), + js(js_file("/js/jquery/jquery.tipTip.minified.js")) + ] + . + + +/* Create a tipTip tooltip with a HTML_Partial_Content and position */ +public define HTML_Partial_Content + jquery_tiptip + ( + String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! + String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix + HTML_Partial_Content tooltip_partial_content, + JQ_tiptip_position position + ) + = + if tooltip_partial_content is partial_content(head, body) then + partial_content( + [ + js_inline(script("", " + $(document).ready(function() + { + var tooltip_"+now+"=$('#"+tooltip_id+"-"+now+"').html(); + $('#"+rollovered_id+"').tipTip({maxWidth: 'auto', edgeOffset: 10, defaultPosition: \""+jq_tiptip_position_to_string(position)+"\", content: tooltip_"+now+"}); + }); + ")) + . + head + ], + sequence([ + literal("
    "), + body, + literal("
    ") + ]) + ) + . + +/* Create a tipTip tooltip with a HTML_Off_Form and position */ +public define HTML_Partial_Content + jquery_tiptip + ( + String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! + String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix + HTML_Off_Form html_content, + JQ_tiptip_position position + ) + = + jquery_tiptip(rollovered_id, tooltip_id, partial_content([], html_content), position) + . + +/* Create a tipTip tooltip with a HTML_Partial_Content */ +public define HTML_Partial_Content + jquery_tiptip + ( + String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! + String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix + HTML_Partial_Content tooltip_partial_content + ) + = + jquery_tiptip(rollovered_id, tooltip_id, tooltip_partial_content, jq_tiptip_bottom) + . + +/* Create a tipTip tooltip with a HTML_Off_Form */ +public define HTML_Partial_Content + jquery_tiptip + ( + String rollovered_id, // id of the element on which toolip will be displayed => IT MUST BE UNIQUE !!!! + String tooltip_id, // id used to make a container around tooltip content => Uniqueness of the container's id is made with the addition of a timestamp as a suffix + HTML_Off_Form html_content + ) + = + jquery_tiptip(rollovered_id, tooltip_id, partial_content([], html_content)) + . + -- libgit2 0.21.4