fixin (fixin) wrote,
fixin
fixin

Переспал с мыслью о Галлерее

Я уже было хотел отказаться от управляемых форм и реализовать всё на обычных, но мне пришла в голову спасительная мысль поэкспериментировать с полем табличного документа.

И о чудо! Всё получилось, мне удалось даже в тонком клиенте нарисовать галерею. Причем все работает быстро даже без эскизов. Обычные JPG файлы быстро показываются 1ской в уменьшенном формате! Клёво.

В приступе отчаяния я уже думал взяться за Java или QT (из пушки да по воробьям):

Но достаточно было переспать одну ночь с мыслью о Галлерее и мне пришло решение, как Менделееву его таблица.

От эксизов я не собираюсь совсем отказываться, для видео файлов я попробую создавать gif-картинки с раскадровкой и буду показывать их вместо эскизов, если конечно, для этого есть инструменты.

Для доступа к exif-данным медиафайлов буду использовать ImageMagic в режиме командной строки, скармливая ей пакет из 50-100 файлов за раз.

1С движется в сторону асинхронности выполнения, поэтому приходится ставить триггер даже на получение информации о том, является файл каталогом или нет. Т.е. любой участок кода, который подразумевает задержку, нужно обрамлять триггером. Код писать стало сложнее, но не невозможно.

По крайней мере, перебор файлов для заполнения коллекции я уже реализовал.

Еще пару слов о том, зачем писать Медиатеку на 1С, не самом подходящем инструменте для этого?

Дело в том, что сейчас в отрасли "Кризис IT", из-за того, что софт пишется коммерческими организациями, нет ни одного нормального медиа-организатора, которой бы пользователь-перфекционист мог бы доверить хранение метаданных о своей коллекции. У всех ужасающие пробелы, хотя их устранение - вопрос нескольких часов/дней работы программисты. Скорее всего это политика и видение компаний таких органзаторов.

Если я напишу простой органайзер, и он окажется удобным и востребованным, ничто не помешает использовать его как прототип и переписать его уже не на 1С, а на нормальной среде. 1С отличается от современных языков тем, что там даже в одно программистское рыло можно быстро реализовать то, что на классических языках пишется долго и коллективом.

Ну, или, как вариант, можно выпустить Медиатеку в 1С:Совместимо, когда не нужно будет покупать 1С платформу за 300$, чтобы насладиться продуктом, а достаточно будет заплатить 1000 рублей за базовую версию (т.е. полностью функциональную, но без возможности внесения изменений в код).

Вот код, который отрисовывает картинки галлереи:


    ТабДок = ПолеТабличногоДокумента;
   
ОчиститьНаСервереПолеТабличногоДокумента(ТабДок);
   
КоличествоКолонок = 6;
   
Инд = 1;
    Для Каждого
Строка ИЗ Объект.Файлы Цикл
       
ТекКартинка = Новый Картинка(Строка.АбсолютноеИмяФайла);
       
ТекОбласть = ТабДок.Область(Инд, 1);
       
ТекРисунок = ТабДок.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
       
ТекРисунок.Картинка = ТекКартинка;
       
ВысотаКартинки = 30;
       
ШиринаКартинки = 30;
       
ПоложениеВерх = Цел((Инд - 1)/КоличествоКолонок) * (ВысотаКартинки + 2);
       
ПоложениеЛево = ((Инд - 1) % КоличествоКолонок) * (ШиринаКартинки + 2);
       
ТекРисунок.Верх ПоложениеВерх;
       
ТекРисунок.Лево = ПоложениеЛево;
       
ТекРисунок.Ширина = ШиринаКартинки;
       
ТекРисунок.Высота = ВысотаКартинки;
       
Инд = Инд + 1;
    КонецЦикла;

Tags: , Кризис IT, Управляемые формы 1С

Posts from This Journal “1С” Tag

  • Вид операции в 1С.

    Коварные методисты 1С предусмотрели во многих документах поле «Вид операции». Вид операции определяет поведение и проводки документа. Но, как это…

  • Миста не монетизируется

    Сперва глупый Влобешник порезал и забанил весь актив. А потом получил то, что рекламы нет... Такова селяви. Гыгыгы.... Жаль, такую тусовку загубил…

  • На три замка.

    Сколько я ни покупал лицензионных программ, у всех их была простая, понятная и очевидная защита - через сериальный номер. Вводишь номер, и при…

  • Ухудшалец внешних отчетов и обработок

    К сожалению, часто бывает, что в новой версии всё отлично, но что-то старое, доброе, хорошее, ломается. Хуже, если это признается "передовым" и…

  • Схема запроса

    В новых релизах 1С8 появился объект схема запроса. С ним сопровождать типовые конфигурации стало еще удобнее. Если нужно хирургически вмешаться в…

  • Безумству крупных пою я славу

    Безумству крупных пою я славу В ЕРП и СЭД у меня были одинаковые модули и общая форма для работы с RFID сканером. Изначально я писал их в СЭД, но…

  • 5 лямов рублей за мои услуги

    Я вот подумал, что за четыре года своей работы на прошлой работе я обошелся предприятию в 5,76 млн. рублей, т.к. получал 120 тысяч в месяц. Как…

  • Тысяча 1С-чертей!

    Давеча пришлось ковыряться с одним отчетом. На него не выделялось очень много времени, т.к. горели сроки. А жаль, потому что хотелось этот отчет…

  • Прислонение файла при записи документа в СЭД

    Попросили прикладывать еще один файл при записи нового внутреннего документа. Приложенные файлы можно указать в шаблоне внутреннего документа, но…

Buy for 50 tokens
Пришла долгожданная Весна. У кого-то распустились тюльпаны,у кого-то кот ушел гулять по крышам, у кого-то набухли почки и увеличилась печень. У Аргона каждую весну обостряется чувство тотального одиночества. Как никогда болезненно, весной им воспринимается то, что он стар и глуп, то что…
  • Post a new comment

    Error

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

  • 48 comments