annotate Lib/IMPL/Web/View/TTControl.pm @ 344:f1d67615a5b1

uml diagram
author cin
date Mon, 23 Sep 2013 00:09:26 +0400
parents 9bdccdf1f50b
children f05634287ac7
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);
334
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
5 use IMPL::lang qw(:hash :base);
299
sergey
parents: 296
diff changeset
6 use Scalar::Util qw(blessed reftype);
234
sergey
parents: 232
diff changeset
7 use IMPL::declare {
sergey
parents: 232
diff changeset
8 require => {
296
cin
parents: 267
diff changeset
9 TemplateDocument => 'Template::Document',
343
9bdccdf1f50b Added a templates context
cin
parents: 342
diff changeset
10 TTContext => 'IMPL::Web::View::TTContext',
234
sergey
parents: 232
diff changeset
11 Exception => 'IMPL::Exception',
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
12 ArgumentException => '-IMPL::InvalidArgumentException',
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
13 OperationException => '-IMPL::InvalidOperationException'
234
sergey
parents: 232
diff changeset
14 },
sergey
parents: 232
diff changeset
15 base => [
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
16 'IMPL::Object' => undef
234
sergey
parents: 232
diff changeset
17 ],
sergey
parents: 232
diff changeset
18 props => [
sergey
parents: 232
diff changeset
19 id => PROP_RO,
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
20 attributes => PROP_RW,
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 {
299
sergey
parents: 296
diff changeset
30 return '_' . $nextId++;
194
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
300
cin
parents: 299
diff changeset
34 our $AUTOLOAD_REGEX = qr/^[a-z]/;
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
35
334
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
36 my %mapSkipAttributes = map { $_, 1 } qw(attributes context);
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
37
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
38 sub CTOR {
299
sergey
parents: 296
diff changeset
39 my ($this,$template,$context,$attrs) = @_;
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
40
299
sergey
parents: 296
diff changeset
41
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
42 $this->template( $template ) or die new IMPL::ArgumentException("A template is required");
334
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
43
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
44 die IMPL::ArgumentException->new(context => "A context is required, supplied: $context")
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
45 unless is($context,TTContext);
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
46
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
47 $this->context( $context );
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
48
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
49 $this->attributes({});
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
50
301
aeeb57a12046 *IMPL::Web::View: templates inheritance support
cin
parents: 300
diff changeset
51 if(ref($attrs) eq 'HASH') {
299
sergey
parents: 296
diff changeset
52 while (my($key,$value) = each %$attrs) {
334
71221d79e6b4 removing web resources contracts
cin
parents: 314
diff changeset
53 next if $mapSkipAttributes{$key};
299
sergey
parents: 296
diff changeset
54 $this->SetAttribute($key,$value);
sergey
parents: 296
diff changeset
55 }
307
2da2564f115d *TTView: fixed memory leak
cin
parents: 302
diff changeset
56 }
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
57
299
sergey
parents: 296
diff changeset
58 $this->id(_GetNextId()) unless $this->id;
191
78a18a2b6266 IMPL::Web::View improvements (unstable)
cin
parents: 189
diff changeset
59 }
78a18a2b6266 IMPL::Web::View improvements (unstable)
cin
parents: 189
diff changeset
60
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
61 sub GetAttribute {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
62 my ($this,$name) = (shift,shift);
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
63
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
64 if (my $method = $this->can($name)) {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
65 unshift @_,$this;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
66 goto &$method;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
67 } else {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
68 return $this->attributes->{$name};
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
69 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
70 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
71
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
72 sub SetAttribute {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
73 my $this = shift;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
74 my $name = shift;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
75
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
76 if (my $method = $this->can($name)) {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
77 unshift @_, $this;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
78 goto &$method;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
79 } else {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
80 return $this->attributes->{$name} = shift;
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
81 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
82 }
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
83
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
84 sub Render {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
85 my ($this,$args) = @_;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
86
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
87 $args = {} unless ref $args eq 'HASH';
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
88
299
sergey
parents: 296
diff changeset
89 return $this->context->include(
301
aeeb57a12046 *IMPL::Web::View: templates inheritance support
cin
parents: 300
diff changeset
90 $this->template->block,
299
sergey
parents: 296
diff changeset
91 {
sergey
parents: 296
diff changeset
92 %$args,
sergey
parents: 296
diff changeset
93 this => $this,
sergey
parents: 296
diff changeset
94 template => $this->template
sergey
parents: 296
diff changeset
95 }
sergey
parents: 296
diff changeset
96 );
267
bbc0da7ef90e *IMPL::Web::View refactoring
cin
parents: 265
diff changeset
97 }
bbc0da7ef90e *IMPL::Web::View refactoring
cin
parents: 265
diff changeset
98
302
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
99 sub GetTemplate {
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
100 my ($this,$name) = @_;
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
101
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
102 return eval { $this->context->template($name) };
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
103 }
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
104
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
105 sub Include {
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
106 my ($this,$template, $args) = @_;
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
107
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
108 my $tpl = $this->GetTemplate($template)
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
109 or die OperationException->new("The specified template isn't found", $template);
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
110
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
111 return $this->context->include(
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
112 $tpl,
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
113 $args
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
114 );
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
115 }
673581380e79 Added templates provider functionality to controls
cin
parents: 301
diff changeset
116
314
cin
parents: 307
diff changeset
117 sub HasBlock {
cin
parents: 307
diff changeset
118 my ($this,$block) = @_;
cin
parents: 307
diff changeset
119
cin
parents: 307
diff changeset
120 $this->GetTemplate ? 1 : 0;
cin
parents: 307
diff changeset
121 }
cin
parents: 307
diff changeset
122
185
ae8072f2f2a3 IMPL::Web::View::TTDocument tests, fixes
cin
parents: 181
diff changeset
123 sub AUTOLOAD {
194
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
124 our $AUTOLOAD;
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
125
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
126 my $method = ($AUTOLOAD =~ m/(\w+)$/)[0];
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
127
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
128 return if $method eq 'DESTROY';
4d0e1962161c Replaced tabs with spaces
cin
parents: 192
diff changeset
129
300
cin
parents: 299
diff changeset
130 if ($method =~ /$AUTOLOAD_REGEX/) {
238
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
131 my $this = shift;
241
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
132
f48a1a9f4fa2 +Added ViewResult to allow implementation of the view environment.
sergey
parents: 238
diff changeset
133 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
134
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
135 return @_ ? $this->SetAttribute($method,@_) : $this->GetAttribute($method);
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
136 } else {
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
137 die OperationException->new("The specified method '$method' doesn't exists");
b8c724f6de36 DOM model refactoring
sergey
parents: 236
diff changeset
138 }
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
139 }
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
140
342
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
141 sub CreateControlFromTemplate {
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
142 my ($this,$template,$args) = @_;
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
143
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
144 if (not ref($template)) {
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
145 return $this->context->stash->get([
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
146 require => [
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
147 $template
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
148 ]
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
149 ])->new($args);
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
150 } else {
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
151 return $this->new(
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
152 $template,
343
9bdccdf1f50b Added a templates context
cin
parents: 342
diff changeset
153 $this->context->clone(),
342
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
154 $args
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
155 );
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
156 }
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
157 }
1090c1dd7429 TTControl: added a helper method 'CreateControlFromTemlpate'
cin
parents: 334
diff changeset
158
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
159 1;
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
160
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
161 __END__
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
162
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
163 =pod
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
164
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
165 =head1 NAME
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
166
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
167 C<IMPL::Web::View::TTControl>
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
168
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
169 =head1 SYNPOSIS
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
170
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
171 =begin text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
172
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
173 [%
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
174 META version = 1;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
175 BLOCK INIT;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
176 # this is a document scope
299
sergey
parents: 296
diff changeset
177 dojo.modules.push( 'dijit/form/Input' );
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
178 END;
299
sergey
parents: 296
diff changeset
179
sergey
parents: 296
diff changeset
180 # local to this block
sergey
parents: 296
diff changeset
181 TPreview = require('My/Org/TextPreview');
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
182
299
sergey
parents: 296
diff changeset
183 # init control props
sergey
parents: 296
diff changeset
184 visualClass = this.visualClass || 'classic';
sergey
parents: 296
diff changeset
185 %]
sergey
parents: 296
diff changeset
186 <div id="$id" class="$visualClass" data-dojo-type="dijit/form/Input">
sergey
parents: 296
diff changeset
187 [% FOREACH item IN model %]
sergey
parents: 296
diff changeset
188 <div class="itemContainer">
sergey
parents: 296
diff changeset
189 [% Display(item) %]
sergey
parents: 296
diff changeset
190 </div>
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
191 [% END %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
192 </div>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
193
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
194 =end text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
195
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
196 =head1 DESCRIPTION
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
197
299
sergey
parents: 296
diff changeset
198 Легкая обертка вокруг шаблона, позволяет изолировать пространство имен шаблона,
sergey
parents: 296
diff changeset
199 а также реализовать собственные методы по представлению данных (в случае если
sergey
parents: 296
diff changeset
200 это проще сделать в виде методов класса).
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
201
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
202 =head2 BLOCKS
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
203
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
204 =head3 META
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
205
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
206 Атрибуты C<META> C<layout>, C<title> будут перенесены в свойства элемента
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
207 управления.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
208
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
209 =head3 INIT
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
210
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
211 Данный блок шаблона управления выполняется один раз при создании первого
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
212 экземпляра элемента управления, в пространстве имен документа. Может
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
213 использоваться для формирования заголовочной части документа, скрипта
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
214 подключающего C<js> модули и т.п.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
215
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
216 Выполнение данного блока производится фабрикой элементов управления.
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
217
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
218 =head2 TEMPLATE VARS
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
219
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
220 Каждый шаблон имеет собственное пространство имен, вложенное в пространство имен
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
221 фабрики элементов (которая разделяет пространство имен документа). В шаблоне
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
222 могут определяться новые переменные, однако они останутся локальными для блоков.
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 управления C<this>.
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
226
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
227 =begin text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
228
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
229 [%
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
230 BLOCK CTOR;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
231 this.extraCssClass = 'active';
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
232 text = "this text will gone";
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
233 END;
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
234 %]
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
235
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
236 <div class="$this.extraCssClass">some text $text</div>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
237
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
238 =end text
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
239
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
240 В примере выше переменная C<$text> установленная в конструкторе шаблона, при
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
241 отображении элемента управления будет неопределена.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
242
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
243 =over
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
244
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
245 =item * C<this>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
246
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
247 ссылка на объект элемента управления
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
248
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
249 =item * C<component>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
250
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
251 ссылка на текущий шаблон, устанавливается автоматически в методе
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
252 C<Template::Context::process>.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
253
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
254 =item * C<template>
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
255
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
256 ссылка на шаблон элемента управления, для совместимости с C<TT>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
257
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
258 =back
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
259
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
260 =head1 MEMBERS
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
261
300
cin
parents: 299
diff changeset
262 =head2 C<[get]context>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
263
300
cin
parents: 299
diff changeset
264 Контекст элемента управления, хранит пременные шаблона. Фабрика элементов
cin
parents: 299
diff changeset
265 управления создает новый контекст пространство имен которого вложено в
cin
parents: 299
diff changeset
266 пространство имен документа.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
267
300
cin
parents: 299
diff changeset
268 Контекст следует использовать только при рендеринге документа.
cin
parents: 299
diff changeset
269
cin
parents: 299
diff changeset
270 =head2 C<[get,set]template>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
271
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
272 C<Template::Document> Шаблон элемента управления.
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
273
300
cin
parents: 299
diff changeset
274 =head2 C<AUTOLOAD>
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
275
265
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
276 Для удобства работы с шаблоном, элементы управления предоставляю доступ к своим
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
277 свойствам через метод C<AUTOLOAD>. Имена свойств должны начинаться со строчной
6b6d4b2275a1 improved documentation
cin
parents: 241
diff changeset
278 буквы.
187
927653d01f4f TTControl::AUTOLOAD now accesses nodeProperties
sergey
parents: 186
diff changeset
279
181
47dac58691ee New templating system, small fixes
sourcer
parents:
diff changeset
280 =cut