How to make listview like this?

[Nikolas92]

Any way to make listview like this:

I found listview example that looks similar to this but dont know how to get list of programs. Anyone can show me some example for getting list of programs shown in open with window?

[Melba23]

Nikolas92,

Use the $LVS_SMALLICON style when creating the ListView.

M23

[Deye]

for getting the list of programs shown in open with..,  you could try something like this

 

#include <array.au3>
Global $read = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\"
Global $path1 = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\'
Global $path2 = 'HKEY_CLASSES_ROOT\Applications\'

Local $types = '.rar,.pdf,.txt,.html,.mp3'
Local $type = StringSplit($types, ',')

For $i = 1 To $type[0]
    MsgBox($MB_SYSTEMMODAL, 'OpenWithList for *' & $type[$i] & ' files', GetOpenWith($type[$i]))
Next
Exit

Func GetOpenWith($type)
    Local $var, $var1, $var2, $var3
    For $i = 1 To 100
        $var = RegEnumVal($read & $type & "\OpenWithList", $i)
        If @error Then ExitLoop
        If $var = "MRUList" Then ContinueLoop
        $var1 = RegRead($read & $type & "\OpenWithList", $var)
        $var2 = RegRead($path1 & $var1, '')
        If Not @error Then
            $var3 &= $var2 & @CRLF
        Else
            $var2 = RegRead($path2 & $var1 & "\shell\open\command", '')
            If Not @error Then
                $var3 &= StringTrimLeft(StringLeft($var2, StringInStr($var2, '" "', 1, -1) - 1), 1) & @CRLF
            Else
                $var3 &= $var1 & @CRLF
            EndIf
        EndIf
    Next
    Return $var3
EndFunc   ;==>GetOpenWith

 

[Skysnake]

@Melba23 you are amazing. Thx