wakillon

Gui settings, display ok now So, with settings to ultrafast and 30 FPS Video quality ok Playing ok, i mean playing duration = record duration 🫡 Excellent work 👍

The proof

It's incredible ! When i look with my own eyes your gui settings, i don't see any numbers even when placing the black background of notepad or a white background behind it But when i take a screenshot for show you that there is no numbers displayed, the screenshot show well the numbers !!! ☹️ You invented invisible numbers ! 👍 For the suspicious, no, I didn't drink! 😋

Tired of seeing your taskbar always the same color? Only tested on Win11 HotKeySet('{ESC}', '_Exit') ;~ Taskbar gradually shift through a range of colors Global $iPaletteIdx = 0 Global $iR1, $iG1, $iB1, $iR2, $iG2, $iB2 Global $iAlphaMain = 200, $iSteps = 20, $iStep = 0, $bFading = False Global $aPalette[][2] = [ _ ['FF0000', 'FF8800'], _ ; rouge > orange ['FF8800', 'FFFF00'], _ ; orange > jaune ['FFFF00', '00FF00'], _ ; jaune > vert ['00FF00', '0000FF'], _ ; vert > bleu ['0000FF', 'FF00FF'], _ ; bleu > violet ['FF00FF', 'FF0000'] _ ; violet > rouge ] _TaskbarStartFade($aPalette[0][0], $aPalette[0][1], $iSteps) While 1 If Not $bFading Then $iPaletteIdx = Mod($iPaletteIdx + 1, UBound($aPalette)) _TaskbarStartFade($aPalette[$iPaletteIdx][0], $aPalette[$iPaletteIdx][1], $iSteps) EndIf Sleep(30) WEnd Func _Exit() AdlibUnRegister('_TaskbarFadeStep') Exit EndFunc ;==>_Exit Func _TaskbarFadeStep() If Not $bFading Then Return Local $fT = $iStep / $iSteps Local $iR = Int($iR1 + ($iR2 - $iR1) * $fT) Local $iG = Int($iG1 + ($iG2 - $iG1) * $fT) Local $iB = Int($iB1 + ($iB2 - $iB1) * $fT) _TaskbarSetColor($iR, $iG, $iB, $iAlphaMain) $iStep += 1 If $iStep > $iSteps Then AdlibUnRegister('_TaskbarFadeStep') $bFading = False EndIf EndFunc ;==>_TaskbarFadeStep Func _TaskbarSetColor($iR, $iG, $iB, $iAlpha = 180) Local $hTaskbar = WinGetHandle('[CLASS:Shell_TrayWnd]') Local $iColor = ($iAlpha * 0x1000000) + ($iB * 0x10000) + ($iG * 0x100) + $iR ;~ ConsoleWrite('+ [Color Set : ] 0x' & Hex($iColor, 8) & @CRLF) Local $tAccent = DllStructCreate('uint AccentState; uint AccentFlags; uint GradientColor; uint AnimationId') DllStructSetData($tAccent, 'AccentState', 4) DllStructSetData($tAccent, 'AccentFlags', 2) DllStructSetData($tAccent, 'GradientColor', $iColor) Local $tData = DllStructCreate('uint Attrib; ptr Data; ulong_ptr Size') DllStructSetData($tData, 'Attrib', 19) DllStructSetData($tData, 'Data', DllStructGetPtr($tAccent)) DllStructSetData($tData, 'Size', DllStructGetSize($tAccent)) DllCall('user32.dll', 'bool', 'SetWindowCompositionAttribute', 'hwnd', $hTaskbar, 'ptr', DllStructGetPtr($tData)) EndFunc ;==>_TaskbarSetColor Func _TaskbarStartFade($sHexDep, $sHexArr, $iSteps = 10) $sHexDep = StringReplace($sHexDep, '0x', '') $sHexArr = StringReplace($sHexArr, '0x', '') $iR1 = Dec(StringMid($sHexDep, 1, 2)) $iG1 = Dec(StringMid($sHexDep, 3, 2)) $iB1 = Dec(StringMid($sHexDep, 5, 2)) $iR2 = Dec(StringMid($sHexArr, 1, 2)) $iG2 = Dec(StringMid($sHexArr, 3, 2)) $iB2 = Dec(StringMid($sHexArr, 5, 2)) $iSteps = $iSteps $iStep = 0 $bFading = True AdlibRegister('_TaskbarFadeStep', 500) EndFunc ;==>_TaskbarStartFade For play with taskbar transparency, i will wait next win 11 versions...

When i try to enter 30 fps in your gui settings, numbers are not visibles ... 🤔

#Include <WinAPIFiles.au3> _SetDPIUNAWARE('D:\Bureau\ScreenRecorder\ScreenRecorder64.exe') Func _SetDPIUNAWARE($sFullPath) ; With a dpi scale > 1 ;~ Application compatibily flags are stored in the registry (user or system part): ;~ HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers ;~ HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers Local $iRet, $sHklm If _WinAPI_GetBinaryType($sFullPath) Then Switch @extended Case $SCS_32BIT_BINARY $sHklm = 'HKLM' Case $SCS_64BIT_BINARY $sHklm = 'HKLM64' Case Else Return SetError(-1, 0, 0) EndSwitch Local $sReg1 = RegRead($sHklm & '\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers', $sFullPath) Local $sReg2 = RegRead('HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers', $sFullPath) If $sReg1 <> '~ DPIUNAWARE' Or $sReg2 <> '~ DPIUNAWARE' Then $iRet = RegWrite($sHklm & '\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers', _ $sFullPath, _ 'REG_SZ', _ '~ DPIUNAWARE') If @error Or $iRet = 0 Then Return SetError(@error, 0, -2) $iRet = RegWrite('HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers', _ $sFullPath, _ 'REG_SZ', _ '~ DPIUNAWARE') If @error Or $iRet = 0 Then Return SetError(@error, 0, -3) Return 1 EndIf EndIf EndFunc ;==>_SetDPIUNAWARE Once script run, i run ScreenRecorder64.exe and now i'm able to read your gui

FullScreen Capture : 3840x2160 @ 60 fps DPI Scale x3 I recorded for 30 seconds but the playback only took 22 seconds when looking at the clock it's a bit like if I were watching a video in fast motion

Oups ! Your graphical interface is now so tiny that I can't read the buttons A DPI problem ? Video quality is good but a record of 30 sec give me a video of 22 sec

No problem but your download link to: ScreenRecorder2_vfw do not work

You're welcome 😉 First problem, your graphical interface is hard to read as if you were using transparency Second problem, If there is no user activity the duration of the video is almost the same as the real duration, but if i open and minimize several windows while recording, your display timer is late ( example 1m42 for 2 min recording)

Salut UEZ With the desired settings , 32 bit version return : WGC Recording: 3840x2160 @ 60 fps Target time : 15 seconds Press 'P' to Pause, 'R' to Resume, 'ESC' to Stop Frame 0 encoded. x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed x264 [error]: malloc of size 26200384 failed ... x64 return : WGC Recording: 3840x2160 @ 60 fps Target time : 20 seconds Press 'P' to Pause, 'R' to Resume, 'ESC' to Stop Starting thread for recording... Frame 1140 encoded. Waiting for background thread to finish... Thread closed. Actual time : 29.63338000000113 seconds FPS real : 40.49487436127618 File size : 3 mb Done! -> output_wgc.avi And no problem for read video with VLC, except the reading speed which is 2 times faster I saw my desktop Clock changing second too fast

Some few bugs corrected Updated

DesktopClock updated Bug fixed : Gui Position was not saved when PC restart and Gui do not stay always on top

DesktopClock updated Now via traymenu / Options you can set Dark Color / Light Color / Outline color and set Font Size

DesktopClock v1.0.0.4.au3 updated