Commit e7b9069a authored by claes's avatar claes

Status row in ge editor

parent ce4a46b6
...@@ -510,6 +510,7 @@ procedure ...@@ -510,6 +510,7 @@ procedure
ge_create_graph_form(integer); ge_create_graph_form(integer);
ge_create_main_pane(integer); ge_create_main_pane(integer);
ge_create_palette_pane(integer); ge_create_palette_pane(integer);
ge_create_widget_cb(integer);
ge_activate_concorner_right(integer); ge_activate_concorner_right(integer);
ge_activate_concorner_rounded(integer); ge_activate_concorner_rounded(integer);
ge_activate_round_amount_1(integer); ge_activate_round_amount_1(integer);
...@@ -1441,12 +1442,17 @@ object functions_entry : XmCascadeButton ...@@ -1441,12 +1442,17 @@ object functions_entry : XmCascadeButton
arguments arguments
{ {
XmNlabelString = compound_string("Show grid"); XmNlabelString = compound_string("Show grid");
XmNmnemonic = keysym('h'); XmNmnemonic = keysym('h');
XmNfontList = menu_font; XmNfontList = menu_font;
XmNuserData = 7;
XmNaccelerator = "Ctrl<Key>D";
XmNacceleratorText = compound_string('Ctrl+D');
}; };
callbacks callbacks
{ {
XmNvalueChangedCallback = procedure ge_activate_show_grid(ge_ctx); XmNvalueChangedCallback = procedure ge_activate_show_grid(ge_ctx);
MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
}; };
}; };
...@@ -2491,10 +2497,11 @@ object palette_row : XmRowColumn ...@@ -2491,10 +2497,11 @@ object palette_row : XmRowColumn
XmNlabelString = compound_string("Grid"); XmNlabelString = compound_string("Grid");
! XmNmenuHistory = XmPushButton current_session; ! XmNmenuHistory = XmPushButton current_session;
! XmNfontList = menu_font; ! XmNfontList = menu_font;
XmNuserData = 2;
}; };
callbacks callbacks
{ {
! MrmNcreateCallback = procedure ute_create_batchoptmenu( ute_ctx) ; MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
controls controls
{ {
...@@ -2509,10 +2516,12 @@ object palette_row : XmRowColumn ...@@ -2509,10 +2516,12 @@ object palette_row : XmRowColumn
{ {
XmNlabelString = compound_string("1.0"); XmNlabelString = compound_string("1.0");
XmNfontList = menu_font; XmNfontList = menu_font;
XmNuserData = 3;
}; };
callbacks callbacks
{ {
XmNactivateCallback = procedure ge_activate_gridsize_4(ge_ctx); XmNactivateCallback = procedure ge_activate_gridsize_4(ge_ctx);
MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
}; };
XmPushButton XmPushButton
...@@ -2521,10 +2530,12 @@ object palette_row : XmRowColumn ...@@ -2521,10 +2530,12 @@ object palette_row : XmRowColumn
{ {
XmNlabelString = compound_string("0.5"); XmNlabelString = compound_string("0.5");
XmNfontList = menu_font; XmNfontList = menu_font;
XmNuserData = 4;
}; };
callbacks callbacks
{ {
XmNactivateCallback = procedure ge_activate_gridsize_3(ge_ctx); XmNactivateCallback = procedure ge_activate_gridsize_3(ge_ctx);
MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
}; };
XmPushButton XmPushButton
...@@ -2533,10 +2544,12 @@ object palette_row : XmRowColumn ...@@ -2533,10 +2544,12 @@ object palette_row : XmRowColumn
{ {
XmNlabelString = compound_string("0.2"); XmNlabelString = compound_string("0.2");
XmNfontList = menu_font; XmNfontList = menu_font;
XmNuserData = 5;
}; };
callbacks callbacks
{ {
XmNactivateCallback = procedure ge_activate_gridsize_2(ge_ctx); XmNactivateCallback = procedure ge_activate_gridsize_2(ge_ctx);
MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
}; };
XmPushButton XmPushButton
...@@ -2545,10 +2558,12 @@ object palette_row : XmRowColumn ...@@ -2545,10 +2558,12 @@ object palette_row : XmRowColumn
{ {
XmNlabelString = compound_string("0.1"); XmNlabelString = compound_string("0.1");
XmNfontList = menu_font; XmNfontList = menu_font;
XmNuserData = 6;
}; };
callbacks callbacks
{ {
XmNactivateCallback = procedure ge_activate_gridsize_1(ge_ctx); XmNactivateCallback = procedure ge_activate_gridsize_1(ge_ctx);
MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
}; };
}; };
...@@ -2561,10 +2576,12 @@ object palette_row : XmRowColumn ...@@ -2561,10 +2576,12 @@ object palette_row : XmRowColumn
{ {
XmNlabelString = compound_string("Snap"); XmNlabelString = compound_string("Snap");
XmNfontList = menu_font; XmNfontList = menu_font;
XmNuserData = 1;
}; };
callbacks callbacks
{ {
XmNvalueChangedCallback = procedure ge_activate_grid(ge_ctx); XmNvalueChangedCallback = procedure ge_activate_grid(ge_ctx);
MrmNcreateCallback = procedure ge_create_widget_cb(ge_ctx);
}; };
}; };
XmOptionMenu XmOptionMenu
...@@ -2725,8 +2742,9 @@ object cursor_position : XmLabel ...@@ -2725,8 +2742,9 @@ object cursor_position : XmLabel
{ {
arguments arguments
{ {
XmNwidth = 50; XmNwidth = 280;
XmNrightAttachment = XmATTACH_FORM; XmNrightAttachment = XmATTACH_FORM;
XmNrightOffset = 30;
XmNbottomAttachment = XmATTACH_FORM; XmNbottomAttachment = XmATTACH_FORM;
XmNalignment = XmALIGNMENT_BEGINNING; XmNalignment = XmALIGNMENT_BEGINNING;
XmNlabelString = ""; XmNlabelString = "";
...@@ -2777,7 +2795,7 @@ object cmd_prompt : XmLabel ...@@ -2777,7 +2795,7 @@ object cmd_prompt : XmLabel
XmNtopWidget = XmPanedWindow graph_form; XmNtopWidget = XmPanedWindow graph_form;
XmNalignment = XmALIGNMENT_BEGINNING; XmNalignment = XmALIGNMENT_BEGINNING;
XmNlabelString = ""; XmNlabelString = "";
XmNwidth = 80; XmNwidth = 150;
XmNheight = 30; XmNheight = 30;
XmNfontList = menu_font; XmNfontList = menu_font;
}; };
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment