Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 10/14/2022 in all areas

  1. If you made it to season 6. I would be willing to bet it won't be the last time you watch it. I have lost count on the number of times I have watched it all the way through. Majority of people say it drops off after season 7. However, I love them all.
    1 point
  2. P.S.: Iā€™m currently binging The Office on Netflix, at the end of season 6 šŸ˜‰
    1 point
  3. @KaFuThank you! Edited.
    1 point
  4. 64 * 1024 Byte = 65.536 Byte šŸ‘šŸ»
    1 point
  5. I think it's because you press Alt before another key to access a menu item in plenty of Windows applications.
    1 point
  6. Over a year old, but I was looking into this myself, so here's a working sample for "CompareBytes" applied to two bitmaps, really fast. Different Bytes = 1432 Difference in % = 0.0476951771915801 Bytes tested = 3002400 Tolerance = 0 Timer = 33.8626 #include <GDIPlus.au3> _GDIPlus_Startup() Local $iTimer = TimerInit() Local $width1, $height1, $stride1, $pbitmap1 Local $Bitmap1 = getbmpdata(@ScriptDir & "\test_1.jpg", $width1, $height1, $stride1, $pbitmap1) Local $width2, $height2, $stride2, $pbitmap2 Local $Bitmap2 = getbmpdata(@ScriptDir & "\test_2.jpg", $width2, $height2, $stride2, $pbitmap2) Local $i_Bitmap2_Size = DllStructGetSize($Bitmap2) Local $iBytesToTest = DllStructGetSize($Bitmap1) If $i_Bitmap2_Size > $iBytesToTest Then $iBytesToTest = $i_Bitmap2_Size Local $iTolerance = 0 $iRes = DllCall(@ScriptDir & "\ProSpeed3.0.dll", "long", "CompareBytes", "long", DllStructGetPtr($Bitmap1), "long", DllStructGetPtr($Bitmap2), "long", $iBytesToTest, "long", $iTolerance) ConsoleWrite("Different Bytes" & @TAB & " = " & $iRes[0] & @CRLF) ; Ergebniss: Long - 0 bei kompletter Übereinstimmung, ansonsten Anzahl verschiedener Bytes. ConsoleWrite("Difference in %" & @TAB & " = " & $iRes[0] / $iBytesToTest * 100 & @CRLF) ConsoleWrite("Bytes tested" & @TAB & " = " & $iBytesToTest & @CRLF) ConsoleWrite("Tolerance" & @TAB & " = " & $iTolerance & @CRLF) ConsoleWrite("Timer" & @TAB & @TAB & " = " & TimerDiff($iTimer) & @CRLF) _GDIPlus_ImageDispose($pbitmap1) _GDIPlus_ImageDispose($pbitmap2) _GDIPlus_Shutdown() Func getbmpdata($bmpfile, ByRef $width, ByRef $height, ByRef $stride, ByRef $pbitmap) ;returns a struct with the data of the pixel ; by AndyG ; https://www.autoitscript.com/forum/topic/106815-bitblt-picture-compare-count-difference/?do=findComment&comment=753998 $pbitmap = _GDIPlus_BitmapCreateFromFile($bmpfile) ;_GDIPlus_BitmapLockBits gibt $tagGDIPBITMAPDATA-Struktur zurück $BitmapData = _GDIPlus_BitmapLockBits($pbitmap, 0, 0, _GDIPlus_ImageGetWidth($pbitmap), _GDIPlus_ImageGetHeight($pbitmap), $GDIP_ILMREAD, $GDIP_PXF24RGB) If @error Then MsgBox(0, "", "Error locking region " & @error) $stride = DllStructGetData($BitmapData, "Stride") ;Stride - Offset, in bytes, between consecutive scan lines of the bitmap. If the stride is positive, the bitmap is top-down. If the stride is negative, the bitmap is bottom-up. $width = DllStructGetData($BitmapData, "Width") ;Image width - Number of pixels in one scan line of the bitmap. $height = DllStructGetData($BitmapData, "Height") ;Image height - Number of scan lines in the bitmap. ;$pixelFormat = DllStructGetData($BitmapData, "PixelFormat");Pixel format - Integer that specifies the pixel format of the bitmap $Scan0 = DllStructGetData($BitmapData, "Scan0") ;Scan0 - Pointer to the first (index 0) scan line of the bitmap. $pixeldata = DllStructCreate("ubyte[" & (Abs($stride) * ($height)) & "]", $Scan0) $BMPData = DllStructGetData($pixeldata, 1) _GDIPlus_BitmapUnlockBits($pbitmap, $BMPData) ; _WinAPI_DeleteObject($pbitmap) ;_GDIPlus_ImageDispose($pBitmap) ;destroys the pixeldatastruct, have to be done at end of the script! Return $pixeldata EndFunc ;==>getbmpdata
    1 point
  7. Danp2

    Websockets and AutoIt

    @argumentumI believe that the issue I've encountered is more of a security restriction implemented at the browser level. I can connect to the websocket using external clients such as Postman, iola, and websocat. But i"m unable to connect using Websocket Weasel or manually from the developer console.
    1 point
  8. funkey

    FunSkin UDF 2022ized ?

    Hi, I'm sorry to say, that I will not work on it. I think a complete rewrite of the code would be needed and as far as I remember AutoIt was simply to slow for this kind of things. I will not spend time on. This was a fun project, but I saw the limits and stopped. Sorry. But anyone else can try to make it great again šŸ˜‰ BR funkey
    1 point
  9. Check your Scale setting in Window Settings (under System > Display). It's likely that it is set to something besides 100%.
    1 point
  10. MODI now works after installing Office 2007 and selecting Microsoft Office Document Imaging!! Thanks again
    1 point
  11. Works good. I think that I do not have any more questions ... as so far. Give me one more week of extensivly usage time. And I think I would be able to do finall summary.
    1 point
  12. Melba23

    GuiCtrlGetState

    HeavenlyDemon, Ah sorry, for Checkbox and Radio controls I just remembered that you need to use GUICtrlRead. #include <GUIConstantsEx.au3> $hGUI = GUICreate("Test", 500, 500) $cCheck = GUICtrlCreateCheckbox(" Test", 10, 10, 200, 20) $cButton = GUICtrlCreateButton("Read State", 10, 100, 80, 30) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $cButton ConsoleWrite(GUICtrlRead($cCheck) & @CRLF) If BitAND(GUICtrlRead($cCheck), $GUI_CHECKED) Then MsgBox(0, "Hi", "Checked") Else MsgBox(0, "Hi", "NOT Checked") EndIf EndSwitch WEndI posted about it in this thread and GEOSoft offered a possible explanation of why this is the case. M23
    1 point
×
×
  • Create New...