Changed slider

This commit is contained in:
Severin Münger
2013-09-24 14:38:01 +02:00
parent 6908bfe7bf
commit c52a513378

View File

@@ -5,7 +5,7 @@ note
revision: "$Revision$" revision: "$Revision$"
class class
WSF_IMAGE_SLIDER_CONTROL WSF_SLIDER_CONTROL
inherit inherit
@@ -72,22 +72,26 @@ feature -- Change
if attached caption as c then if attached caption as c then
item.add_control (c) item.add_control (c)
end end
slide_wrapper.add_control (item)
end end
add_image (src, alt: STRING) add_image (src, alt: STRING)
-- Add a new image to the slider, with specified url and alternative text -- Add a new image to the slider, with specified url and alternative text
local
item: WSF_MULTI_CONTROL [WSF_STATELESS_CONTROL]
do do
add_image_with_caption (src, alt, Void) add_image_with_caption (src, alt, Void)
end end
add_control(c:WSF_STATELESS_CONTROL)
do
end
feature -- Properties feature -- Properties
list: WSF_STATELESS_MULTI_CONTROL list: WSF_STATELESS_MULTI_CONTROL
-- List of slider links -- List of slider links
slide_wrapper: WSF_STATELESS_MULTI_CONTROL slide_wrapper: WSF_STATELESS_MULTI_CONTROL
-- List of the single image slides -- List of the single slides
end end