본문 바로가기
Delphi Tip/+Tip

Screen.Cursors를 이용한 마우스 커서 변경

by MonoSoft 2025. 4. 12.
728x90
반응형

Screen.Cursors를 이용한 마우스 커서 변경

 

 

사용자에게 작업 진행 중임을 시각적으로 알려주고 싶을 때 
마우스 커서를 바꾸는 것이 좋은 방법입니다. 
Screen.Cursors를 사용하면 특정 작업 중에는
'모래시계', 완료 후에는 기본 커서로 되돌리는 등 UX 향상에 도움이 됩니다.

uses
  Vcl.Forms, Vcl.Controls, Vcl.Dialogs;

procedure LongRunningTask;
begin
  Screen.Cursor := crHourGlass;  // 모래시계 커서 표시
  try
    Sleep(3000);  // 3초간 작업
    ShowMessage('작업 완료!');
  finally
    Screen.Cursor := crDefault;  // 커서를 기본으로 되돌림
  end;
end;

Screen.Cursor로 전역 커서 설정

반드시 finally 블록에서 원래 커서로 복원해야 안정적인 UX 유지

다양한 커서(crDefault, crHourGlass, crCross, crHandPoint 등) 지원

 


#델파이
#Delphi
#마우스커서
#UX개선
#crHourGlass
#사용자경험
#VCL컨트롤
#윈도우개발
#델파이팁
#ScreenCursor

728x90
반응형

댓글