Wizard.cpp
上传用户:lulishicai
上传日期:2010-03-01
资源大小:13202k
文件大小:1k
源码类别:

Delphi/CppBuilder

开发平台:

C++ Builder

  1. //----------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. #include "Wizard.h"
  5. //----------------------------------------------------------------------------
  6. #pragma resource "*.dfm"
  7. TForm2 *Form2;
  8. //----------------------------------------------------------------------------
  9. __fastcall TForm2::TForm2(TComponent *Owner)
  10. : TForm(Owner)
  11. {
  12. }
  13. //----------------------------------------------------------------------------
  14. void __fastcall TForm2::FormCreate(TObject *Sender)
  15. {
  16. Table1->Open();
  17. }
  18. //----------------------------------------------------------------------------
  19. void __fastcall TForm2::ScrollBoxClick(TObject *Sender)
  20. {
  21. ShowMessage(Form2->Table1->DatabaseName);
  22. }
  23. //---------------------------------------------------------------------------