Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
File Manager in Dialog
I would like to create a thumbnail view window of "My Music" folder in one of my pages on my multi page dialog. I only need it to take up about half the screen since I will attempt to add mp3 player support to the same page. Any suggestions? Examples? Should I try and use a child dialog?

Like this?

Function Dialog210
Copy      Help
function# hDlg message wParam lParam
if(hDlg) goto messages
if(!ShowDialog("Dialog210" &Dialog210)) ret
;0 "" 0x90C80A44 0x100 0 0 221 154 "Form"
;3 ActiveX 0x54000000 0x0 4 2 212 128 "SHDocVw.WebBrowser"
;4 Button 0x54032000 0x0 0 140 48 14 "Button"
;DIALOG EDITOR: "" 0x2020009 "" ""

sel message
,SHDocVw.WebBrowser we3
,we3._getcontrol(id(3 hDlg))
,we3.Navigate("c:\") ;;Choose Path
,int hlv=child("" "SysListView32" hDlg) ;;Hides system header
,SetWinStyle hlv LVS_NOCOLUMNHEADER 1 ;;Hides system header
,case WM_COMMAND goto messages2
sel wParam
,case 4
,we3._getcontrol(id(3 hDlg))
,Shell32.ShellFolderView fv=we3.Document
,case IDOK
ret 1
Kind of.. But I was looking more to display the files/folders in thumbnail view if possible. Also, I want it to default to "My Music" folder. I tried changing the ("c:\") to ("$My Music$\") & "$My Music$\" & ($My Music$\) & $My Music$\.... Obviously the wrong format. Any ideas?
Before passing special folder string, like $my music$, to non-QM functions, use function expandpath. Read more in Help.

To set thumbnail view, use some other number with CurrentViewMode. You can find it somewhere with google.
Worked like a charm! Thanks Gin!!

Forum Jump:

Users browsing this thread: 1 Guest(s)