Revision 560 (by ahitrov, 2016/03/31 14:42:46) Extended format for iattrs in images and binaries

<!-- Одна картинка -->
<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>
<div><a href="javascript:void(0)" class="mm_act" id="<% $attr %>_file_prompt" style="padding:0 6px;"
 onclick="$('#<% $attr %>_url_loader').hide(); $('#<% $attr %>_file_loader').show(); $('#<% $attr %>_file_prompt').addClass('mm_act'); $('#<% $attr %>_url_prompt').removeClass('mm_act'); return false;">file</a>
<a href="javascript:void(0)" class="mm_inact" id="<% $attr %>_url_prompt" style="padding:0 6px;"
 onclick="$('#<% $attr %>_file_loader').hide(); $('#<% $attr %>_url_loader').show(); $('#<% $attr %>_url_prompt').addClass('mm_act'); $('#<% $attr %>_file_prompt').removeClass('mm_act'); $('#<% $attr %>_ext_url')[0].focus(); return false;">url</a></div>
<div id="<% $attr %>_file_loader" style="background:#d0d0d0; padding:2px;">
<input type="file" name="<% $attr %>" style="width:95%;font-family:arial;font-size:9pt;"></div>
<div id="<% $attr %>_url_loader" style="display:none; background:#d0d0d0; padding:2px;">&nbsp;URL:&nbsp;<input
 id="<% $attr %>_ext_url" type="text" name="<% $attr %>.ext_url" style="width:81%;font-family:arial;font-size:9pt;"></div>
</td></tr>
%	if ( exists($IMAGE->{width}) && exists($IMAGE->{height}) && exists($IMAGE->{filename}) )
%	{
<tr><td style="font-size:95%;"><% $IMAGE->{filename} %></td></tr>
%		my $max_show_width = 200;
%		my $show_w = ( $IMAGE->{width} > $max_show_width ? $max_show_width : $IMAGE->{width} );
%		my $show_h = ( $IMAGE->{width} > $max_show_width ? ($max_show_width*$IMAGE->{height}/$IMAGE->{width}) : $IMAGE->{height} );
%		my $img_path = $state->{images_dir}.'/'.$IMAGE->{filename};
<tr><td>
%       $img_path =~ s|^/{2,}|/|; 
%       my $u1 = URI->new($img_path);
%       my $path = $u1->path;
%       $path =~ s|/{2,}|/|g;
%       $u1->path($path);        
%       $img_path = $u1->canonical;
<font size="-1" color="#888888">ШИР x ВЫС: <% $IMAGE->{width} %>x<% $IMAGE->{height} %></font>
<img src="<% $img_path %>" alt="<% html_escape($IMAGE->{alt}) %>" width="<% $show_w %>" height="<% $show_h %>"><br>
</td></tr>
%	}
%

%	foreach my $iattr (@{ $iattrs })
%	{
%		next	if ( !ref $iattr && ($iattr eq 'filename') || ($iattr eq 'width') || ($iattr eq 'height') );
%		if ( ref $iattr eq 'ARRAY' ) {
<tr><td><font size="-1" color="#888888"><% $iattr->[1] %> (<% $iattr->[0] %>):</font></td></tr>
<tr><td><input type="text" name="<% $attr %>.<% $iattr->[0] %>" size="60" value="<% html_escape($IMAGE->{$iattr->[0]}) %>" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
%		} elsif ( ref $iattr eq 'HASH' ) {
<tr><td><font size="-1" color="#888888"><% $iattr->{name} %> (<% $iattr->{attr} %>):</font></td></tr>
<tr><td><input type="text" name="<% $attr %>.<% $iattr->{attr} %>" size="60" value="<% html_escape($IMAGE->{$iattr->{attr}}) %>" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
%		} elsif ( $iattr eq 'mini' ) {
<tr><td><font size="-1" color="#888888">name="<% $attr %>_mini"</font> </td></tr>
<tr><td><input type="file" name="<% $attr %>_mini" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
%			if (exists($IMAGE->{mini}->{filename}) )
%			{
<tr><td style="font-size:95%;"><% $IMAGE->{mini}->{filename} %></td></tr>
%		my $max_show_width = 200;
%		my $show_w = ( $IMAGE->{mini}->{width} > $max_show_width ? $max_show_width : $IMAGE->{mini}->{width} );
%		my $show_h = ( $IMAGE->{mini}->{width} > $max_show_width ? ($max_show_width*$IMAGE->{mini}->{height}/$IMAGE->{mini}->{width}) : $IMAGE->{mini}->{height} );
<tr><td>
<font size="-1" color="#888888">ШИР x ВЫС: <% $IMAGE->{mini}->{width} %>x<% $IMAGE->{mini}->{height} %></font>
<img src="<% $state->{images_dir}.'/'.$IMAGE->{mini}->{filename} %>" alt="<% html_escape($IMAGE->{mini}->{alt}) %>" width="<% $show_w %>" height="<% $show_h %>"><br>
</td></tr>
%			}
%		} else {
<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($IMAGE->{$iattr}) %>" style="width:95%;font-family:arial;font-size:9pt;"></td></tr>
%		}
%	}

<tr><td><input type="checkbox" name="_delete_image.<% $attr %>" value="1">Удалить<br><br></td></tr>
</table>

<%ARGS>

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

</%ARGS>
<%DOC>

	Компонента отображает одну картинку...

</%DOC>
<%INIT>

	my $iattrs = $prop->{iattrs};
	$iattrs = ['alt']	unless $iattrs;

	my $ATTRNAMES = {
		'alt' => 'Подпись',
		'btext' => 'Текст до картинки',
		'atext' => 'Текст после картинки',
		'url' => 'Ссылка с картинки',
		'copyright' => 'Копирайт',
	};
	
</%INIT>