Q&A

  • 버튼의 캡션을 클립보드로 넣으려면 어떻게 하나요 ?
sendmessage(버튼의 핸들, WM_COPY, 0,0);
이런 형태로 될 것 같은데 안되는군요.
Edit 의 경우는 자체에 CopyToClipboard 메소드를 지원하던데 어떻게 처리하면 좋은지 조언을 구합니다.
3  COMMENTS
  • Profile
    최석기 2005.12.28 19:20


    procedure TForm1.Button2Click(Sender: TObject);
    var
      Len: integer;
      str: string;
    begin
      //button1의 캡션의 길이를 얻어온다.
      Len := SendMessage(Button1.Handle, WM_GETTEXTLENGTH, 0, 0);
      SetString(str, PChar(nil), Len);
      //button1의 캡션을 얻어온다.
      SendMessage(Button1.Handle, WM_GETTEXT, Len + 1, Longint(Pointer(str)));
      showmessage(str);
    end;
  • Profile
    델마니아 2005.12.28 19:20
    uses에 clipbrd포함하시고

    ClipBoard.SetTextBuf(PChar(Button1.Caption));
    이렇게하면 되네요..

    ㅎㅎ 찾아보고 답변하고 이거 재밌네요.
    아는게 없어서 답변 달것도 별로 없어서 쩝 아쉽네요...


  • Profile
    이은주 2005.12.29 11:16
    충분히 도움이 되었습니다.
    어여삐 여기고 답변에 신경써 주셔서 진심으로 감사드립니다.