Line # | Revision | Author | |
---|---|---|---|
1 | 296 | ahitrov | <style> |
2 | .input {width:97%;font-family:arial;font-size:8pt;border:1px solid #aaa} | ||
3 | .textarea {width:97%; height:100px;font-family:arial;font-size:8pt;border:1px solid #aaa} | ||
4 | </style> | ||
5 | <%args> | ||
6 | |||
7 | $name => undef | ||
8 | $rusname => undef | ||
9 | $check => undef | ||
10 | |||
11 | </%args> | ||
12 | <%init> | ||
13 | |||
14 | my $fields; | ||
15 | eval { $fields = eval('use vars qw($VAR1); '.$check) }; | ||
16 | $fields = [] unless $fields; | ||
17 | $m->out('<h5 style="margin:0; padding:4px; color:blue; background:silver;">Список полей:</h5>'); | ||
18 | $m->out('<div style="padding:4px; background:#d0e0f0; text-align:center;">'); | ||
19 | my $i = 1; | ||
20 | foreach my $field (@$fields) { | ||
21 | my $rusname = "$rusname N$i"; | ||
22 | $m->comp('.field', | ||
23 | name => $name, | ||
24 | fname => $field->{name}, | ||
25 | url => $field->{url}, | ||
26 | alias => $field->{alias}, | ||
27 | image => $field->{image}, | ||
28 | amage => $field->{amage}, | ||
29 | delete => 1, | ||
30 | number => $i); | ||
31 | $i++; | ||
32 | } | ||
33 | $rusname = "$rusname N$i"; | ||
34 | $m->comp('.field', name => $name, fname => '', url => '', alias => '', delete => 0, number => $i); | ||
35 | $m->out('</div>'); | ||
36 | |||
37 | </%init> | ||
38 | <%def .field> | ||
39 | <%args> | ||
40 | $name => undef | ||
41 | $fname => undef | ||
42 | $url => undef | ||
43 | $alias => undef | ||
44 | $image => undef | ||
45 | $amage => undef | ||
46 | $delete => 0 | ||
47 | $number => undef | ||
48 | </%args> | ||
49 | <%init> | ||
50 | </%init> | ||
51 | <table width="95%" style="margin:5px 0;padding:5 6 5 6;border:1px solid #ccc;font-size:70%;font-family:Tahoma;background-color:#f5f5f5;color:#000;"> | ||
52 | <tr><td width="5%">#</td><td width="95%"><% $number %></td></tr> | ||
53 | <tr><td width="1%"><b>Название:</b></td><td width="99%"><input class="input" type="text" name="<% $name.'_name_'.$number %>" value="<% $fname %>"></td></tr> | ||
54 | <tr><td><b>Ссылка:</b></td><td><input class="input" type="text" name="<% $name.'_url_'.$number %>" value="<% $url %>"></td></tr> | ||
55 | <tr><td><b>Алиас:</b></td><td><input class="input" type="text" name="<% $name.'_alias_'.$number %>" value="<% $alias %>"></td></tr> | ||
56 | <tr><td><b>Картинка:</b>(норм)</td><td><input class="input" type="text" name="<% $name.'_image_'.$number %>" value="<% $image %>"></td></tr> | ||
57 | <tr><td><b>Картинка:</b>(актив)</td><td><input class="input" type="text" name="<% $name.'_amage_'.$number %>" value="<% $amage %>"></td></tr> | ||
58 | % if ( $delete ) { | ||
59 | <tr><td></td><td style="color:red;"><input type="checkbox" name="<% $name.'_delete_'.$number %>">Удалить</td></tr> | ||
60 | % } | ||
61 | </table> | ||
62 | </%def> |