qwark
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору niko7 скачать с родного сайта, установить магик включив галку для разработчиков или как-то так пример клюшки: обрезает пустые края, добавляет по 5 пикселов, добавляет к короткой стороне пустоту чтобы получился квадрат (7-ка не умела показывать "пропорционально"), копирует в ИмяФотографии. Код: ИмяФотографии = глПолучитьИмяФото(ТекущийЭлемент(), 0); IM = CreateObject("ImageMagickObject.MagickImage.1"); FileName=глКаталогФото+"Photos\tempimg.jpg"; IM.convert(Файл,"-trim","+repage","-bordercolor","White","-border","5%x5%",FileName); width = число(IM.Convert(FileName,"-format","%w",FileName)); height = число(IM.Convert(FileName,"-format","%h",FileName)); Если width > height Тогда Size="0x"+СокрЛ(Строка(Окр((width-height)/2,0))); ИначеЕсли width < height Тогда Size=СокрЛ(Строка(Окр((height-width)/2,0)))+"x0"; КонецЕсли; IM.convert(FileName,"-bordercolor","White","-border",Size,ИмяФотографии); IM = 0; |
|