Fixed creation procedures (make)
This commit is contained in:
@@ -10,26 +10,28 @@ class
|
||||
inherit
|
||||
|
||||
WSF_INPUT_CONTROL
|
||||
rename
|
||||
make as make_input
|
||||
redefine
|
||||
handle_callback,
|
||||
state
|
||||
end
|
||||
|
||||
create
|
||||
make_autocomplete, make_autocomplete_with_agent
|
||||
make, make_with_agent
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make_autocomplete (n: STRING; c: WSF_AUTOCOMPLETION)
|
||||
make (n: STRING; c: WSF_AUTOCOMPLETION)
|
||||
-- Initialize with specified name and autocompletion
|
||||
do
|
||||
make_autocomplete_with_agent (n, agent c.autocompletion)
|
||||
make_with_agent (n, agent c.autocompletion)
|
||||
if attached c.template as t then
|
||||
template := t
|
||||
end
|
||||
end
|
||||
|
||||
make_autocomplete_with_agent (n: STRING; c: FUNCTION [ANY, TUPLE [STRING], JSON_ARRAY])
|
||||
make_with_agent (n: STRING; c: FUNCTION [ANY, TUPLE [STRING], JSON_ARRAY])
|
||||
-- Initialize with specified name and autocompletion function
|
||||
do
|
||||
make_input (n, "")
|
||||
|
||||
@@ -10,16 +10,19 @@ class
|
||||
inherit
|
||||
|
||||
WSF_VALUE_CONTROL [BOOLEAN]
|
||||
rename
|
||||
make as make_value_control
|
||||
end
|
||||
|
||||
create
|
||||
make_checkbox
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make_checkbox (n, l, c: STRING)
|
||||
make (n, l, c: STRING)
|
||||
-- Initialize with specified control name,
|
||||
do
|
||||
make_control (n, "input")
|
||||
make_value_control (n, "input")
|
||||
label := l
|
||||
checked_value := c
|
||||
end
|
||||
|
||||
@@ -10,6 +10,8 @@ class
|
||||
inherit
|
||||
|
||||
WSF_VALUE_CONTROL [LIST [STRING]]
|
||||
rename
|
||||
make as make_control
|
||||
undefine
|
||||
load_state,
|
||||
full_state,
|
||||
@@ -17,13 +19,16 @@ inherit
|
||||
end
|
||||
|
||||
WSF_MULTI_CONTROL [WSF_CHECKBOX_CONTROL]
|
||||
rename
|
||||
make as make_multi_control
|
||||
end
|
||||
|
||||
create
|
||||
make_checkbox_list_control
|
||||
make
|
||||
|
||||
feature {NONE} -- Initializaton
|
||||
|
||||
make_checkbox_list_control (n: STRING)
|
||||
make (n: STRING)
|
||||
-- Initialize with specified control name
|
||||
do
|
||||
make_multi_control (n)
|
||||
|
||||
@@ -8,10 +8,13 @@ class
|
||||
WSF_CODEVIEW_CONTROL
|
||||
|
||||
inherit
|
||||
|
||||
WSF_TEXTAREA_CONTROL
|
||||
rename
|
||||
make_textarea as make_codeview
|
||||
make as make_codeview
|
||||
end
|
||||
|
||||
create
|
||||
make_codeview
|
||||
|
||||
end
|
||||
|
||||
@@ -10,16 +10,19 @@ class
|
||||
inherit
|
||||
|
||||
WSF_VALUE_CONTROL [STRING]
|
||||
rename
|
||||
make as make_value_control
|
||||
end
|
||||
|
||||
create
|
||||
make_input
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make_input (n, v: STRING)
|
||||
make (n, v: STRING)
|
||||
-- Initialize with specified name and value
|
||||
do
|
||||
make_control (n, "input")
|
||||
make_value_control (n, "input")
|
||||
type := "text"
|
||||
text := v
|
||||
end
|
||||
|
||||
@@ -10,13 +10,16 @@ class
|
||||
inherit
|
||||
|
||||
WSF_INPUT_CONTROL
|
||||
rename
|
||||
make as make_input
|
||||
end
|
||||
|
||||
create
|
||||
make_password
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make_password (n, v: STRING)
|
||||
make (n, v: STRING)
|
||||
-- Initialize with specified control name and text
|
||||
do
|
||||
make_input (n, v)
|
||||
|
||||
@@ -10,16 +10,18 @@ class
|
||||
inherit
|
||||
|
||||
WSF_INPUT_CONTROL
|
||||
rename
|
||||
make as make_input
|
||||
redefine
|
||||
render
|
||||
end
|
||||
|
||||
create
|
||||
make_textarea
|
||||
make
|
||||
|
||||
feature {NONE} -- Initialization
|
||||
|
||||
make_textarea (n, t: STRING)
|
||||
make (n, t: STRING)
|
||||
-- Initialize with specified control name and text to be displayed in this textarea
|
||||
do
|
||||
make_input (n, t)
|
||||
|
||||
Reference in New Issue
Block a user