(今日の独り言)

 今年は なんか いろいろ と やる事が多くて いろいろなものに 手をつけられないなぁ
趣味方面の スマブラ や アニメ鑑賞 や AutoHotkeyDelphi のどれかに どっぷり時間を費やせるわけもなく
あちこち と 表面を撫で回してるだけみたいな感じですね
アニメ鑑賞も 前期からの持ち越し分があるのになぁ、 ARIAも 今期はいろいろ と 書きたいのになぁ
いつまで らき☆すた や 時系列順バージョンの桃華月憚レビュー 書くのを 先延ばしするつもりやねん!と
一応 ← の一覧に書いてあるのは 書くつもりなんだけどなぁ 笑)

 なんか もやもや するので AutoHotkeyDaemonToolsにイメージをマウントさせるツールを ちゃっちゃと作って 寝ます 笑)
ん〜 早く やる事が落ち着いて欲しい
もしちゃっちゃと出来たら ソースも貼り付けます



30分くらい経過



 ん? とりあえず それなりに 普通に 動くようになったかな?、 デバッグ? なにそれ? 笑)
デスクトップにショートカットアイコンを作ってドロップする方法 と 普通に起動してGUIドロップする方法があります
ボタンを押すとイジェクトです、まぁ 使い方は フィーリングで感じ取ってください 笑)
[]; ↓ は daemon.exe の フルパスを入れてください[]
[]DTPath := ShortFullPathName("c:\Program Files\DAEMON Tools\daemon.exe")[]
[]Gosub, CheckOption[]
[]Gosub, InitGUI[]
[]Return[]
[]CheckOption:[]
[]{[]
[]	buf = %1%[]
[]	If ( buf )[]
[]	{[]
[]		Run, %DTPath% -lock -mount 0`,%buf%[]
[]		ExitApp[]
[]	}[]
[]	Return[]
[]}[]
[]InitGUI:[]
[]{[]
[]	Gui, -0x00020000[]
[]	Gui, Add, Button,  X4  Y4 W44 H44, Slot1[]
[]	Gui, Add, Button, X52  Y4 W44 H44, Slot2[]
[]	Gui, Add, Button,  X4 Y52 W44 H44, Slot3[]
[]	Gui, Add, Button, X52 Y52 W44 H44, Slot4[]
[]	Gui, Show, W100 H100[]
[]	hAutoHotkeyGUI := WinExist("ahk_class AutoHotkeyGUI")[]
[]	WinSet, AlwaysOnTop, On, ahk_id %hAutoHotkeyGUI%[]
[]	Return[]
[]}[]
[]GuiDropFiles:[]
[]{[]
[]	Loop, Parse, A_GuiEvent, `n[]
[]	{[]
[]		buf := ShortFullPathName(A_LoopField)[]
[]		If ( A_GuiControl == "Slot1")[]
[]			Run, %DTPath% -lock -mount 0`,%buf%[]
[]		If ( A_GuiControl == "Slot2")[]
[]			Run, %DTPath% -lock -mount 1`,%buf%[]
[]		If ( A_GuiControl == "Slot3")[]
[]			Run, %DTPath% -lock -mount 2`,%buf%[]
[]		If ( A_GuiControl == "Slot4")[]
[]			Run, %DTPath% -lock -mount 3`,%buf%[]
[]		Break[]
[]	}[]
[]	Return[]
[]}[]
[]GuiClose:[]
[]{[]
[]	ExitApp[]
[]}[]
[]ButtonSlot1:[]
[]{[]
[]	Run, %DTPath% -lock -unmount 0[]
[]	Return[]
[]}[]
[]ButtonSlot2:[]
[]{[]
[]	Run, %DTPath% -lock -unmount 1[]
[]	Return[]
[]}[]
[]ButtonSlot3:[]
[]{[]
[]	Run, %DTPath% -lock -unmount 2[]
[]	Return[]
[]}[]
[]ButtonSlot4:[]
[]{[]
[]	Run, %DTPath% -lock -unmount 3[]
[]	Return[]
[]}[]
[]ShortFullPathName(FileName, BufferSize = 200)[]
[]{[]
[]	VarSetCapacity(Buf, BufferSize, 0x00)[]
[]	DllCall("kernel32.dll\GetShortPathNameA", "Str", FileName, "Str", Buf, "UInt", BufferSize)[]
[]	DllCall("kernel32.dll\GetFullPathNameA", "Str", Buf, "UInt", BufferSize, "Str", Buf, "UInt", 0)[]
[]	Return Buf[]
[]}[]