Made interface of wsf forms and widgets a bit more flexible by accepting READABLE_STRING_GENERAL.

This commit is contained in:
Jocelyn Fiat
2017-10-17 14:34:50 +02:00
parent f1642a444a
commit edec837c4e
8 changed files with 78 additions and 42 deletions

View File

@@ -22,7 +22,7 @@ feature {NONE} -- Initialization
feature -- Access
default_value: detachable READABLE_STRING_GENERAL
default_value: detachable READABLE_STRING_32
rows: INTEGER
@@ -54,9 +54,13 @@ feature -- Element change
end
end
set_default_value (v: like default_value)
set_default_value (v: detachable READABLE_STRING_GENERAL)
do
default_value := v
if v = Void then
default_value := Void
else
default_value := v.as_string_32
end
end
feature -- Conversion