Имеется некоторый набор файлов jpg, размером 70*200. Мне нужно разобрать данные файлы по пикселям, чтобы исправить/проанализировать изображение. Результат разбора хочу поместить в таблицу значений 70*200, где в каждой ячейке таблицы будет цвет. Далее упрощаю до двухцветного изображения, и анализирую, что нарисовано. То есть есть определенный символ или нет. Пока проблема в том, что получаю двоичные данные картинки, но не могу понять, как пройтись циклом по каждому пикселю и получить его положение и цвет. Может кто-нибудь знает ответ?

Взять внешнюю компоненту какую-нибудь. Зачем всё это тащить в 1с?

Через какую например? Мне изображение нужно разбить в матрицу пикселей с цветами (таблица значений), обработать (упростить) и отрисовать на элементе формы

Задача: распознавать наличие определенных символов на изображениях и в зависимости от результата распознавания выполнять действия

Гуглите по запросу: 1С OCR.
Например, http://catalog.mista.ru/public/586313/

Ну блин... Всё через одно место...
Формат файлов известен, бинарные потоки в 1с есть. Так что открывай спецификацию и вперёд...

Тут в зависимости от того, какие изображения будут давать, возможно придется угадывать функцию линии, наклон, кривизну

(5)я получила двоичные данные, в исходниках-примерах, которые я нагуглила, получают ширину/высоту файла. А вот как разобрать двоичные данные по пикселям мне не понятно

(4) у меня не совсем такое распознавание, поэтому в идеале свою нейросеть. А я не то, что до нее, я не могу даже до чтения картинки дойти...

А в бинарном файле можете получить 21 байт?

(9) Я получал...

Мне нужен алгоритм прохода циклом по пикселям и получения цвета каждого пикселя в картинке в формате png или jpeg. Читаю про форматы, но никак не пойму, как с двоичных данных вытащить цвета.

(11) заказывай на фрилансе.

Там нет пикселей пока,
нам есть сжатый архив.
Типа как RAR АРХИВ, там нет файлов в том виде в котором вам привычно,

(13)это я начала понимать, что часть файла после заголовка некоторый ключ, часть файла - сами данные, с шифром ключа

Я смотрела компоненты, но там только растянуть/повернуть, добавить лого. Кому-нибудь попадались компоненты по переданным координатам пикселя получить цвет?

https://ru.wikipedia.org/wiki/Libjpeg

JPEGfix позволяет:
1) Просматривать фотографии и прочие изображения в формате JPEG, даже если они повреждены, включая потерю заголовка
2) Вносить поправки в изображение, восстанавливающие искажение цвета и сдвиг
3) Сохранять изображение в формате JPEG или BMP
4) Экспортировать изображение в растре YCbCr или в DCT-коэффициентах для обработки в других программах
5) Также в программу включены различные средства анализа файлов и повреждений


вот 4 пункт можно заюзать.

(14) можно написать консольку, которая распакует картинку в нужный формат. или перевести в bmp - там структура проще, но и вес больше.

(17) спасибо.

(14) вот пробую. Смущает, что при чтении biPlanes получается на 1, а 256 и biBitCount 6144

Какие-то нереальные значения

//пробую текущую картинку преобразовать в BMP и прочитать его структуру
    Картинка = Новый Картинка(ПутьКФайлу);
    Картинка = Картинка.Преобразовать(ФорматКартинки.PNG);
    КартинкаБМП = Картинка.Преобразовать(ФорматКартинки.BMP);
    ДанныеКартинки = КартинкаБМП.ПолучитьДвоичныеДанные();
    Поток = ДанныеКартинки.ОткрытьПотокДляЧтения();
    Чтение = Новый ЧтениеДанных(ДанныеКартинки,,ПорядокБайтов.BigEndian);
    bfType = Чтение.ПрочитатьЦелое16(ПорядокБайтов.BigEndian); //bfType
    bfSize = Чтение.ПрочитатьЦелое32();
    bfReserved1 = Чтение.ПрочитатьЦелое16();
    bfReserved2 = Чтение.ПрочитатьЦелое16();
    bfOffBits = Чтение.ПрочитатьЦелое32();
    ////BITMAPINFOHEADER // версия 3
    biSize = Чтение.ПрочитатьЦелое32();
    biWidth = Чтение.ПрочитатьЦелое32(); // ширина изображения в пикселах
    biHeight = Чтение.ПрочитатьЦелое32(); // высота изображения в пикселах
    biPlanes = Чтение.ПрочитатьЦелое16(); // содержит единицу
    biBitCount = Чтение.ПрочитатьЦелое16(); // количество бит на пиксел
    biCompression = Чтение.ПрочитатьЦелое32(); // тип сжатия
    biSizeImage = Чтение.ПрочитатьЦелое32(); // размер изображения в байтах
    biXPelsPerMeter = Чтение.ПрочитатьЦелое32(); // горизонтальное разрешение в пикселах на метр
    biYPelsPerMeter = Чтение.ПрочитатьЦелое32(); // вертикальное разрешение в пикселах на метр
    biClrUsed = Чтение.ПрочитатьЦелое32(); //  количество используемых цветовых индексов в палитре
    biClrImportant = Чтение.ПрочитатьЦелое32(); // количество индексов

    //мКартинки = Новый Массив(biHeight,biWidth);
    мКартинки = Новый Массив(10000,10000);
    Для а1 = 0 По biHeight-1 Цикл
        Для а2 = 0 По biWidth - 1 Цикл
            блю = Чтение.ПрочитатьБайт();
            грин = Чтение.ПрочитатьБайт();
            ред = Чтение.ПрочитатьБайт();
            цвет = Новый Цвет(ред,грин,блю);
            мКартинки[а1][а2] = цвет;
        КонецЦикла;
    КонецЦикла;

Высота получается 1 174 405 120, ширина 3 355 443 200. А читает картинку вроде правильно, там угол белый, потом сереет.

Массив такого объема не создается, значит файл надо упростить по параметрам biPlanes и biBitCount, теперь нужна помощь в этом...

Либо не так просто читаю

А что, из Зазеркалья уже статейку-то позабыли?

(26) откуда?

вы на полном серьезе хотите подобные вещи в 1С делать? Ну вы блин даете...

(27) https://wonderland.v8.1c.ru/
Хотя посмотрел ту статью - там пробегаются по пикселам из предположения что они уже получены)

Высота получается 1 174 405 120, ширина 3 355 443 200 -- что-то многовато, нет?
И насчет BigEndian по умолчанию вы уверены? Так-то у процов intel и на платформе Windows преимущественно Little Endian порядок байтов...

https://ru.wikipedia.org/wiki/Порядок_байтов

Порядок байт в 16-битных и 32-битных ячейках повсюду от младшего к старшему (little-endian)

https://ru.wikipedia.org/wiki/BMP#Внутреннее_строение

(0) Если файлов картинок много то только внешние средства, некую ВК или прогу, кодом на 1С на надо будет тормозно.

Может фигнёй не заниматься, а взять правильный инструмент?
Для распознавания картинок пацаны рекомендуют python и ImageAI. Говорят, в 10 строк что хошь распознаёт.

GFLax

(33) думаю, не просто тормозно, а очень тормозно. Заниматься математикой на таких матрицах, какие дают картинки современных мегапиксельных размеров, можно только в машинных кодах. А для этого надо иметь нормальные библиотеки, как в питоне, или самому писать математику хотя бы на С/С++, который компилируется в приличный машинный код. Ну, может быть, на свежих машинах еще Java/C# сгодятся. Но не 1С уж точно.

(28) пока ни одна компонента не возвращает мне картинку по цветам пикселей... пытаюсь сделать сама

Похоже ТС занимается построением траектории обнаружения?

(37) Напиши свою на C# https://docs.microsoft.com/ru-ru/dotnet/api/system.drawing.bitmap.getpixel?view=netframework-4.8

Или на 1С http://catalog.mista.ru/public/609487/

Лично так как я нынче Golang осваиваю то взял бы https://socketloop.com/tutorials/golang-get-rgba-values-of-each-image-pixel и завернул в простейший exe, который при запуске поднимает http сервис на указанном порту.
И можно через HTTPСоединение отправить jpeg в ответ получив в json массив RGB точек.

На питоне есть масса решений для распознавания картинок.

(41) Они на чем угодно есть.
На питоне можно сделать (и как сложно) нечто что банальным образом используется из 1С?

(40)+ Мне подобный сервис писать примерно час, может два.

(42) на чем угодно !== Легко использовать
Питон все же понятнее, легче, приятнее

(44) И как использовать это на питоне без установки питона, апача и прочих?

(45)+ Плюс C# и Go в том что можно в exe (или в dll) скомпилить и это штатная фича.

Хмм сча

(45) апач зачем? Тут как я понял есть набор картинок, наверное на диске.

(46) из 1с можно вызвать батник, а он уже стартанет все что угодно

(47)+ https://i.paste.pics/dbe164449241c5aaefbf6db7023b3a92.png

Код на Го из (40) работает отлично, банально вместо консоли писать в текстовый файл, а на 1С сначала exe запускаем с ключами строки указывая каталог или имя файла jpg а затем читаем полученные csv

(49) Питон где взять? Тут банальный exe который даже можно в макет встроить.

Я пока не допилил свою хрень чтобы ВК для 1С нормально было делать, дальше тестового но работающего примера не зашел.

(51) *чтобы ВК для 1С на Golang нормально было делать

(51) где взять питон. Какой сложный вопрос.
Кстати, питон можно тоже в exeшник собрать

(53) Ок покажи пример на питоне, хотя бы как у меня на Go :)

(54)+ У меня ушло 5 минут, за 10-20 минут я добавлю ключи запуска или перебор файлов в каталоге и запись в csv и считай готово

(0) Короче суть в том, что самой парсить исходный формат изображения - дело неблагодарное. Там везде свои хитрые приколы хранения информации о цвете. Нужно задействовать готовую либу или утилиту, которая уже умеет раскладывать пиксели с их цветами во вменяемый для дальнейшей обработки формат.

Хотя погоди. Каким именно образом ты собираешься "упростить до двухцветного изображения"? До монохрома, имелось в виду? Это же можно делать по-разному с разным результатом на выходе. И для этого тоже можно использовать готовые инструменты.

(55) молодец. Ты победил.
ТС, юзай это решение

Решение с конверталкой из jpeg в csv на Golang:

package main

import (
    "encoding/csv"
    "fmt"
    "image"
    "image/jpeg"
    "os"
    "strconv"
)

func init() {
    // damn important or else At(), Bounds() functions will
    // caused memory pointer error!!
    image.RegisterFormat("jpeg", "jpeg", jpeg.Decode, jpeg.DecodeConfig)
}

func StrXYRGBA(x, y int, r, g, b, a uint32) []string {
    result := make([]string, 6)

    result[0] = strconv.Itoa(x)
    result[1] = strconv.Itoa(y)
    result[2] = strconv.Itoa(int(r))
    result[3] = strconv.Itoa(int(g))
    result[4] = strconv.Itoa(int(b))
    result[5] = strconv.Itoa(int(a))

    return result
}

func main() {

    args := os.Args
    if len(args) < 3 {
        fmt.Println("Missing image and result csv filename!")
        os.Exit(1)
    }

    imageFilename := args[1]
    resultFilename := args[2]
    fmt.Println("Convert from " + imageFilename + " to " + resultFilename)

    imgfile, err := os.Open(imageFilename)

    if err != nil {
        fmt.Println("img.jpg file not found!")
        os.Exit(1)
    }

    defer imgfile.Close()

    // get image height and width with image/jpeg
    // change accordinly if file is png or gif

    imgCfg, _, err := image.DecodeConfig(imgfile)

    if err != nil {
        fmt.Println(err)
        os.Exit(1)
    }

    width := imgCfg.Width
    height := imgCfg.Height

    fmt.Println("Width : ", width)
    fmt.Println("Height : ", height)

    // we need to reset the io.Reader again for image.Decode() function below to work
    // otherwise we will  - panic: runtime error: invalid memory address or nil pointer dereference
    // there is no build in rewind for io.Reader, use Seek(0,0)
    imgfile.Seek(0, 0)

    // get the image
    img, _, err := image.Decode(imgfile)

    fmt.Println(img.At(10, 10).RGBA())

    data := [][]string{}

    for y := 0; y < height; y++ {
        for x := 0; x < width; x++ {
            r, g, b, a := img.At(x, y).RGBA()
            //fmt.Printf("[X : %d Y : %v] R : %v, G : %v, B : %v, A : %v  \n", x, y, r, g, b, a)
            row := StrXYRGBA(x, y, r, g, b, a)
            data = append(data, row)
        }
    }

    csvfile, err := os.Create(resultFilename)

    if err != nil {
        fmt.Println(err)
    }

    csvwriter := csv.NewWriter(csvfile)
    csvwriter.UseCRLF = true

    for _, row := range data {
        _ = csvwriter.Write(row)
    }

    csvwriter.Flush()

    csvfile.Close()
}


(59) Запускать банально
jpeg.exe D:\Work\go\jpeg\img.jpg D:\Work\go\jpeg\img.csv

автор в (8) пишет про нейросеть, наверное бессмысленно это в 1с грузить, в 1с надо уже готовый результат

(34) Прикольная штука этот ImageAI да

(59) а дальше распознавать чем, одинэсиной?

(63) ТС дальше не спрашивала, перевести в серое или черно-белое тоже не проблема а вот что дальше хз.

(64) видишь ли, с опытом учишься уже телепатии. ТС решает проблему не с того конца не тем инструментом. В конечном итоге тс хочет распознать символы. Для этого есть готовые либы, самые простые в использовании (настройка, обучение) - либы на питоне. Перегнать в массив - это ерунда, ты показал на go - и это круто. Главное ведь не это, а - что делать с этим массивом.

Человек заморачивается такими задачами и не знает ни одного языка программирования. Странно.

Можно экспериментировать с передачей изображения Гуглу для распознавания текста. Из 1С вызывается легко,
см. http://catalog.mista.ru/public/586313/

(67) бесплатно?

(67) а если у тс в картинках не текст? А образы какие нибудь?

ТС уж сбежала давно :)

(70) стало стыдно

(71) мне вот более интересно - ну ладно, есть у тебя матрица, хорошо. Но вычленить оттуда картинку с учетом всех неточностей и сравнить ее с каким-то паттерном, определив степень схожести выше некоего порога - это же сама по себе достаточно серьезная задачка, по сравнению с которой получение матрицы из джипега вообще ни о чем. Люди нейронные сети юзают для этого. Неужто чел на полном серьезе собрался это в 1С делать? :-O

(72) Подготовка и очистка данных это 80-90%% в ML.
Далее готовые "алгоритмы".

(73) это ежу понятно. Вопрос - накой матрица в 1С, если библиотек ML там нет?

вопрос из серии "ну допустим пробил ты головой стену, и что ты будешь делать в соседней камере?" :))

Спасибо всем за помощь. Вот рабочий код:

Картинка = Новый Картинка(ПутьКФайлу);
    //Картинка.
    Картинка = Картинка.Преобразовать(ФорматКартинки.PNG);
    КартинкаБМП = Картинка.Преобразовать(ФорматКартинки.BMP);
    
    ДанныеКартинки = КартинкаБМП.ПолучитьДвоичныеДанные();
    Поток = ДанныеКартинки.ОткрытьПотокДляЧтения();
    Чтение = Новый ЧтениеДанных(ДанныеКартинки);//,,ПорядокБайтов.BigEndian);
    bfType = Чтение.ПрочитатьЦелое16();//ПорядокБайтов.BigEndian); //bfType
    bfSize = Чтение.ПрочитатьЦелое32();
    bfReserved1 = Чтение.ПрочитатьЦелое16();
    bfReserved2 = Чтение.ПрочитатьЦелое16();
    bfOffBits = Чтение.ПрочитатьЦелое32();
    ////BITMAPINFOHEADER // версия 3
    biSize = Чтение.ПрочитатьЦелое32();
    biWidth = Чтение.ПрочитатьЦелое32(); // ширина изображения в пикселах
    biHeight = Чтение.ПрочитатьЦелое32(); // высота изображения в пикселах
    biPlanes = Чтение.ПрочитатьЦелое16(); // содержит единицу
    biBitCount = Чтение.ПрочитатьЦелое16(); // количество бит на пиксел
    biCompression = Чтение.ПрочитатьЦелое32(); // тип сжатия
    biSizeImage = Чтение.ПрочитатьЦелое32(); // размер изображения в байтах
    biXPelsPerMeter = Чтение.ПрочитатьЦелое32(); // горизонтальное разрешение в пикселах на метр
    biYPelsPerMeter = Чтение.ПрочитатьЦелое32(); // вертикальное разрешение в пикселах на метр
    biClrUsed = Чтение.ПрочитатьЦелое32(); //  количество используемых цветовых индексов в палитре
    biClrImportant = Чтение.ПрочитатьЦелое32(); // количество индексов

    мКартинки = Новый Массив(biHeight,biWidth);
    //мКартинки = Новый Массив(10000,10000);
    Для а1 = 0 По biHeight-1 Цикл
        Если а1 = 9999 Тогда Прервать; КонецЕсли;
        Для а2 = 0 По biWidth - 1 Цикл
            Если а2 = 9999 Тогда Прервать; КонецЕсли;
            блю = Чтение.ПрочитатьБайт();//ПрочитатьВБуферДвоичныхДанных(8);//.ПрочитатьБайт();
            грин = Чтение.ПрочитатьБайт();
            ред = Чтение.ПрочитатьБайт();
            цвет = Новый Цвет(ред,грин,блю);
            мКартинки[а1][а2] = цвет;
        КонецЦикла;
    КонецЦикла;

Помог совет (31), а дальше извините, пропала на время
Дело в том, что в тех библиотеках, которые тут советовали, распознаются ровные символы насколько я поняла. В общем ни одна библиотека не распознает то, что мне нужно. А задача интересная. Если уж не решу, то как минимум узнаю много нового :). Да, буду пробовать сделать нейронную сеть по типу нейронного перцептрона (сейчас вспоминаю как это было в институте). Еще на лабораторной оно все работало в vb. Другие языки знала на этапе обучения в институте, в основном писала на C#, но за годы работы навыки растерялись. Поэтому пробую сначала на 1С. Будут тормоза - придется сделать свою библиотеку.

нейронка, которая на датасете из 1000 картинок будет обучаться 1 год )))

(77) у вас очень небольшая картинка, я как-то упустил этот момент. Если изображение не планируется увеличивать, то может и взлететь. А вот если могут быть больше - тогда, думаю, 1С не вариант.