annotate Lib/IMPL/Web/View/TTControl.pm @ 265:6b6d4b2275a1

improved documentation
author cin
date Thu, 10 Jan 2013 03:25:02 +0400
parents f48a1a9f4fa2
children bbc0da7ef90e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
1 package IMPL::Web::View::TTControl;
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
2 use strict;
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
3
234
sergey
parents: 232
diff changeset
4 use IMPL::Const qw(:prop);
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
5 use IMPL::lang qw(:hash);
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
6 use Scalar::Util qw(blessed);
234
sergey
parents: 232
diff changeset
7 use IMPL::declare {
sergey
parents: 232
diff changeset
8 require => {
sergey
parents: 232
diff changeset
9 TTContext => 'Template::Context',
sergey
parents: 232
diff changeset
10 Exception => 'IMPL::Exception',
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
11 ArgumentException => '-IMPL::InvalidArgumentException',
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
12 OperationException => '-IMPL::InvalidOperationException'
234
sergey
parents: 232
diff changeset
13 },
sergey
parents: 232
diff changeset
14 base => [
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
15 'IMPL::Object' => undef
234
sergey
parents: 232
diff changeset
16 ],
sergey
parents: 232
diff changeset
17 props => [
sergey
parents: 232
diff changeset
18 id => PROP_RO,
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
19 attributes => PROP_RW,
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
20 name => PROP_RO,
234
sergey
parents: 232
diff changeset
21 context => PROP_RO,
sergey
parents: 232
diff changeset
22 template => PROP_RO
sergey
parents: 232
diff changeset
23 ]
sergey
parents: 232
diff changeset
24 };
sergey
parents: 232
diff changeset
25
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
26
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
27 {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
28 my $nextId = 1;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
29 sub _GetNextId {
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
30 return $nextId++;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
31 }
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
32 }
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
33
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
34 our $AutoloadRegex = qr/^[a-z]/;
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
35 our @REFLECT_META = qw(title layout);
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
36
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
37 sub CTOR {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
38 my ($this,$name,$template,$context,$refProps) = @_;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
39
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
40 $name ||= "control";
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
41
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
42 $this->template( $template ) or die new IMPL::ArgumentException("A template is required");
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
43 $this->context( $context ) or die new IMPL::ArgumentException("A context is required");
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
44
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
45 $this->id($name . "-" . _GetNextId()) unless $this->id;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
46
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
47 $this->name($name);
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
48 $this->attributes({});
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
49
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
50 my %attrs;
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
51
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
52 foreach my $meta ( @REFLECT_META ) {
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
53 next if $meta =~ /^_/;
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
54 if( my $value = $template->$meta() ) {
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
55 $attrs{$meta} = $value;
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
56 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
57 }
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
58
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
59 hashApply(\%attrs,$refProps) if ref $refProps eq 'HASH';
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
60
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
61 while (my($key,$value) = each %attrs) {
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
62 $this->SetAttribute($key,$value);
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
63 }
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
64 }
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
65
191
78a18a2b6266 IMPL::Web::View improvements (unstable)
cin
parents: 189
diff changeset
66 sub InitInstance {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
67 my ($this,$args) = @_;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
68
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
69 $args ||= {};
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
70
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
71 if ( my $ctor = $this->template->blocks->{CTOR} ) {
212
292226770180 bugfixes
sergey
parents: 194
diff changeset
72 $this->context->include($ctor, { %$args, this => $this, template => $this->template } );
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
73 }
191
78a18a2b6266 IMPL::Web::View improvements (unstable)
cin
parents: 189
diff changeset
74 }
78a18a2b6266 IMPL::Web::View improvements (unstable)
cin
parents: 189
diff changeset
75
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
76 sub GetAttribute {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
77 my ($this,$name) = (shift,shift);
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
78
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
79 if (my $method = $this->can($name)) {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
80 unshift @_,$this;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
81 goto &$method;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
82 } else {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
83 return $this->attributes->{$name};
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
84 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
85 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
86
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
87 sub SetAttribute {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
88 my $this = shift;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
89 my $name = shift;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
90
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
91 if (my $method = $this->can($name)) {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
92 unshift @_, $this;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
93 goto &$method;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
94 } else {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
95 return $this->attributes->{$name} = shift;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
96 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
97 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
98
234
sergey
parents: 232
diff changeset
99 sub GetRenderBlock {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
100 $_[0]->template->blocks->{RENDER} || $_[0]->template;
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
101 }
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
102
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
103 sub Render {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
104 my ($this,$args) = @_;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
105
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
106 $args = {} unless ref $args eq 'HASH';
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
107
234
sergey
parents: 232
diff changeset
108 if(my $body = $this->GetRenderBlock ) {
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
109 return $this->context->include( $body, { %$args, this => $this, template => $this->template } );
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
110 } else {
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
111 return "";
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
112 }
185
ae8072f2f2a3 IMPL::Web::View::TTDocument tests, fixes
cin
parents: 181
diff changeset
113 }
ae8072f2f2a3 IMPL::Web::View::TTDocument tests, fixes
cin
parents: 181
diff changeset
114
ae8072f2f2a3 IMPL::Web::View::TTDocument tests, fixes
cin
parents: 181
diff changeset
115 sub AUTOLOAD {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
116 our $AUTOLOAD;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
117
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
118 my $method = ($AUTOLOAD =~ m/(\w+)$/)[0];
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
119
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
120 return if $method eq 'DESTROY';
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
121
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
122 if ($method =~ /$AutoloadRegex/) {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
123 my $this = shift;
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
124
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
125 die OperationException->new("can't invoke method '$method' on an unblessed reference") unless blessed $this;
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
126
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
127 return @_ ? $this->SetAttribute($method,@_) : $this->GetAttribute($method);
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
128 } else {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
129 die OperationException->new("The specified method '$method' doesn't exists");
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
130 }
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
131 }
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
132
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
133 1;
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
134
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
135 __END__
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
136
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
137 =pod
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
138
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
139 =head1 NAME
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
140
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
141 C<IMPL::Web::View::TTControl>
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
142
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
143 =head1 SYNPOSIS
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
144
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
145 =begin text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
146
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
147 [%
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
148 META version = 1;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
149 BLOCK INIT;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
150 # this is a document scope
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
151 dojo.require.push( 'dijit/form/Input' );
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
152 END;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
153 BLOCK CTOR;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
154 # local to this block
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
155 TPreview = require('My/Org/TextPreview');
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
156
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
157 # init control props
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
158 this.dojoClass = this.dojoClass || 'dijit.form.Input';
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
159 this.visualClass = this.visualClass || 'classic';
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
160 this.childNodes = [];
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
161
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
162 # init content
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
163 FOREACH text IN this.data;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
164 this.childNodes.push( TPreview.new('preview', nodeValue = text ) );
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
165 END;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
166
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
167 END;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
168 %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
169
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
170 <div class="$this.visualClass" data-dojo-type="$this.dojoClass">
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
171 [% FOREACH node IN this.childNodes %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
172 [% node.Render() %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
173 <hr />
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
174 [% END %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
175 </div>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
176
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
177 =end text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
178
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
179 =head1 DESCRIPTION
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
180
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
181 Представляет собой фрагмент документа, который имеет шаблон для отображения,
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
182 набор свойств и т.п.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
183
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
184 =head2 BLOCKS
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
185
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
186 =head3 META
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
187
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
188 Атрибуты C<META> C<layout>, C<title> будут перенесены в свойства элемента
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
189 управления.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
190
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
191 =head3 INIT
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
192
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
193 Данный блок шаблона управления выполняется один раз при создании первого
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
194 экземпляра элемента управления, в пространстве имен документа. Может
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
195 использоваться для формирования заголовочной части документа, скрипта
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
196 подключающего C<js> модули и т.п.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
197
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
198 Выполнение данного блока производится фабрикой элементов управления.
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
199
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
200 =head3 CTOR
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
201
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
202 данный блок выполняется каждый раз при создании нового экземпляра элемента
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
203 управления, при этом переменная C<this> указывает на эземпляр элемента
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
204 упарвления. Данный блок можно использовать для инициализации свойств элемента
213
sergey
parents: 212
diff changeset
205 управления.
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
206
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
207 =head3 RENDER
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
208
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
209 Данный блок выполняется при вызове метода C<Render()>, вывод данного блока и
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
210 есть результат отображения элемента управления. Если в шаблоне нет блока
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
211 C<RENDER>, то сам шаблон считается таковым.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
212
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
213 =head2 TEMPLATE VARS
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
214
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
215 Каждый шаблон имеет собственное пространство имен, вложенное в пространство имен
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
216 фабрики элементов (которая разделяет пространство имен документа). В шаблоне
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
217 могут определяться новые переменные, однако они останутся локальными для блоков.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
218
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
219 Чтобы передать данные между блоками следует использовать ссылку на элемент
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
220 управления C<this>.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
221
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
222 =begin text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
223
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
224 [%
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
225 BLOCK CTOR;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
226 this.extraCssClass = 'active';
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
227 text = "this text will gone";
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
228 END;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
229 %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
230
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
231 <div class="$this.extraCssClass">some text $text</div>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
232
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
233 =end text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
234
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
235 В примере выше переменная C<$text> установленная в конструкторе шаблона, при
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
236 отображении элемента управления будет неопределена.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
237
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
238 =over
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
239
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
240 =item * C<this>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
241
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
242 ссылка на объект элемента управления
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
243
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
244 =item * C<component>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
245
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
246 ссылка на текущий шаблон, устанавливается автоматически в методе
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
247 C<Template::Context::process>.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
248
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
249 =item * C<template>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
250
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
251 ссылка на шаблон элемента управления, для совместимости с C<TT>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
252
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
253 =back
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
254
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
255 =head1 MEMBERS
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
256
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
257 =over
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
258
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
259 =item * C<[get]context>
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
260
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
261 Контекст элемента управления, хранит пременные шаблона. Передается в
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
262 конструкторе. Фабрика элементов управления создает новый контекст пространство
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
263 имен которого вложено в пространство имен документа.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
264
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
265 =item * C<[get,set]template>
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
266
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
267 C<Template::Document> Шаблон элемента управления.
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
268
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
269 =item * C<AUTOLOAD>
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
270
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
271 Для удобства работы с шаблоном, элементы управления предоставляю доступ к своим
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
272 свойствам через метод C<AUTOLOAD>. Имена свойств должны начинаться со строчной
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
273 буквы.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
274
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
275 =back
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
276
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
277 =cut