HSPTV!掲示板

フォルダを開くと『表示』メニューの中に､『縮小版』『並べて表示』などの項目がありますよね｡
そこで、HSPから､この中の『一覧』に変更することはできませんでしょうか｡
どなたか方法があったら教えてください｡

こんなもんでどうですか？(フォルダを開いて、アクティブな状態で'C'を押すと...)

#uselib "user32.dll"
#func GetForegroundWindow "GetForegroundWindow"
#func FindWindowExA "FindWindowExA" int,int,str,str
#func GetWindowLongA "GetWindowLongA" int,int
#func SetWindowLongA "SetWindowLongA" int,int,int

repeat -1
getkey tmp,'C'
if (tmp==1) : gosub *Change
await 25
loop

*Change
GetForegroundWindow
if (stat == 0) : end
hper = stat

FindWindowExA hper,0,"SHELLDLL_DefView",""
FindWindowExA stat,0,"DUIViewWndClassName",""
FindWindowExA stat,0,"DirectUIHWND",""
FindWindowExA stat,0,"CtrlNotifySink",""
FindWindowExA stat,0,"SysListView32","FolderView"
hview = stat

GetWindowLongA hview,-16
SetWindowLongA hview,-16,stat|$3
return

フォルダを開いていない状態でできませんか？

それはフォルダを"一覧表示の状態で開く"ことですか？それとも
各フォルダ毎の"表示設定(アイコンとか)を変更する"ということですか？

> それはフォルダを"一覧表示の状態で開く"ことですか？
ハイ､お願いします｡

いろいろと考えてみましたが、フォルダを開く→一覧表示に変更するくらいしか
思いつきませんでした。

フォルダを開く処理はexplorer.exeをコマンドライン引数付きで起動しているので
一覧表示で開くコマンドはないかと調べたけれどそれらしいコマンドはなかったで
す。

あと、前述したスクリプトは直接リストビューコントロールの情報をいじっている
ためあまり好ましくないので、フォルダを開いているウィンドウのメニューバーの
[一覧(&L)]項目IDを取得してsemdmsgで送ったほうがいいと思います。

説明が分かり難かったらすいません。

ありがとうございました。