53 lines
801 B
Plaintext
53 lines
801 B
Plaintext
note
|
|
description: "Summary description for {WSF_WIDGET_COLUMN}."
|
|
author: ""
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
WSF_WIDGET_TABLE_COLUMN
|
|
|
|
inherit
|
|
WSF_WITH_CSS_CLASS
|
|
|
|
WSF_WITH_CSS_STYLE
|
|
|
|
create
|
|
make
|
|
|
|
feature {NONE} -- Initialization
|
|
|
|
make (i: like index)
|
|
do
|
|
index := i
|
|
end
|
|
|
|
feature -- Access
|
|
|
|
index: INTEGER
|
|
|
|
title: detachable READABLE_STRING_32
|
|
|
|
feature -- Change
|
|
|
|
set_title (t: like title)
|
|
do
|
|
title := t
|
|
end
|
|
|
|
feature -- Conversion
|
|
|
|
append_table_header_to_html (a_theme: WSF_THEME; a_html: STRING_8)
|
|
do
|
|
a_html.append ("<th")
|
|
append_css_class_to (a_html, Void)
|
|
append_css_style_to (a_html)
|
|
a_html.append_character ('>')
|
|
if attached title as l_title then
|
|
a_html.append (a_theme.html_encoded (l_title))
|
|
end
|
|
a_html.append ("</th>")
|
|
end
|
|
|
|
end
|