backup/EWF
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

moved wizard under tools/estudio_wizard

Browse Source
This commit is contained in:
Jocelyn FIAT
2015-03-05 16:01:45 +01:00
parent b26504b4a1
commit f81e5251e8
64 changed files with 0 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

59
tools/estudio_wizard/lib/wizard/console/items/console_wizard_boolean_question.e Normal file
View File

@@ -0,0 +1,59 @@
note
description: "Summary description for {CONSOLE_WIZARD_BOOLEAN_QUESTION}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
CONSOLE_WIZARD_BOOLEAN_QUESTION
inherit
WIZARD_BOOLEAN_QUESTION
undefine
make
end
CONSOLE_WIZARD_QUESTION
create
make
convert
text: {STRING_32}
feature -- Conversion
text: STRING_32
do
if value then
Result := "yes"
else
Result := "no"
end
end
value: BOOLEAN
feature -- Element change
set_title (t: READABLE_STRING_GENERAL)
do
create title.make_from_string_general (t)
end
set_text (t: detachable READABLE_STRING_GENERAL)
do
if t = Void then
set_value (False)
else
set_value (t.is_case_insensitive_equal ("yes"))
end
end
set_value (v: BOOLEAN)
do
value := v
end
end

59
tools/estudio_wizard/lib/wizard/console/items/console_wizard_directory_question.e Normal file
View File

@@ -0,0 +1,59 @@
note
description: "Summary description for {CONSOLE_WIZARD_DIRECTORY_QUESTION}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
CONSOLE_WIZARD_DIRECTORY_QUESTION
inherit
WIZARD_DIRECTORY_QUESTION
undefine
make
end
CONSOLE_WIZARD_QUESTION
create
make
convert
text: {STRING_32}
feature -- Conversion
text: STRING_32
do
if attached value as v then
Result := v.name
else
create Result.make_empty
end
end
value: detachable PATH
feature -- Element change
set_title (t: READABLE_STRING_GENERAL)
do
create title.make_from_string_general (t)
end
set_text (t: detachable READABLE_STRING_GENERAL)
do
if t = Void then
set_value (Void)
else
set_value (create {PATH}.make_from_string (t))
end
end
set_value (v: detachable PATH)
do
value := v
end
end

34
tools/estudio_wizard/lib/wizard/console/items/console_wizard_input_field.e Normal file
View File

@@ -0,0 +1,34 @@
note
description: "Summary description for {CONSOLE_WIZARD_INPUT_FIELD}."
author: ""
date: "$Date$"
revision: "$Revision$"
deferred class
CONSOLE_WIZARD_INPUT_FIELD
inherit
WIZARD_INPUT_FIELD
WIZARD_PAGE_ITEM
feature -- Access
item_id: detachable READABLE_STRING_8
-- Optional id to identify related page item.
do
Result := id
end
feature -- Conversion
data: detachable ANY
feature -- Element change
set_data (d: like data)
do
data := d
end
end

58
tools/estudio_wizard/lib/wizard/console/items/console_wizard_integer_question.e Normal file
View File

@@ -0,0 +1,58 @@
note
description: "Summary description for {CONSOLE_WIZARD_INTEGER_QUESTION}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
CONSOLE_WIZARD_INTEGER_QUESTION
inherit
WIZARD_INTEGER_QUESTION
undefine
make
end
CONSOLE_WIZARD_QUESTION
create
make
convert
text: {STRING_32}
feature -- Conversion
text: STRING_32
do
create Result.make_empty
Result.append_integer (value)
end
value: INTEGER
feature -- Element change
set_title (t: READABLE_STRING_GENERAL)
do
create title.make_from_string_general (t)
end
set_text (t: detachable READABLE_STRING_GENERAL)
do
if t = Void then
set_value (0)
elseif t.is_integer then
set_value (t.to_integer)
else
-- Ignore !
end
end
set_value (v: INTEGER)
do
value := v
end
end

32
tools/estudio_wizard/lib/wizard/console/items/console_wizard_question.e Normal file
View File

@@ -0,0 +1,32 @@
note
description: "Summary description for {CONSOLE_WIZARD_QUESTION}."
author: ""
date: "$Date$"
revision: "$Revision$"
deferred class
CONSOLE_WIZARD_QUESTION
inherit
WIZARD_QUESTION
redefine
make
end
CONSOLE_WIZARD_INPUT_FIELD
rename
make as make_field
undefine
make_field
end
feature {NONE} -- Initialization
make (a_id: like id; a_title: READABLE_STRING_GENERAL; a_optional_description: detachable READABLE_STRING_GENERAL)
-- Create field identified by `a_id', with title `a_title'
-- and optional description `a_optional_description'.
do
Precursor (a_id, a_title, a_optional_description)
end
end

63
tools/estudio_wizard/lib/wizard/console/items/console_wizard_string_question.e Normal file
View File

@@ -0,0 +1,63 @@
note
description: "Summary description for {CONSOLE_WIZARD_STRING_QUESTION}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
CONSOLE_WIZARD_STRING_QUESTION
inherit
WIZARD_STRING_QUESTION
undefine
make
end
CONSOLE_WIZARD_QUESTION
create
make
convert
text: {STRING_32}
feature -- Conversion
text: STRING_32
do
if attached value as v then
Result := v
else
create Result.make_empty
end
end
value: detachable STRING_32
feature -- Element change
set_title (t: READABLE_STRING_GENERAL)
do
create title.make_from_string_general (t)
end
set_text (t: detachable READABLE_STRING_GENERAL)
do
if t = Void then
set_value (Void)
else
set_value (create {STRING_32}.make_from_string_general (t))
end
end
set_value (v: detachable READABLE_STRING_GENERAL)
do
if v = Void then
value := Void
else
create value.make_from_string_general (v)
end
end
end