note
description: "Summary description for {HTML_TABLE_TEMPLATE}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
HTML_TABLE_TEMPLATE
inherit
SHARED_TEMPLATE_CONTEXT
undefine
default_create
end
ANY
redefine
default_create
end
create
default_create
feature {NONE} -- Initialization
default_create
-- Initialize `Current'.
local
p: PATH
do
create p.make_current
p:=p.appended ("/tpl")
set_template_folder (p)
set_template_file_name ("html_table.tpl")
template.add_value (users,"users")
template_context.enable_verbose
template.analyze
template.get_output
if attached template.output as l_output then
output := l_output
print (output)
end
end
feature -- Status
output: detachable STRING
set_template_folder (v: PATH)
do
template_context.set_template_folder (v)
end
set_template_file_name (v: STRING)
do
create template.make_from_file (v)
end
set_template (v: like template)
do
template := v
end
template: TEMPLATE_FILE
feature --
feature {NONE} -- Implementation
users : LIST[USER]
local
user : USER
do
create {ARRAYED_LIST[USER]}Result.make(5)
create user.make ("John","1234312")
Result.force(user)
create user.make ("Peter","123456")
Result.force(user)
create user.make ("Mike","2343221")
Result.force(user)
end
end