Jump to content

Recommended Posts

Posted

wtf..

Look instead of the normal Extprop I added this:

;===============================================================================
; Function Name:    GetExtProperty($sPath,$iProp)
; Description:      Returns an extended property of a given file.
; Parameter(s):     $sPath - The path to the file you are attempting to retrieve an extended property from.
;                   $iProp - The numerical value for the property you want returned. If $iProp is is set
;                             to -1 then all properties will be returned in a 1 dimensional array in their corresponding order.
;                           The properties are as follows:
;                           Name = 0
;                           Size = 1
;                           Type = 2
;                           DateModified = 3
;                           DateCreated = 4
;                           DateAccessed = 5
;                           Attributes = 6
;                           Status = 7
;                           Owner = 8
;                           Author = 9
;                           Title = 10
;                           Subject = 11
;                           Category = 12
;                           Pages = 13
;                           Comments = 14
;                           Copyright = 15
;                           Artist = 16
;                           AlbumTitle = 17
;                           Year = 18
;                           TrackNumber = 19
;                           Genre = 20
;                           Duration = 21
;                           BitRate = 22
;                           Protected = 23
;                           CameraModel = 24
;                           DatePictureTaken = 25
;                           Dimensions = 26
;                           Width = 27
;                           Height = 28
;                           Company = 30
;                           Description = 31
;                           FileVersion = 32
;                           ProductName = 33
;                           ProductVersion = 34
; Requirement(s):   File specified in $spath must exist.
; Return Value(s):  On Success - The extended file property, or if $iProp = -1 then an array with all properties
;                   On Failure - 0, @Error - 1 (If file does not exist)
; Author(s):        Simucal (Simucal@gmail.com)
; Note(s):
;
;===============================================================================
;year, genre, tracknumber, comments, duration
Func _GetExtProperty($sPath, $iProp)
    Local $iExist, $sFile, $sDir, $oShellApp, $oDir, $oFile, $aProperty, $sProperty
    If @OSVersion = "WIN_VISTA" Then
        if $iProp = 16 then $iProp = 13
        if $iProp = 10 then $iProp = 21
        if $iProp = 17 then $iProp = 14
        if $iProp = 19 then $iProp = 26
        if $iProp = 21 then $iProp = 27
        if $iProp = 14 then $iProp = 24
        if $iProp = 20 then $iProp = 16
        if $iProp = 18 then $iProp = 15
    EndIf
    $iExist = FileExists($sPath)
    If $iExist = 0 Then
        SetError(1)
        Return "No file loaded"
    Else
        $sFile = StringTrimLeft($sPath, StringInStr($sPath, "\", 0, -1))
        $sDir = StringTrimRight($sPath, (StringLen($sPath) - StringInStr($sPath, "\", 0, -1)))
        $oShellApp = ObjCreate ("shell.application")
        $oDir = $oShellApp.NameSpace ($sDir)
        $oFile = $oDir.Parsename ($sFile)
        If $iProp = -1 Then
            Local $aProperty[35]
            For $i = 0 To 34
                $aProperty[$i] = $oDir.GetDetailsOf ($oFile, $i)
            Next
            Return $aProperty
        Else
            $sProperty = $oDir.GetDetailsOf ($oFile, $iProp)
            If $sProperty = "" Then
                Return "None"
            Else
                Return $sProperty
            EndIf
        EndIf
    EndIf
EndFunc   ;==>_GetExtProperty

this should work?

  • Replies 88
  • Created
  • Last Reply

Top Posters In This Topic

Top Posters In This Topic

Posted (edited)

You should check the code of my player ... It has this problem already fixed muttley

Cheers,

L|M|TER

Edited by LIMITER
Posted

Updated..

Fixed a lot of bugs:

Add file works

Add dir works

Vista Exprop is fixt

and a new setting ability is added..

and some more small stuff is fixed..

How to get the newest version:

Please download the old version and then run it.. After that you should get a message with:

Do you want to download update.. then pess yes.. And you'll have the newest version (1.8.0.0)

Have you fixed the bug Uriziel01 reported?
  • 2 weeks later...
Posted

Updated!! AGAIN!! HUGE!!

Changed the GUI alot!

Changed the name into White Dragon

bugs fixed..

Looks cool!!

hope people like it now!

Posted (edited)

do you mean the one with all the icons in his taskbar?

I don't have that bug.. and I don't know how to fix it..

That happen's when you don't close the sound afterwards. I don't know how you play the sounds but if you use Sound.au3 then use _SoundClose() after playback. Edited by AdmiralAlkex
Posted

You need an option to clear the entire playlist... I added about 75 songs from one of my artists and half of them showed up as title "None" and artist "None"... Also, I can't get the program to play any of my songs (they're all mp3's if that matters). I'm using vista. I think the GUI looks pretty nice although I would prefer more room to look at my song list.

My Programs[list][*]Knight Media Player[*]Multiple Desktops[*]Daily Comics[*]Journal[/list]
Posted (edited)

@Achilles:

wouw!! thats a nice positive comment! thnx.. the reason for that 'none' is probaly just because the ExtProp of that song isnt set..

I dont understand that you cant play songs...

@KentonBomb:

huh... Achilles is able to run it, I am.. I dont know what the problem is..

Edited by ludocus
Posted (edited)

Ok.. So I updated it again muttley .

Now it supports multiple languages (English and Dutch)

it chooses the language by looking at your @OSLang

Alot of bugs fixed..

some stuff added..

changed the gui a little..

Edited by ludocus
Posted

Finally got it to work. Apparently my account with administrative privileges isn't enough. Using Run As with Administrator, It worked. So I am here for a little review.

The GUI definitely looks 100X better. I like the dragon.

First issue is it seems to be swapping the artist for the song title.

Posted Image

Second is that it seems to be taking the song length, doubling it, and then displaying that. Any GNR fan should realize that Welcome to the Jungle isn't 9 minutes long muttley

Search function works very (very) well.

Maybe you should specify that for the sliders for volume and speed, Lower is actually a high value. That confused me for a minute.

Overall, much better.

Posted

Doesn't work for me, no matter what I do or try.

Did you run it under the Administrator account? That's what I had to do.

Posted (edited)

Not bad player for the first time muttley

- Ask before trying to connect with internet for updates.

- About the skin try to make it smaller.

- Try to click on info in the playlist form without selecting a file !!

- The program make more time extracting his resources (skin..)

in every time you execute it.

try to make it install them, then the next times he just check them

before he make his extraction.

Edited by Zuma
Posted (edited)

sorry i thing someone got your source code i found it in a forum and it look just like yours

Edited by GaryFrost
removed link
Posted (edited)

sorry i thing someone got your source code i found it in a forum and it look just like yours

Please PM the author what the forum was, and REMOVE YOUR LINK from your post. So that way the author of this script can dispute it, otherwise I am forced to believe that you decompiled it, and that is not the best thing to be doing, with IP laws and such, but it really depends what license was used when he released it. Edited by GaryFrost
removed link

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...