Q&A

  • 마우스로 움직이면 이미지가 따라다니는...
마우스를 움직이면 이미지가 따라다니는 것은 어떻게 짜죠??



소스와 자세한 강의좀 부탁 드립니다..

1  COMMENTS
  • Profile
    조규춘 2000.04.06 20:33
    이정민 wrote:

    > 마우스를 움직이면 이미지가 따라다니는 것은 어떻게 짜죠??

    >

    > 소스와 자세한 강의좀 부탁 드립니다..



    소스와 자세한 강의가 필요가 없는디요.....

    간단하게 하려면 엄청 간단하거든요



    이미지 하나 놓고 폼의 OnMouseMove 에다가 다음과 같이 넣으면 그림이 따라와요!



    procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,

    Y: Integer);

    begin

    image1.Left := x;

    image1.Top := y;

    end;

    end.



    넘 간단하죠? 히~! 그럼 이만 줄이지요



    행복하셔요