Q&A

  • 퀵레포트 미리보기에서 최소화버튼 사용 못하게...
퀵레포트 미리보기 화면에서 Minimize 버튼을 사용하지
못하도록 하고 싶은데 방법이 있을까요?

도움 부탁 드립니다.
2  COMMENTS
  • Profile
    구창민 2003.02.04 04:11
    안녕하세요~ 구창민입니다.

    퀵리포트의 NeedData 이벤트에 아래처럼 기술해보세요.

    아마도 최소화버튼이 Disable 될겁니다.

    그럼~ 항상 즐거운 프로그래밍 하시길~~

    var
      style : LongInt;
      QuickHWND : HWND;
    begin
      QuickHWND := FindWindow('TQRStandardPreview', nil);
      if QuickHWND <> 0 then
      begin
        style := GetWindowLong(QuickHWND, GWL_STYLE);
        style:= style and (not WS_MINIMIZEBOX); //최소화 버튼 못쓰게 만들기
        SetWindowLong(QuickHWND, GWL_STYLE, style);
        SendMessage(QuickHWND, WM_SETREDRAW,1,0);
        RedrawWindow(QuickHWND, nil, 0, RDW_ERASE or RDW_FRAME or RDW_INVALIDATE or RDW_ALLCHILDREN);
      end;
    end;




  • Profile
    jangumma 2003.02.05 21:32
    도움 감사합니다.