Skip to content
Snippets Groups Projects
Commit 7559b7f4 authored by Conrad Zelck's avatar Conrad Zelck
Browse files

Add 'Analyse' splash screen while starting


Signed-off-by: default avatarConrad Zelck <git@simpel.cc>
parent 002913a4
No related branches found
No related tags found
No related merge requests found
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=Icons\peakmeter.ico
#AutoIt3Wrapper_Icon=..\..\Icons\wave.ico
#AutoIt3Wrapper_UseX64=n
#AutoIt3Wrapper_Res_Comment=Converting to wav with 48kHz 24bit.
#AutoIt3Wrapper_Res_Description=Converting to wav with 48kHz 24bit.
#AutoIt3Wrapper_Res_Fileversion=1.1.0.14
#AutoIt3Wrapper_Res_Fileversion=1.1.0.18
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_CompanyName=Norddeutscher Rundfunk
#AutoIt3Wrapper_Res_LegalCopyright=Conrad Zelck
......@@ -26,6 +27,12 @@
#include <Sound.au3>
#include <TrayCox.au3> ; source: https://github.com/SimpelMe/TrayCox - not needed for functionality
Local $hGUI = GUICreate(StringTrimRight(@ScriptName, 4), 290, 70)
GUISetFont(10)
GUICtrlCreateLabel("Analyse...", 20, 20, 130, 30)
GUICtrlSetFont(-1, 14, 400, 0, "Lucida Sans Typewriter")
GUISetState()
Opt("GUICloseOnESC", 0)
FileInstall('K:\ffmpeg\bin\ffmpeg.exe', @TempDir & "\ffmpeg.exe", $FC_OVERWRITE)
Local $sPathFFmpeg = @TempDir & "\"
......@@ -46,7 +53,6 @@ EndIf
Local $aOneFolderFileList
Local $aFileList[0]
Local $sChoosenMedia
Local $hGUI
If $aCmdLineCopy[0] > 0 Then ; if already Files exist
For $i = 1 to $aCmdLineCopy[0]
$sAttrib = FileGetAttrib($aCmdLineCopy[$i])
......@@ -60,6 +66,7 @@ If $aCmdLineCopy[0] > 0 Then ; if already Files exist
Next
_ArrayInsert($aFileList, 0, UBound($aFileList))
Else ; no file in $CmdLine
GUIDelete()
$hGUI = GUICreate(StringTrimRight(@ScriptName, 4) & " - Auswahl", 290, 70)
GUISetFont(10)
Local $idButtonFiles = GUICtrlCreateButton("Dateien auswählen", 10, 20, 130, 30, $BS_DEFPUSHBUTTON)
......@@ -96,7 +103,7 @@ Else ; no file in $CmdLine
EndIf
EndSwitch
EndIf
GUIDelete()
If $aFileList[0] <= 0 Then
MsgBox($MB_TOPMOST, @ScriptName, "Es ist keine zu wandelnde Datei zu finden.")
Exit
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment