Line # Revision Author
1 8 ahitrov@rambler.ru <!-- Один объект мультимедиа -->
2 <table cellpadding="0" cellspacing="2" border="0" width="100%">
3 <tr><td><b><% $rusname %></b> / <font size="-1" color="#888888">name="<% $attr %>"</font> </td></tr>
4 <tr><td><input type="file" name="<% $attr %>" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
5 % if ( exists($MULTI->{filename}) )
6 % {
7 % my $TYPE = 'unknown';
8 % if (length($MULTI->{ext}) > 0)
9 % {
10 % if (-e $keeper->{state}->{mason_comp}.'/contenido/i/icons/'.$MULTI->{ext}.'.gif')
11 % {
12 % $TYPE = $MULTI->{ext};
13 % }
14 % }
15 <tr><td style="font-size:95%;"><% $MULTI->{filename} %></td></tr>
16 <tr><td>
17
18 <table border="0" width="100%"><tr>
19 <td align="right"><a href="<% $state->{binary_dir} %><% $MULTI->{filename} %>"><img src="/contenido/i/icons/<% $TYPE %>.gif" width="36" height=36" hspace="5" border="0"></a></td>
20 <td>
21 <font size="-1" color="#888888">Тип: <% uc($MULTI->{ext}) %><br>
22 Размер: <% int($MULTI->{size}/1024) %> Кб
23 </font>
24 </td>
25 </tr></table>
26
27 </td></tr>
28 % }
29 %
30 % foreach my $iattr (sort (@{ $iattrs }))
31 % {
32 % next if ( ($iattr eq 'filename') || ($iattr eq 'mini') || ($iattr eq 'width') || ($iattr eq 'height') );
33 <tr><td><font size="-1" color="#888888"><% $ATTRNAMES->{$iattr} %> (<% $iattr %>):</font></td></tr>
34 <tr><td><input type="text" name="<% $attr %>.<% $iattr %>" size="60" value="<% html_escape($MULTI->{$iattr}) %>" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
35 % }
36 <tr><td><input type="checkbox" name="_delete_multi.<% $attr %>" value="1">Удалить<br><br></td></tr>
37 </td></tr></table>
38
39 <%ARGS>
40
41 $MULTI => undef
42 $rusname => undef
43 $attr => undef
44 $prop => {}
45
46 </%ARGS>
47 <%DOC>
48
49 Компонента отображает одну картинку...
50
51 </%DOC>
52 <%INIT>
53
54 my $iattrs = $prop->{iattrs};
55 $iattrs ||= [];
56
57 my $ATTRNAMES = {
58 'alt' => 'Подпись',
59 'btext' => 'Текст до картинки',
60 'atext' => 'Текст после картинки',
61 'url' => 'Ссылка с картинки',
62 'copyright' => 'Копирайт',
63 };
64
65 </%INIT>