Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 08/20/2023 in all areas

  1. You have to repaint the graphic on erase. I found an old script: #include <WindowsConstants.au3> #include <GUIConstantsEx.au3> #include <ScreenCapture.au3> Opt("GUIOnEventMode", 1) Global $iW = 500, $iH = 500 Global Const $hGUI = GUICreate("test", $iW, $iH, -1, -1, BitOR($GUI_SS_DEFAULT_GUI, $WS_SIZEBOX)) GUISetState() GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit", $hGUI) _GDIPlus_Startup() Global Const $hBitmap = _GDIPlus_BitmapCreateFromMemory(InetRead("https://i.imgur.com/ZxOCPa3.jpg")) GUIRegisterMsg($WM_SIZE, "WM_SIZE") GUIRegisterMsg($WM_ERASEBKGND, "WM_ERASEBKGND") WM_SIZE($hGUI, $WM_SIZE, 0, 0) _WinAPI_RedrawWindow($hGUI) While Sleep(1000) WEnd Func WM_SIZE($hWnd, $Msg, $wParam, $lParam) #forceref $hWnd, $Msg, $wParam, $lParam Local Const $aWidth = WinGetClientSize($hGUI) $iW = $aWidth[0] $iH = $aWidth[1] Return "GUI_RUNDEFMSG" EndFunc ;==>WM_SIZE Func WM_ERASEBKGND($hWnd, $Msg, $wParam, $lParam) #forceref $hWnd, $Msg, $lParam Local Const $hGfx = _GDIPlus_GraphicsCreateFromHDC($wParam) _GDIPlus_GraphicsClear($hGfx, 0xFFFFFFFF) _GDIPlus_GraphicsSetInterpolationMode($hGfx, 1) _GDIPlus_GraphicsDrawImageRect($hGfx, $hBitmap, 0, 0, $iW, $iH) _GDIPlus_GraphicsDispose($hGfx) Return True EndFunc ;==>WM_ERASEBKGND Func _Exit() GUIRegisterMsg($WM_ERASEBKGND, "") GUIRegisterMsg($WM_SIZE, "") _GDIPlus_BitmapDispose($hBitmap) _GDIPlus_Shutdown() GUIDelete() Exit EndFunc ;==>_Exit
    1 point
  2. Thanks. There is nothing new nor anything that can be done about it. Nothing there affects anyone here. If there was something that could be done, big name companies would have done it but, it's impossible. Hence the movement to SaaS and every effort to have users run everything online. Whatever language you choose to code with, know that there are competitions among groups of "hackers" to crack it. There is nothing new under the sunRAM. Everything is known. If you know how and care to mess with it, that is. Again, thanks. Thanks for the concern but is all good
    1 point
  3. check what they are doing in python: https://pypi.org/search/?q=autoit
    1 point
  4. if I understood correctly #include <File.au3> #include <Array.au3> #include <GUIConstants.au3> Global $aArr, $aSect = "" $File = FileOpenDialog("Select ini file", @ScriptDir&"\", "(*.ini)") _FileReadToArray($File, $aArr) $aVal7 = StringSplit($aArr[8], "=") $aVal7 = StringSplit($aVal7[2], "|") ConsoleWrite("$aVal7[0]=" & $aVal7[0] & @CRLF) $aArr[8] = StringStripWS(StringReplace($aArr[8], "=", "=|"), 3) & "|" & $aVal7[0] ConsoleWrite("$aArr[8]=" & $aArr[8] & @CRLF) $sHeader = "" For $i = 1 To $aVal7[0] $sHeader &= "R-" & StringFormat("%03i", $i) & "|" Next ConsoleWrite("$sHeader=" & $sHeader & @CRLF) $GuiData = "DATE&VALUE|" & $sHeader & "TOTAL" $gui = GUICreate("ListView", 800, 300, 80, 5) $Lview = GUICtrlCreateListView($GuiData, 10, 10, 780, 280) GUICtrlSetState($Lview, $GUI_DROPACCEPTED) GUISetState() For $i = 1 To $aArr[0] Step 1 GUICtrlCreateListViewItem($aArr[$i], $Lview) Next GUICtrlSendMsg($Lview, $LVM_SETCOLUMNWIDTH, 0, 100) Do $msg = GUIGetMsg() Until $msg = $GUI_EVENT_CLOSE
    1 point
×
×
  • Create New...