Q&A

  • 마우스 다운에서 커서 모양을 바꾸기...
마우스 다운 Event에서 마우스 커서모양을 바꿀수가 있나요?

마우스 다운 Event에서
Screen.Cursor := crCross;
하면 다시 마우스를 UP해야만 커서가 바뀌는데....

그냥 Down된 상태에서 바꿀수는 없는가요?
1  COMMENTS
  • Profile
    김도형 2002.05.07 22:08
    procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    begin
      Screen.Cursor := crCross;
    end;

    procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
      Shift: TShiftState; X, Y: Integer);
    begin
      Screen.Cursor := crdefault;
    end;

    이렇게 하니까..
    다운된 상태서는 Cross 로 바뀌어 있구...

    만약 업해서도 바뀌어 있는 상태라믄.. 그냥 OnMouseUp 이벤트에 암것두

    않넣으믄 되겠져..


    Up하믄 없어지는데염