Easy? 일종의.
필자는 몇 년 전에 비슷한 문제가 있었지만 그 때 사용한 대답은 사용자 지정 커서였습니다.
이 솔루션은 Delphi에서 작동하며 이론상 Lazarus에서 작동해야하지만 (어쨌든 http://forum.lazarus.freepascal.org/index.php?topic=32861.0 참조) 어쨌든 최종 해결책을 찾는 데 도움이 될 수 있습니다.
한마디의 프로세스는 다음과 같습니다 당신이 mycursor.cur을 커서 파일이 필요
1). 당신은 그물에있는 하나를 찾을 수 있습니다, 거기에 델파이 영역에서/당신이 하나를 만들 수있는 유틸리티입니다.
2) mycursor.rc와 같은 텍스트 파일을 만듭니다 (rc는 컴파일되지 않은 리소스 파일 임).
3)이 예제에서는 한 줄로 표시됩니다. myCUR CURSOR "mycursor.cur"모든 파일은 프로그램의 주 폴더에 있어야합니다.
4)이 파일은 .res (mycursor.res) 파일로 컴파일해야합니다 (http://wiki.freepascal.org/Lazarus_Resources 참조).이 파일은 Delphi에서/brcc32.exe입니다. 위의 링크는 나사로의 과정을 설명합니다. 아직 테스트하지 않았습니다. (미리 컴파일 된 리소스 파일)
{$;
{$의 R의 mycursor.res} 델파이 스타일 :
5) 당신은 다음 코드에서 줄을 추가 할 필요가 기본 폼은 다음과 같이, 괜찮습니다 R mycursor.rc} lazarus 스타일 (당신을 위해 컴파일 될 것입니다.) 거의 끝났어.
6) 지금 formcreate 넣어서 :
(델파이 screen.cursors : [1] = loadcursor (HINSTANCE, PChar는 ('myCUR')); (당신이 rc 파일에서 지정한 이름을 사용하십시오. idx 1에서 32000까지의 커서는 사용자가 정의 할 수 있습니다.하지만 여기에서는 Lazarus를 다뤄야합니다.
7) 마지막으로 커서를 컨트롤에 할당합니다. Richedit1.Cursor : = 1;
HTH.