掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
もし〜が〜色ならクリックするのようなものを作りたい (ID：25379)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
DEF_DLL PostMessageA(HWND,LONG,LONG,DWORD):LONG:user32.DLL id=getid("IEXPLORE") hnd=idtohnd(id) ACW(GETID("IEXPLORE"),0,0,640,480,0) while true sleep(0.003) IFB PEEKCOLOR(400, 300) = $0000FF PostMessageA(hnd,$201,0,0) while true ifb PEEKCOLOR(400, 300) <> $0000FF sleep(0.1) PostMessageA(hnd,$202,0,0) break endif sleep(0.01) wend ENDIF wend 拾い物のソースなのですが もし〜が〜色ならクリックするというものが書かれています これをDelphiで書き直したいのですが どのようにすればいいのでしょうか？ プログラミングに関してはかなり初心者です 環境はWinXP Pro Delpi7 Proです よろしくお願いします
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.