aboutsummaryrefslogtreecommitdiffstats
path: root/lib/gs/src/gs_widgets.erl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/gs/src/gs_widgets.erl')
-rw-r--r--lib/gs/src/gs_widgets.erl98
1 files changed, 98 insertions, 0 deletions
diff --git a/lib/gs/src/gs_widgets.erl b/lib/gs/src/gs_widgets.erl
new file mode 100644
index 0000000000..ffd4530eb4
--- /dev/null
+++ b/lib/gs/src/gs_widgets.erl
@@ -0,0 +1,98 @@
+%%
+%% %CopyrightBegin%
+%%
+%% Copyright Ericsson AB 1996-2009. All Rights Reserved.
+%%
+%% The contents of this file are subject to the Erlang Public License,
+%% Version 1.1, (the "License"); you may not use this file except in
+%% compliance with the License. You should have received a copy of the
+%% Erlang Public License along with this software. If not, it can be
+%% retrieved online at http://www.erlang.org/.
+%%
+%% Software distributed under the License is distributed on an "AS IS"
+%% basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
+%% the License for the specific language governing rights and limitations
+%% under the License.
+%%
+%% %CopyrightEnd%
+%%
+
+%%
+%% ------------------------------------------------------------
+%% Widget specific data
+%% ------------------------------------------------------------
+%%
+
+-module(gs_widgets).
+
+
+%% ----- Exports -----
+-export([default_options/1,
+ container/1]).
+
+
+%% ------------------------------------------------------------
+%% default_options for widgets
+%% Keep the options in the list sorted!
+%% ------------------------------------------------------------
+
+default_options(arc) -> [{coords, [{0,0}, {0,0}]}];
+default_options(button) -> [{click,true}, {height,30}, {width,100}, {x,0},
+ {y,0}];
+default_options(canvas) -> [{height,200}, {scrollregion,{0,0,300,200}},
+ {width,300}, {x,0}, {y,0}];
+default_options(checkbutton) -> [{click,true}, {height,30}, {width,100}, {x,0},
+ {y,0}];
+default_options(editor) -> [{height,200}, {width,300}, {x,0}, {y,0}];
+default_options(entry) -> [{height,30}, {width,100}, {x,0}, {y,0}];
+default_options(frame) -> [{height,100}, {width,150}, {x,0}, {y,0}];
+default_options(grid) -> [{bg,grey}, {cellheight,20},
+ {columnwidths, [80,80,80,80]},
+ {fg,black}, {font,{screen, 12}},
+ {height,100},
+ {hscroll,bottom},
+ {rows,{1,10}},
+ {vscroll,right},
+ {width,300},
+ {x,0}, {y,0}];
+ % Keep the options in the list sorted!
+default_options(gridline) -> [{click,true}, {doubleclick,false}, {row,undefined}];
+default_options(gs) -> [{kernel,false},
+ {{default,all,font}, {screen,12}}];
+default_options(image) -> [{anchor,nw}, {coords,[{0,0}]}];
+default_options(label) -> [{height,30}, {width,100}, {x,0}, {y,0}];
+default_options(line) -> [{coords, [{-1,-1},{-1,-1}]}];
+default_options(listbox) -> [{height,130}, {hscroll,true},
+ {selectmode,single}, {vscroll,true},
+ {width,125}, {x,0}, {y,0}];
+default_options(menu) -> [];
+ % Keep the options in the list sorted!
+default_options(menubar) -> [{bw,2}, {height,25}, {highlightbw,0},
+ {relief,raised}];
+default_options(menubutton) -> [{anchor,nw}, {side,left}];
+default_options(menuitem) -> [{click,true}, {index,last}, {itemtype,normal}];
+default_options(message) -> [{height,75}, {width,100}];
+default_options(oval) -> [{coords, [{0,0},{0,0}]}];
+default_options(polygon) -> [{coords, [{0,0},{0,0}]}, {fg,black}, {fill,none}];
+default_options(prompter) -> [{height,200}, {prompt,[]}, {width,300}];
+default_options(radiobutton) -> [{click,true}, {height,30}, {width,100},
+ {x,0}, {y,0}];
+default_options(rectangle) -> [{coords, [{0,0},{0,0}]}];
+default_options(scale) -> [{click,true}, {height,50}, {width,100},
+ {x,0}, {y,0}];
+ % Keep the options in the list sorted!
+default_options(scrollbar) -> [];
+default_options(text) -> [{anchor,nw}, {coords,[{0,0}]}, {justify,left}];
+default_options(window) -> [{configure,false}, {cursor,arrow}, {destroy,true},
+ {height,200}, {map,false}, {width,300}];
+default_options(_) -> [].
+
+container(canvas) -> true;
+container(frame) -> true;
+container(grid) -> true;
+container(menu) -> true;
+container(menubar) -> true;
+container(menubutton) -> true;
+container(menuitem) -> true;
+container(window) -> true;
+container(_) -> false.