---------------------------------------------------------------------------
| 20 | #include <Grids.hpp> |
| 21 | //--------------------------------------------------------------------------- |
| 22 | class TStringGridLivingColumns |
| 23 | { |
| 24 | private: |
| 25 | TStringGrid * SG; |
| 26 | double * ColumnKoeff; |
| 27 | int oldClientWidth; |
| 28 | |
| 29 | Classes::TNotifyEvent oldOnResize; |
| 30 | TMouseEvent oldOnMouseUp; |
| 31 | |
| 32 | private: |
| 33 | // ��������� ����������� ������ ������ ������� ������������ ����� ������ ������� |
| 34 | void SaveColumnKoeff(void); |
| 35 | // �������� ������� ������� � ������������ � ������� ClientWidth |
| 36 | void ResizeColumnWidth(void); |
| 37 | // ���� ��������� ������ ���� ������� |
| 38 | int __fastcall GetAllColumnsWidth(void); |
| 39 | // ������������ ��������� �������� ����� |
| 40 | void __fastcall FormResize(TObject *Sender); |
| 41 | // ������������ ��������� ������ ������� |
| 42 | void __fastcall MouseUp(TObject *Sender, TMouseButton Button, |
| 43 | TShiftState Shift, int X, int Y); |
| 44 | |
| 45 | public: |
| 46 | TStringGridLivingColumns(TStringGrid * p); |
| 47 | ~TStringGridLivingColumns(); |
| 48 | }; |
| 49 | //--------------------------------------------------------------------------- |
| 50 | // ������� ��������� ��������� VCL |
| 51 | bool HaveScrollBar(HWND hwnd); |
nothing calls this directly
no outgoing calls
no test coverage detected