Create basepage

This commit is contained in:
YNH Webdev
2013-09-15 14:16:18 +02:00
parent 81952e7898
commit 251974fd2f
4 changed files with 53 additions and 23 deletions

View File

@@ -9,7 +9,10 @@ class
inherit
WSF_PAGE_CONTROL
BASE_PAGE
redefine
initialize_controls
end
create
make
@@ -17,11 +20,8 @@ create
feature
initialize_controls
local
container: WSF_MULTI_CONTROL [WSF_STATELESS_CONTROL]
do
create container.make_multi_control ("container")
container.add_class ("container")
Precursor
container.add_control (create {WSF_BASIC_CONTROL}.make_with_body("h1","","Grid Demo"))
create datasource.make_news
create search_query.make_autocomplete ("query", create {GOOGLE_AUTOCOMPLETION}.make)