Leaderboard
Popular Content
Showing content with the highest reputation on 05/31/2023 in all areas
-
I added in the main loop a line to resize the image _WinAPI_StretchBlt: ;_WinAPI_BitBlt($hDC, 0, 0, $iW, $iH, $hGfxDC, 0, 0, $SRCCOPY) _WinAPI_StretchBlt($hDC, 0, 0, @DesktopWidth, @DesktopHeight, $hGfxDC, 0, 0, $iW, $iH, $SRCCOPY) ;resize This should stretch the image to your desktop. Btw, what is your CPU load now with my example?1 point
-
Try looping within a loop or you could try _ArrayFind function ;~ Loop through $mydata2 For $i = 1 To UBound($mydata2)-1 If StringStripWS($mydata2[$i][0],7) = "" Then ContinueLoop ;~ Loop through $mydata For $j = 1 To UBound($mydata)-1 ;~ Check if $mydata[x][column 0] = $mydata2[x][column 0] and set $mydata[x][column 4] to $mydata2[x][column 1] If StringStripWS($mydata[$j][0],7) = StringStripWS($mydata2,7) Then $mydata[$j][4]=$mydata2[$i][1] Next Next1 point
-
I would do something like this : #include <GUIConstants.au3> #include <GDIPlus.au3> #include <File.au3> Opt("MustDeclareVars", True) HotKeySet("{ESC}", Terminate) Global $hGraphic, $aFile Example() Func Example() Local $hGUI = GUICreate("", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP), $hImage GUISetState(@SW_SHOW) $aFile = _FileListToArray(".\test", "*.jpg", $FLTA_FILES, True) ;_ArrayDisplay($aFile) _GDIPlus_Startup() $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI) While True For $i = 1 To $aFile[0] If IsString($aFile[$i]) Then $hImage = _GDIPlus_ImageLoadFromFile(".\test\" & $i & ".jpg") $aFile[$i] = _GDIPlus_ImageResize($hImage, @DesktopWidth, @DesktopHeight) _GDIPlus_ImageDispose($hImage) EndIf _GDIPlus_GraphicsDrawImage($hGraphic, $aFile[$i], 0, 0) Sleep(30) Next WEnd EndFunc ;==>Example Func Terminate() For $i = 1 To $aFile[0] _GDIPlus_ImageDispose($aFile[$i]) Next _GDIPlus_GraphicsDispose($hGraphic) _GDIPlus_Shutdown() Exit EndFunc ;==>Terminate It will take a bit of space but in my test it is less than 860MB1 point
-
Here : #include <GUIConstants.au3> #include <GDIPlus.au3> #include <File.au3> Opt("MustDeclareVars", True) Example() Func Example() Local $hGUI = GUICreate("", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP) GUISetState(@SW_SHOW) Local $aFile = _FileListToArray(".\test", "*.jpg", $FLTA_FILES, True) ;_ArrayDisplay($aFile) _GDIPlus_Startup() Local $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI), $hImage For $i = 1 To $aFile[0] $hImage = _GDIPlus_ImageLoadFromFile($aFile[$i]) _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0) _GDIPlus_ImageDispose($hImage) Sleep(30) Next Do Until GUIGetMsg() = $GUI_EVENT_CLOSE _GDIPlus_GraphicsDispose($hGraphic) _GDIPlus_Shutdown() EndFunc ;==>Example1 point
-
After reviewing and testing the release marked (Updated at 12:20 of May 31, 2023 UTC) Perfection.1 point
-
Flashes of graphics
Andreik reacted to argumentum for a topic
...compression, what a concept !. Did you know that you can pack all those files inside another ?!. What a concept !1 point -
1 point
-
Another productive day working on my program. I've changed a few things, including some button renaming and bugfixes for misnamed or changed inputs and columns on the Results window. I've added a bunch of things, and the Results window might well be in its final state (look) now. 1. COPY (clipboard) button, to copy the ebook title and ISBN value to the clipboard, to make renaming source files easier. 2. REFRESH button, to reload the Cover Images from that source folder. 3. Some 'Placebo' buttons added - CREATE, REMOVE, REPLACE. These are not yet supported by code. 4. LOG button and file, to keep and show a record of processes that have occurred. 5. MISSING IMAGES button and file, to display a list of ebooks where there are no images. This includes extra code to create that list. 6. SETTINGS button has a different icon, that looks better to me. 7. 'Cover Images - Source' now shows a file count. NOTE - I have come across an issue, which can be seen in the selected entry in the above screenshot, which I need to figure out something for. For some reason the Title is split into two parts, with the second part existing in the 'Author' record and thus column. That entry is a Various authors entry, but you can see two others in the screenshot, that have a single author (which should be J. Robert Kennedy). There are several other such entries. Things can never be simple, can they ... though this could be as simple as an extra pipe character, as you can see the ISBN field entry has also been impacted. EDIT - No it wasn't a pipe, but rather a case of not using a pipe when I should have, as a ' - ' was being used as separator, and thus caused the issue. The entries no longer appear as having missing images now. I normally use pipes, and don't know why I didn't in this instance ... had a dumb moment I guess. Behind the scenes, along with creating and populating the 'Missing.txt' file for the MISSING IMAGES button, the program is now populating the 'Record.ini' file, which just contains the list of ebooks that have at least one image in the device folders. Entries that are saved to the 'Results.ini' file are now written with IniWriteSection, instead of individually, like for the 'Record.ini' file. While I have used that function many times before over the years, I believe this is the first time I have built a section via code ... less 'writes' likely mean a speed improvement, and it appeared that way to me, though there was also the new addition of populating the 'Record.ini' file. I've yet to add code to the 'Missing Images' buttons or the FIX COVER IMAGE SIZE and BACKUP IMAGES button ... those and the 'Placebo' buttons. Aside from them, everything else is working. I should be working on the FIX COVER IMAGE SIZE and ADD button processes next. They should be simple enough to do, as all the required information is available and recorded. Then I will likely move onto the 'Placebo' button processes, if information about how the image number sub-folders isn't forthcoming. The BACKUP IMAGES button will also likely be coded for before the FIX button gets used (tested). At the moment, I am imagining a 'BACKUPS' PC folder with author name sub-folders, where existing images on the Kobo device are copied to. These could then be used for a simple restore if they ever go missing from the Kobo device. I've also gone through all the entries and then copied all the needed source images from calibre ebook folders, and renamed them using the COPY button ... the title split issue ones aside, which I've skipped for now. EDIT All good now. DOWNLOAD Kobo Cover Fixer.au3 (79 downloads) SEE THE FIRST POST in this topic for the latest version. 44.02 kB1 point
-
Midi UDF
PeterVerbeek reacted to MattyD for a topic
Hi all, This may be a bit premature, but here is release 1.6. SCITE integration: - The helpfile can be brought up with the f1 key when on a _midi_* or _midiAPI_* funcation. Based on the fantastic work of @water . - Alternate data streams will be stripped when the helpfile is installed to localappdata. This fixes the "unblock file" problem detailed previously. API: - Fixed alignment issue with the midihdr tag when compiling as x64. (the [MM_]MOM_POSITIONCB callback can now correctly locate midi events in a buffer.) UDF: - Fixed input buffers not being unprepared before disposal when closing devices. *** EXPEREMENTAL *** - Output devices are now opened as streaming devices. - Added ability to record and playback midi messages. - Added ability to write and playback standard midi files. - Added a mechanism for recieving "cue" and "marker" meta events during playback. - Added ability to modify playback tempo Be aware that the experimental features are still very early in development, and implementation is likely change drastically down the track! If anyone is looking for a ealier version of the project, you'll find all previous releases on the sourceforge page. Happy coding, Matt1 point -
Version 1.6.0.1
2,258 downloads
Extensive library to control and manipulate Microsoft Task Scheduler Service. Please check this site for the implementation status! Please check the History.txt file in the archive for the changelog. Please check the WIKI for details about how to use the UDF. BTW: If you like this UDF please click the "I like this" button. This tells me where to next put my development effort KNOWN BUGS (last changed: 2021-02-03) None Things to come (last changed: 2021-02-03) None1 point -
It looks like updating to v3.3.6.1 fixed the problem. I can now send Chinese file names via _FTP_FilePut() if I convert them to UTF-8 using _WinAPI_WideCharToMultiByte().1 point