[решено] WinApi, Как сохранить GDI регион на жесткий диск?

amel27 · Отправлено: **05:41, 10-09-2009** | #2

Цитата Diamond:

Как сохранить созданный регион в файл, но самое главное как его потом загружать? »

думаю где-то так (извиняюсь - на комменты нет времени):

Код:

Func _RegionSave($hRgn, $sFile)
    Local $aRet, $tBuf, $hFile, $iErr

    $aRet = DllCall($gdi32dll, "uint", "GetRegionData", "hwnd", $hRgn, "dword", 0, "ptr", 0)
    If $aRet[0]=0 Then Return SetError(2, 1, False)
    $tBuf = DllStructCreate("byte["& $aRet[0] &"]")
    $aRet = DllCall($gdi32dll, "uint", "GetRegionData", "hwnd", $hRgn, "dword", $aRet[0], "ptr", DllStructGetPtr($tBuf))
    If $aRet[0]=0 Then Return SetError(2, 2, False)

    $hFile = FileOpen($sFile, 18)
    If $hFile=-1 Then Return SetError(1, 1, False)
    $iErr = FileWrite($hFile, DllStructGetData($tBuf,1))

    FileClose($hFile)
    Return SetError($iErr, 2, False)
EndFunc

Func _RegionLoad($sFile)
    Local $aRet, $tBuf, $hFile, $bFile, $iErr

    $hFile = FileOpen($sFile, 16)
    If $hFile=-1 Then Return SetError(1, 0, 0)
    $bFile = FileRead ($hFile)
    $zFile = BinaryLen($bFile)
    FileClose($hFile)

    $tBuf = DllStructCreate("byte["& $zFile &"]")
    DllStructSetData($tBuf, 1, $bFile)
    $aRet = DllCall($gdi32dll, "hwnd", "ExtCreateRegion", "ptr", 0, "uint", $zFile, "ptr", DllStructGetPtr($tBuf))
    If $aRet=0 Then Return SetError(2, 0, 0)
    Return $aRet[0]
EndFunc

Цитата Diamond:

Сканировать изображение при каждом запуске скрипта, думаю, плохая идея »

думаю не очень - только придется отказаться от GetPixel, буферизовать всё изображение в память (например через _GDIPlus_BitmapLockBits) и работать уже с массивом пикселей без обращений к GDI

P.S. по ходу полученный регион отличается от исходной картинки, т.к. каждая строка развертки заменяется на две строки (прямоугольник), это так?

Diamond · Отправлено: **07:20, 10-09-2009** | #3

amel27, Супер! Просто нет слов.

Спасибо!

Цитата amel27:

буферизовать всё изображение в память (например через _GDIPlus_BitmapLockBits) и работать уже с массивом пикселей без обращений к GDI »

Я даже и не представлял что такое возможно, спасибо за идею, буду разбираться в структуре которую возвращает эта функция.

Цитата amel27:

P.S. по ходу полученный регион отличается от исходной картинки, т.к. каждая строка развертки заменяется на две строки»

Нет вроде бы... всё один к одному. Нарисовал несколько черно-белых картинок , протестировал, и у меня все совпало.

amel27 · Отправлено: **08:07, 10-09-2009** | #4

Цитата Diamond:

Нет вроде бы... всё один к одному »

гм... у тебя при вызове SetRectRgn() вертикаль $iY и $iY+1, что соответствует прямоугольнику высотой 2 пикселя, а кодируется линия (высотой 1 пиксель)... другое дело, что для одинаковых Y API ф-ция не сработает... В идеале (как я себе это представляю) нужно сначала на основе файла сваять массив полигонов, представляющих трафарет региона (отдельным UDF), а потом уже применять этот массив к региону... задача нетривиальная, но ИМХО вполне решаема

и еще вопрос - почему ты используешь SetRectRgn вместо CreateRectRgn?

Diamond · Отправлено: **10:05, 10-09-2009** | #5

Цитата amel27:

у тебя при вызове SetRectRgn() вертикаль $iY и $iY+1, что соответствует прямоугольнику высотой 2 пикселя, а кодируется линия (высотой 1 пиксель)... другое дело, что для одинаковых Y API ф-ция не сработает... »

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

Цитата amel27:

почему ты используешь SetRectRgn вместо CreateRectRgn? »

У меня изначально так и было

, мне не понравилось то что приходиться постоянно удалять временный регион после объединения с основным, т.е. получается лишний вызов функции DeleteObject.

amel27 · Отправлено: **10:25, 10-09-2009** | #6

Diamond, понятно... а то подумал может так быстрее работает

сделал профилирование твоего скрипта - 95% отбирает GetPixel

Diamond · Отправлено: **12:16, 10-09-2009** | #7

Цитата amel27:

понятно... а то подумал может так быстрее работает »

Цитата amel27:

сделал профилирование твоего скрипта - 95% отбирает GetPixel »

В общем-то не могу сказать что я сильно удивлён - точнее этого и стоило ожидать, ведь функция вызывается для каждого пикселя картинки, ну и конечно чем проще фигура на самой картинке тем выше этот процент. Ещё я где-то вычитал что GetPixel довольно медлительна сама по себе.
Нашел статью где автор применяет (на c++ вроде бы) схожий с моим скриптом принцип создания региона, но вот упоминания о GetPixel я в его коде не нашёл, также там прилагается ссылка на утилиту RegionCreator(почти в самом низу страницы), да и работает она гораздо быстрее чем мой скрипт.
http://sources.ru/cpp/bitmap/regions.shtml

amel27 · Отправлено: **12:37, 10-09-2009** | #8

Diamond, да, там все крутится вокруг GetDIBits()