오토핫키 커뮤니티

질문
2018.10.23 10:22

postmessage로 dragNdrop

조회 수 269 추천 0 댓글 7
dropfiles 커멘드에 wparam값으로 파일핸들을 넘겨줘야되는걸로 msdn에 나오는데 외국포럼에 찾아봐도 미해결로 나오네요..
비활성으로 이미지파일을 카톡에 보내려고 하는데 어떻게 하면 좋을까요. 오핫 프로그래밍 고수분의 조언을 기다립니다.
클립보드로 이미지를 비활성으로 보내는거는 구현했는데 클립보드를 안거치고 파일형태로 넘기는 방법을 찾고있습니다.

  • Hangoon 2018.10.23 12:40
    HDrop(fnames,x=0,y=0) 
    {
       characterSize := A_IsUnicode ? 2 : 1
       fns:=RegExReplace(fnames,"\n$")
       fns:=RegExReplace(fns,"^\n")
       hDrop:=DllCall("GlobalAlloc","UInt",0x42,"UInt",20+(StrLen(fns)*characterSize)+characterSize*2)
       p:=DllCall("GlobalLock","UInt",hDrop)
       NumPut(20, p+0)  ;offset
       NumPut(x,  p+4)  ;pt.x
       NumPut(y,  p+8)  ;pt.y
       NumPut(0,  p+12) ;fNC
       NumPut(A_IsUnicode ? 1 : 0,  p+16) ;fWide

       p2:=p+20
       Loop,Parse,fns,`n,`r
       {
          DllCall("RtlMoveMemory","UInt",p2,"Str",A_LoopField,"UInt",StrLen(A_LoopField)*characterSize)
          p2+=StrLen(A_LoopField)*characterSize + characterSize
       }
       DllCall("GlobalUnlock","UInt",hDrop)
       Return hDrop
    }

    예제 (그림판 켜놓은 상태)
    fname=Green.png
    PostMessage, 0x233, HDrop(fname), 0,, ahk_class MSPaintApp

    함수 첫번째 파라메터에 파일명 리스트를 라인피드로 구분해서 작성하면 여러 파일도 한번에 전달이 됩니다.
  • sama 2018.10.23 15:51

    fname=test.bmp ; 이미지 파일만 test.bmp 만들어서 넣었는데 요렇게 오류가 나와요ㅠ, 이미지파일은 스크립트랑 같은폴더에 있어요

  • Hangoon 2018.10.23 17:01

    밑 스샷에 정답이 있네요
    파일 이름을 절대경로로 입력해줘야되는데 제가 예제에 깜빡하고 작성을 안했네요 ㅎㅎ


    fname=%A_ScriptDir%\Green.png
    PostMessage, 0x233, HDrop(fname), 0,, ahk_class MSPaintApp

    이걸로 해보시지요
  • sama 2018.10.23 17:15
    완벽히 작동되네요! 절대경로였군요
    오핫포럼에 있는거는 원본이 일본사람이 만든걸로 유니코드도 지원안되고 고물이었는데..
    혹시 천재신가요? 농담입니다 ㅋㅋ
    지금 당장 필요한건 아니지만 복수개 파일을 넘길때 라인피드로 구분해서 입력하면 된다고 하셨는데. 라인피드가 /n/r말씀하시는거죠? 근데 이거 fname변수에 어떻게 입력해야되나요? 똑같이 절대경로포함해서 넣어줘야 되는거면 많이 길어 질거 같아서요.
  • Hangoon 2018.10.23 17:55
    저도 그 포럼 봤는데 거기서 퍼온거에요. 뒷페이지로 넘기니까 누가 개선해놓은게 있더라구요
    라인피드는 오토핫키에서 `n 입니다.
    fnames=%A_ScriptDir%\Green.png`n%A_ScriptDir%\BALLOON2.png
    이런식으로요

    너무 길어질거 같으면 변수입력시에는 파일명만 입력하고
    경로는 함수내에서 입력할 수 있도록 처리해주면 되죠

    위 함수의 fns:=RegExReplace(fns,"^\n") 바로 아랫라인에 아래 코드를 삽입해 보세요

    Loop,Parse,fns,`n,`r
    {
    SplitPath, A_LoopField,OutFileName, OutDir, OutExtension, OutNameNoExt, OutDrive
    tmp := (!OutDrive ? A_ScriptDir "\" : "" ) A_LoopField (!OutExtension ? ".png" : "")
    fns := (A_Index=1) ? tmp : fns "`n" tmp
    }

    절대경로인 경우는 그대로 사용
    상대경로인 경우는 스크립트 경로를 앞에 추가
    확장자가 없으면 .png 추가 하는 스크립트입니다
  • sama 2018.10.23 18:01
    많이 배우네요. 프로그램짜는게 요새 왤케 재밌죠 ㅎㅎ
  • sama 2018.10.23 15:52


    P339pNk.png


List of Articles
분류 제목 글쓴이 최근변경 추천
질문 윈7에서 윈 10으로 업그레이드 했는데 .. 1 역시은수 2018.10.26 0/0
질문 비활성 이미지 서치와 이미지 서치에 대해서 질문있습니다 4 역시은수 2018.10.26 0/0
공유 pc카톡 채팅자동반응(비활성) 소스입니다 16 sama 2018.11.26 2/0
자유 제가 쓴글은 들여쓰기가 안되네요 sama 2018.10.24 0/0
질문 객체변수 함수 인자로 사용할때 문제 11 sama 2018.10.23 0/0
질문 이미지 서치 질문 있습니다. 4 펭귄륌 2018.11.26 0/0
질문 postmessage로 dragNdrop 7 sama 2018.10.23 0/0
자유 오토핫키에대해 얘기하는 단톡방있나요? 2 바남 2019.03.20 0/0
질문 ㅁㅇㅍ ngs우회방법좀 알려주실분? 6 강화사신 2019.03.08 0/0
질문 좌표관련이 안먹힙니다...혹시 우회할수있거나 다른방... 2 만쭈 2018.10.21 0/0
질문 잠수타면 일부명령어가 실행이 안되는데 동영상녹화할... 3 꾸앙이 2018.10.22 0/0
질문 오토핫키 질문입니다. 2 바남 2018.10.22 0/0
질문 혹시 오토핫키얘기는 아니지만 가상머신에 대해 아시는... 바남 2018.10.21 0/0
질문 랜덤작명 스크립트입니다 sama 2018.10.20 0/0
질문 좌표설정을 이해좀 도와주세요. 2 Piner 2018.10.19 0/0
질문 픽셀 서치하는 매크로인데요 다 됐는데 픽셀을 못찾았... 2 에임보정 2018.10.18 0/0
질문 우회관련 질문드립니다. 5 쓰뜨 2018.10.21 0/0
질문 왜저는 슬립랜덤변수가 안되는걸까요?? 3 고생 2018.10.19 0/0
질문 시간이 지날때 마다 키보드 클릭 하는걸 만들고 있습니다. 6 미리리리리 2018.11.28 0/0
질문 카톡 대화창 채팅에 반응하는 매크로 2 sama 2018.10.17 0/0
Board Pagination Prev 1 ... 474849505152535455 ... 209 Next
/ 209

전체 최신 인기글

전체 주간 인기글