Q&A

  • dbgrid에 수평스크롤바 생기지않게 어떻게 하나요?
델파이7에서 dbgrid에 수평이나 수직스크롤바 생기지않게 어떻게 하나요?
데이터가 없거나 한두개 있는데도 수직 스크롤바가 생기고, 수평은 아예 안생기게 하고 싶은데
속성에 제어할만한 것이 없네요.
2  COMMENTS
  • Profile
    김종인 2005.10.28 10:15



    procedure Tform1.DBGrid1DrawColumnCell(Sender: TObject;
      const Rect: TRect; DataCol: Integer; Column: TColumn;
      State: TGridDrawState);
    begin

      {Remove vertical scroll bar}
      SetWindowLong(DBGrid1.Handle, GWL_STYLE, GetWindowLong(DBGrid1.Handle,
        GWL_STYLE) and not WS_HSCROLL{WS_VSCROLL});

      {Force refresh of client and non-client areas}
      SetWindowPos(DBGrid1.Handle, 0, 0, 0, 0, 0, SWP_NOZORDER or SWP_NOSIZE or
        SWP_NOMOVE or SWP_FRAMECHANGED);

    end;
  • Profile
    신철우 2005.10.29 02:20