Q&A

  • 마우스 커서가 버튼 위에 있을때 커서를 다른 이미지로 바꾸려고 합니다.
마우스 커서를 버튼위에 있을때 손모양말고 다른 ico파일로 바꿀려고 합니다.



고수님들께서 한수 부탁드립니다.

이 게시물을
1  COMMENTS
  • Profile
    이은정 • 2000.08.23 06:02
    왕초보 wrote:

    > 마우스 커서를 버튼위에 있을때 손모양말고 다른 ico파일로 바꿀려고 합니다.

    >

    > 고수님들께서 한수 부탁드립니다.





    이렇게 하심 됩니다..



    procedure TForm1.FormCreate(Sender: TObject);

    var

    h : THandle;

    begin

    h := LoadImage(0,'c:프로젝트커서.ico',

    IMAGE_CURSOR,

    0,

    0,

    LR_DEFAULTSIZE or

    LR_LOADFROMFILE);

    if h = 0 then ShowMessage('Cursor not loaded') else begin

    Screen.Cursors[1] := h;

    Button1.Cursor := 1;

    end;

    end;
←First Page
2288 2289 2290 2291 2292 2293 2294 2295 2296 2297
Last Page→
한델 로그인 하기