안녕 하세요?
BacTeria 박종민 입니다.
질문하신대로 하니까 되던데요... 분명 됩니다.
뭔가 잘 못 입력 하신 것 같네요~ 헤~ 헤~
다음은 시험해 본 소스 그대로 입니다.
(물론 "AAA.ANI" 화일은 작업 디렉토리에 있어야겠죠?)
--------------------------------------------------------------------
procedure TForm1.Button1Click(Sender: TObject);
var
H : THANDLE;
begin
H := LOADIMAGE(0, 'AAA.ANI', IMAGE_CURSOR, 0, 0, LR_LOADFROMFILE);
SCREEN.CURSORS[1] := H;
CURSOR := 1;
end;
---------------------------------------------------------------------
이만...
청주에서 박종민...
|