DesktopMime.GetApplications (gb.desktop)

Function GetApplications ( ) As DesktopFile[]

Returns an array of applications associated with the current mime type as DesktopFile objects.

Example...

Dim hDesktopMime As DesktopMime
Dim hDesktopFile As DesktopFile

hDesktopMime = DesktopMime.FromFile(sMyFile)

If hDesktopMime.GetApplications().Count Then

  For Each hDesktopFile In hDesktopMime.GetApplications()

    Print hDektopFile.Name
    Print hDektopFile.Exec

  Next

Endif