Q&A

  • 이미지를 마우스 클릭으로 옮기고, 겹치기.....?
안녕하세요...

이미지를 여러개 화면 주변에 올려 놓고
원하는 이미지를 클릭해서 원하는 위치에 갖다 놓구
그리고 서로의 이미지를 겹치게 처리하는 방법이
있는지요....

고수님들의 답변 부탁 드립니다...
        
         감사합니다.
4  COMMENTS
  • Profile
    김도형 2002.05.28 18:16
    TImage의 OnMouseMoveEvent에 아래와같이 코딩하면..

    마우스로 이미지를 움직일수 있습니다

    Var
      Pt : TPoint;
    begin

    GetCursorPos( pt );
    pt := ScreenToClient( pt );

    if ssLeft in Shift then
       with Sender as TControl do
         SetBounds( Pt.x  - Form1.Left ,  Pt.Y - Form1.Top ,Width,Height);

    그리고 이미지를 겹치게 처리하려면  TImage의 Transport를 TRUE로 해주면

    이미지가 투명하게되서 겹치게 처리할수 있을겁니다...

    원하시는 답변이 되었길 ,.... 그럼 즐프하세염~~~

  • Profile
    신재민 2002.05.29 08:11
    답변 대단히 감사합니다.

    정확히 제가 원하는 답변을 주셨습니다.
    그런데 죄송하지만 한가지만더....

    이미지의 Layer는 어떻게 해야 하는지 잘모르겠군요..
    혹시 아시면 답변주시면 대단히 감사하겠습니다.


  • Profile
    최용일 2002.05.29 13:32
    안녕하세요. 최용일입니다.

    G32라고 아주 훌륭한 컴포넌트가 있습니다. 그걸 사용해보시죠...

    홈페이지는 http://g32.org이구요, Graphics32다운받아서 RotLayer_Ex라는 예제보시면 아실겁니다...

    ^^ 항상 즐코하세요...

  • Profile
    신재민 2002.06.06 18:18

    안녕하세요...

    최일용님 정말 대단히 감사합니다.
    제가 원하던 모든것이 있군요...

    뭐라고 감사의 말씀을 전해야 하는지 모르겠군요....

    정말정말 감사합니다.