Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Pytanie]Odczytywanie wykonawcy


DarHor

Rekomendowane odpowiedzi

Opublikowano

Witam. Jest możliwość odczytania w autoit wykonawcę oraz tytuł z pliku mp3? Chodzi mi o te informacje z zakładki "Szczegóły" z właściwości pliku.

Opublikowano

 

Pokręcone i zbędne....

 

Witam. Jest możliwość odczytania w autoit wykonawcę oraz tytuł z pliku mp3? Chodzi mi o te informacje z zakładki "Szczegóły" z właściwości pliku.

 

Łap...

http://www.autoitscript.com/forum/topic/25859-udf-get-extended-file-property/

9obpmnjr.png

Opublikowano

Okej, dzięki. A teraz czy mógłby mi ktoś podpowiedzieć jak wyciągnąć ścieżkę do pliku który mam dodany w "listview"?

Jak coś to tutaj kod.

 

 


#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=data\graphic\TrayIcon.ico
#AutoIt3Wrapper_Compile_Both=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
;TO DO	Usuwanie powtarzajacych sie pozycji.
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <array.au3>
#include <File.au3>
#include <Sound.au3>
#include <GuiListView.au3>
Dim $tab[1000][2]
global $Ilosc, $Ilosclog,$sound,$so1
Global $Folder, $prog , $sect
Global $ObslugiwaneTypy[4] = [".mp3", ".wav", ".wma", ".mid"]
Global $szer = 230
Global $wys = 620
Global $iLast = 0
Dim $sPlayList[1][2]
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("MP3 Player By Sopel", $szer, $wys)
$bdadd = GUICtrlCreateButton("Add", 48, 64, 105, 81)
$hPlayList = GUICtrlCreateListView("", 10, 190, 210, 351, BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT, $LVS_NOSORTHEADER))
_GUICtrlListView_SetExtendedListViewStyle($hPlayList, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_FLATSB))
_GUICtrlListView_AddColumn($hPlayList, "Tytuł", 201)


GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		case $bdadd
			DodajFolder()

	EndSwitch
WEnd

Func UtnijSciezke($sPath)
Local $sSplitPath
$sSplitPath = StringSplit($sPath, '\')
Return $sSplitPath[$sSplitPath[0]]
EndFunc   ;==>UtnijSciezke

Func DodajFolder()
$hDir = FileSelectFolder("Wybierz folder z plikami muzycznymi do załadowania...", @DesktopDir, 2)
Local $FileList
Local $Rozsz
$FileList = _FileListToArray($hDir)
For $i = 1 To $FileList[0]
  $Rozsz = StringRight($FileList[$i], 4)
  For $ii = 0 To UBound($ObslugiwaneTypy) - 1
   If $Rozsz = $ObslugiwaneTypy[$ii] Then
	ReDim $sPlayList[$iLast + 10][2]
	$sPlayList[$iLast][0] = $hDir & '\' & $FileList[$i]
	$sPlayList[$iLast][1] = _SoundLength($hDir & '\' & $FileList[$i])
	_GUICtrlListView_AddItem($hPlayList, $FileList[$i])
	_GUICtrlListView_AddSubItem($hPlayList, $iLast, _SoundLength($hDir & '\' & $FileList[$i]), 1)
	$iLast += 1
   EndIf
  Next
Next
EndFunc   ;==>DodajFolder

 

 

Opublikowano

Musisz to wyciągnąć najpierw i zapisać jak w moim odtwarzaczu do tablicy lub zmiennej.
Czyli do funkcji dodawania na listę.
Dodaj funkcje dodawania ścieżki do danego pliku.
jeżeli nie widzisz tego w moim kodzie to troszkę Ci zejdzie :)

v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v^v
 

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...