AutoHotkey Community

Loop %A_MyDocuments%\*.mp3
{
   mp3List .= A_LoopFileName . "|"
}
StringTrimRight mp3List, mp3List, 1
Gui Add, ListBox, w200 h300 vmp3Choice, %mp3List%
Gui Add, Button, w100 xm+50 gPlay Default, Play MP3
Gui Show
Return

Play:
   Gui Submit, NoHide
   If (mp3Choice = "")
   {
      MsgBox 16, Error, No File Selected!
   }
   Else
   {
      MsgBox Now playing %mp3Choice%
   }
Return

GuiClose:
GuiEscape:
ExitApp

Gui, 7:+owner1 
; Make the main window (Gui #1) the owner of the "about box" (Gui #2).
Gui +Disabled 
; Disable main window.
Loop %A_ScriptDir%\media\*.*
{
   mp3List .= A_LoopFilename . "|"
}
StringTrimRight mp3List, mp3List, 1
Gui 7:Add, ListBox, w200 h300 vmp3Choice, %mp3List%
Gui 7:Add, Button, w100 xm+50 g7Play Default, hrej
Gui, 7:Show, w65, oblíbené
Return
7play:
   Gui, 7:Submit, NoHide
   If (mp3Choice = "")
   {
      MsgBox 16, chyba, nebyl vybrán žádný soubor!
   }
   Else
{
SoundPlay, %mp3Choice%
   }
return
7GuiClose:
7GuiEscape:
Gui, 1:-Disabled 
Gui Destroy