AutoIt - 按内容查找重复图像? [英] AutoIt - Find duplicate images by content?

问题描述

我正在寻找一种使用 AutoIt 查找重复图像的方法.我已经研究过 PixelSearch 和 SearchImage，但都没有完全按照我的要求去做.

I am looking for a way to find duplicate images using AutoIt. I've looked into PixelSearch and SearchImage but neither do exactly what I need them to do.

我正在尝试按文件名比较 2 个图像，看看它们是否是相同的图像(重复).我认为最好的方法是:

I am trying to compare 2 images by filename and see if they are the same image (a duplicate). The best way I've thought to do it would be to:

1) 获取两种图像大小(以像素为单位)2)使用while循环获取每个像素的颜色并存入数组3) 检查两个数组是否相等.

1) Get both image sizes in pixels 2) Use a while loop to get the color of each pixel and store it in an array 3) Check to see if both arrays are equal to each other.

有人对如何实现这一目标有任何想法吗?

Does anybody have any ideas on how to achieve this?

推荐答案

我只是对这个主题进行了更多研究，并根据我阅读的一些答案构建了一个小型 UDF.(主要基于 monoceres 在 AutoItScript.com 上的回答).我想我会在这里发布我的解决方案以帮助任何未来的开发人员！

I just did some more research on this subject and built a small UDF based on a few answers I read. (Mainly based off of monoceres's answer on AutoItScript.com). I figured I would post my solution here to help any future developers!

Func _CompareImages($ciImageOne, $ciImageTwo)
_GDIPlus_Startup()
$fname1=$ciImageOne
If $fname1="" Then Exit
$fname2=$ciImageTwo
If $fname2="" Then Exit
$bm1 = _GDIPlus_ImageLoadFromFile($fname1)
$bm2 = _GDIPlus_ImageLoadFromFile($fname2)

; MsgBox(0, "bm1==bm2", CompareBitmaps($bm1, $bm2))
Return CompareBitmaps($bm1, $bm2)
_GDIPlus_ImageDispose($bm1)
_GDIPlus_ImageDispose($bm2)
_GDIPlus_Shutdown()
EndFunc

Func CompareBitmaps($bm1, $bm2)

    $Bm1W = _GDIPlus_ImageGetWidth($bm1)
    $Bm1H = _GDIPlus_ImageGetHeight($bm1)
    $BitmapData1 = _GDIPlus_BitmapLockBits($bm1, 0, 0, $Bm1W, $Bm1H, $GDIP_ILMREAD, $GDIP_PXF32RGB)
    $Stride = DllStructGetData($BitmapData1, "Stride")
    $Scan0 = DllStructGetData($BitmapData1, "Scan0")

    $ptr1 = $Scan0
    $size1 = ($Bm1H - 1) * $Stride + ($Bm1W - 1) * 4


    $Bm2W = _GDIPlus_ImageGetWidth($bm2)
    $Bm2H = _GDIPlus_ImageGetHeight($bm2)
    $BitmapData2 = _GDIPlus_BitmapLockBits($bm2, 0, 0, $Bm2W, $Bm2H, $GDIP_ILMREAD, $GDIP_PXF32RGB)
    $Stride = DllStructGetData($BitmapData2, "Stride")
    $Scan0 = DllStructGetData($BitmapData2, "Scan0")

    $ptr2 = $Scan0
    $size2 = ($Bm2H - 1) * $Stride + ($Bm2W - 1) * 4

    $smallest = $size1
    If $size2 < $smallest Then $smallest = $size2
    $call = DllCall("msvcrt.dll", "int:cdecl", "memcmp", "ptr", $ptr1, "ptr", $ptr2, "int", $smallest)



    _GDIPlus_BitmapUnlockBits($bm1, $BitmapData1)
    _GDIPlus_BitmapUnlockBits($bm2, $BitmapData2)

    Return ($call[0]=0)


EndFunc  ;==>CompareBitmaps

现在要比较图像，您所要做的就是包含 CompareImagesUDF.au3 文件并调用该函数.

Now to compare imagages, all you have to do is include the CompareImagesUDF.au3 file and call the function.

#Include "CompareImagesUDF.au3"

; Define the two images (They can be different file formats)
$img1 = "Image1.jpg"
$img2 = "Image2.jpg"

; Compare the two images
$duplicateCheck = _CompareImages($img1, $img2)
MsgBox(0,"Is Duplicate?", $duplicateCheck)

这篇关于AutoIt - 按内容查找重复图像?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！