00.windowpicker-1

//スクリプトここから
//
PASSWD = INPUT(“パスワードを入れてください”,””,1)
IFB PASSWD <> “s”
EXITEXIT
ENDIF
while 1
fukidasi(“Alt+Clickでウインドウの情報を取得します”)
ifb GETKEYSTATE(VK_ALT) and GETKEYSTATE(VK_LBUTTON) then
fukidasi(“情報を取得しています”)
id=GETID(GET_FROMPOINT_WIN)
fname = GET_CUR_DIR+”\windowPicker-“+STATUS(id,ST_CLASS)+”.txt”
ifb STATUS(id,ST_CLASS)=”#32770″
fname = GET_CUR_DIR+”\windowPicker-“+STATUS(id,ST_TITLE)+”.txt”
endif
fid = FOPEN(fname,F_WRITE)
fput(fid, “st_title=” +STATUS(id,ST_TITLE))
fput(fid, “st_class=” +STATUS(id,ST_CLASS))
fput(fid, “st_parent=” +STATUS(id,ST_PARENT))
fput(fid, “st_path=” +STATUS(id,ST_PATH))
fput(fid,””)
fputAllitem(fid,id,ITM_BTN,”<<ITM_BTN>>”)
fputAllitem(fid,id,ITM_LIST,”<<ITM_LIST>>”)
fputAllitem(fid,id,ITM_TAB,”<<ITM_TAB>>”)
fputAllitem(fid,id,ITM_MENU,”<<ITM_MENU>>”)
fputAllitem(fid,id,ITM_TREEVEW,”<<ITM_TREEVEW>>”)
fputAllitem(fid,id,ITM_LSTVEW,”<<ITM_LSTVEW>>”)
fputAllitem(fid,id,ITM_STATIC,”<<ITM_STATIC>>”)
fputAllitem(fid,id,ITM_STATUSBAR,”<<ITM_STATUSBAR>>”)
fputAllitem(fid,id,ITM_TOOLBAR,”<<ITM_TOOLBAR>>”)
fputAllitem(fid,id,ITM_ACCCLK,”<<ITM_ACCCLK>>”)
fputAllitem(fid,id,ITM_ACCTXT,”<<ITM_ACCTXT>>”)
fukidasi(“ファイル保存中…”)
fclose(fid)
exec(“notepad.exe “+ fname)
CTRLWIN(GetID(fname),ACTIVATE)
else
sleep(0.5)
endif
wend
Procedure fputAllitem(fid,id,item,str)
count=GETITEM(id,item,-1)
if count<1 then exit
fukidasi(“書き込み中”+str)
fput (fid,str)
fput(fid, “count=”+trim(format(count,5)))
for i = 0 to count-1 // -1 -2
fput(fid, trim(format(i,5))+”)” +ALL_ITEM_LIST[i])
next
fput(fid,””)
fend
//スクリプトここまで
Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s