<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; AHK: Отображение содержимого произвольных папок на рабочем столе]]></title>
		<link>https://forum.script-coding.com/viewtopic.php?id=6053</link>
		<atom:link href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=6053&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «AHK: Отображение содержимого произвольных папок на рабочем столе».]]></description>
		<lastBuildDate>Mon, 25 Jul 2011 05:09:11 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[AHK: Отображение содержимого произвольных папок на рабочем столе]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=50158#p50158</link>
			<description><![CDATA[<p>Подразумевается использование в&nbsp; AHK_L 1.1.00.01 win x64<br />Принцип действия: зажать Win key, Произвести клик Lbutton по рабочему столу, не отпуская LButton и Win key сместить курсор мыши по диагонали, рамкой выделения файлов очертив прямоугольник желаемых размеров, отпустить LButton, отпустить Win key, выбрать в Диалоговом окне папку для отображения.<br /></p><div class="codebox"><pre><code>#SingleInstance force
#KeyHistory 0
#NoEnv
SetBatchLines -1

border = 1
Color_List = 2f7dcc	; ListView control
Color_Border = 5cf0f0	; Main window 
Color_Text = White
Transparent = 90

~#Lbutton::
CoordMode, Mouse, Screen
MouseGetPos, xA, yA, id, control
WinGetClass, class, ahk_id %id%

;if(class=&quot;WorkerW&quot;) &amp;&amp;(control=&quot;SysListView321&quot;) {		; for win7 desktop
   KeyWait Lbutton
   if GetKeyState(&quot;LWin&quot; , &quot;P&quot;) || GetKeyState(&quot;RWin&quot; , &quot;P&quot;) {
   MouseGetPos, xB, yB,
   Gosub GuiCreate
   }
;}
Return


GuiCreate:
i++

GuiX := % (xA &lt; xB) ? xA : xB
GuiY := % (yA &lt; yB) ? yA : yB
winH := % abs(yA-yB)
winW := % abs(xA-xB)
Gui, %i%: -Caption +Toolwindow -0x100000
Gui, %i%: Color, %Color_Border%
Gui, %i%: Font, s10 c%Color_Text% , Verdana
Gui, %i%: Show, x%GuiX% y%GuiY% h%winH% w%winW%, folder%i%
WinSet , Transparent , %Transparent% , folder%i%

cH := winH - border*2
cw := winW - border*2
Gui, %i%: Add, ListView, icon Background%Color_List% x%border% y%border% h%cH% w%cW%

Gui +OwnDialogs
FileSelectFolder, Folder,, 3
if !(Folder) {
   Gui , %i%:Destroy 
   i--
   return
}

Loop %Folder%\*, 2
{
    LV_Add(&quot;&quot;, A_LoopFileName)
}
Return

esc::			;tmp
if (i&gt;0) {
Gui , %i%:Destroy 
i--
} Else Exitapp</code></pre></div><p>Скрипт выше должен работать как подобие виджета folderview в KDE. <br />Например: <a href="http://imghost.in/di-T1LS.png">из.1</a>, <a href="http://img84.imageshack.us/img84/6205/kde42.png">из.2</a></p><p>Возникшие и нерешенные вопросы :<br />LV_Add Добавляет&nbsp; A_LoopFileName выбранной папки в &quot;ListView&quot; в &quot;Gui 1:&quot;, а не в соответствующий &quot;ListView&quot;&nbsp; &quot;Gui %i%:&quot;<br />Как установить всем элементам отображаемым в ListView иконки|миниатюры соответствующие им в ОС?<br />Как увеличить расстояния между элементами ListView отображаемыми в режиме &quot;icon&quot;? (для облегчения восприятия)<br />и многие другие...</p><p>Надеюсь на подсказки, спасибо. Буду также благодарен за любые ссылки на реализации подобной идеи на ahk.</p>]]></description>
			<author><![CDATA[null@example.com (~lego)]]></author>
			<pubDate>Mon, 25 Jul 2011 05:09:11 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=50158#p50158</guid>
		</item>
	</channel>
</rss>
