Category

Development Platform
Home > E-Books > Visual C++ Books > View Code
Unit1.cpp
Package: C++Builder.rar　[view]
Upload User: lhxd_sz
Upload Date: 2014-10-02
Package Size: 38814k
Code Size: 1k
Category:

Visual C++ Books

Development Platform:

C++ Builder

Unit1.cpp：Code Content
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  5. #include "Unit1.h"
  6. //---------------------------------------------------------------------------
  7. #pragma package(smart_init)
  8. #pragma resource "*.dfm"
  9. TForm1 *Form1;
  10. //---------------------------------------------------------------------------
  11. __fastcall TForm1::TForm1(TComponent* Owner)
  12.         : TForm(Owner)
  13. {
  14. }
  15. //---------------------------------------------------------------------------
  16. __fastcall TForm1::~TForm1()
  17. {
  18.   DeleteAll();
  19. }
  20. //---------------------------------------------------------------------------
  21. void __fastcall TForm1::DeleteAll(void)
  22. {
  23.   int ii;
  24.   for(ii=0;ii<ScrollBox1->ControlCount;ii++)
  25.   {
  26.     ScrollBox1->Controls[ii]->Free();
  27.   }
  28. }
  29. //---------------------------------------------------------------------------
  30. void __fastcall TForm1::Button5Click(TObject *Sender)
  31. {
  32.   TPanel *pn;
  33.   pn=new TPanel(ScrollBox1);
  34.   pn->Parent=ScrollBox1;
  35.   pn->Left=10;
  36.   pn->Top=10;
  37. }
  38. //---------------------------------------------------------------------------