示例2

SetBatchLines -1

Gui, +hwndhGui
Gui, Add, ListView, w400 h300 Grid hwndHLV, NO.|Path

Gui, 2:New, +Parent%HLV% -Caption
Gui, Color, White
Gui, Margin, 0, 0
Gui_Add_DashedBox("w350 h200", "拖拽文件到这里", "cGray s12 bold")
Gui, Show, x25 y55

Gui, 1:Show
SetTimer, ModifyGui2Color, 100
Return

ModifyGui2Color:
	MouseGetPos, x, y, WinId
	If ( (A_Cursor = "Unknown") AND GetKeyState("LButton", "P") AND (WinId = hGui) )
	{
		Gui, 2:Color, 0xDBFDC1
		KeyWait, LButton
		Gui, 2:Color, White
	}
Return

GuiDropFiles:
	SetTimer, ModifyGui2Color, Off
	Gui, 2:Cancel

	Gui, 1:Default
	Loop, Parse, A_GuiEvent, `n, `r
		LV_Add("", A_Index, A_LoopField)
Return

GuiClose:
ExitApp

#Include, Gui_Add_DashedBox.ahk

给TA捐赠
共{{data.count}}人
人已捐赠
其他案例

示例1

2020-3-9 4:35:44

其他

窗口卷起

2020-3-9 4:37:44

个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
搜索