home *** CD-ROM | disk | FTP | other *** search
/ Inter.Net 55-1 / Inter.Net 55-1.iso / CBuilder / Setup / BCB / data.z / headmain.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-02-09  |  1.3 KB  |  31 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //---------------------------------------------------------------------------
  6. #include <vcl.h>
  7. #pragma hdrstop
  8.  
  9. #include "headmain.h"
  10. //---------------------------------------------------------------------------
  11. #pragma resource "*.dfm"
  12. TForm1 *Form1;
  13. //---------------------------------------------------------------------------
  14. __fastcall TForm1::TForm1(TComponent* Owner)
  15.   : TForm(Owner)
  16. {
  17. }
  18. //---------------------------------------------------------------------------
  19. void __fastcall TForm1::HeaderControl1SectionTrack(
  20.       THeaderControl *HeaderControl, THeaderSection *Section,
  21.       int Width, TSectionTrackState State)
  22. {
  23.         Section->Width = Width;
  24.         Shape1->Width = HeaderControl->Sections->Items[0]->Width;
  25.         Shape2->Width = HeaderControl->Sections->Items[1]->Width;
  26.         Shape2->Left = HeaderControl->Sections->Items[1]->Left;
  27.         Shape3->Width = HeaderControl->Sections->Items[2]->Width;
  28.         Shape3->Left = HeaderControl->Sections->Items[2]->Left;
  29. }
  30. //---------------------------------------------------------------------
  31.