Revision 3 (by ahitrov@rambler.ru, 2010/03/24 15:19:32) The CORE
<!-- ���� ������ ����������� -->
<table cellpadding="0" cellspacing="2" border="0" width="100%">
<tr><td><b><% $rusname %></b> / <font size="-1" color="#888888">name="<% $attr %>"</font> </td></tr>
<tr><td><input type="file" name="<% $attr %>" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
%	if ( exists($MULTI->{filename}) )
%	{
%		my $TYPE = 'unknown';
%		if (length($MULTI->{ext}) > 0)
%		{
%			if (-e $keeper->{state}->{mason_comp}.'/contenido/i/icons/'.$MULTI->{ext}.'.gif')
%			{
%				$TYPE = $MULTI->{ext};
%			}
%		}
<tr><td style="font-size:95%;"><% $MULTI->{filename} %></td></tr>
<tr><td>

<table border="0" width="100%"><tr>
<td align="right"><a href="<% $MULTI->{filename} %>"><img src="/contenido/i/icons/<% $TYPE %>.gif" width="36" height=36" hspace="5" border="0"></a></td>
<td>
<font size="-1" color="#888888">���: <% uc($MULTI->{ext}) %><br>
������: <% int($MULTI->{size}/1024) %> ��
</font>
</td>
</tr></table>

</td></tr>
%	}
%
%	foreach my $iattr (sort (@{ $iattrs }))
%	{
%		next	if ( ($iattr eq 'filename') || ($iattr eq 'mini') || ($iattr eq 'width') || ($iattr eq 'height') );
<tr><td><font size="-1" color="#888888"><% $ATTRNAMES->{$iattr} %> (<% $iattr %>):</font></td></tr>
<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>
%	}
<tr><td><input type="checkbox" name="_delete_multi.<% $attr %>" value="1">�������<br><br></td></tr>
</td></tr></table>

<%ARGS>

	$MULTI => undef
	$rusname => undef
	$attr => undef
	$prop => {}

</%ARGS>
<%DOC>

	���������� ���������� ���� ��������...

</%DOC>
<%INIT>

	my $iattrs = $prop->{iattrs};
	$iattrs ||= [];

	my $ATTRNAMES = {
		'alt' => '�������',
		'btext' => '����� �� ��������',
		'atext' => '����� ����� ��������',
		'url' => '������ � ��������',
		'copyright' => '��������',
	};
	
</%INIT>