home *** CD-ROM | disk | FTP | other *** search
- //---------------------------------------------------------------------------
- #include <vcl.h>
- #pragma hdrstop
-
- #include "frmmain.hpp"
- #include "frmviews.hpp"
- #include "frmtrigg.hpp"
- #include "Frmqrysp.hpp"
- #include "Frmexesp.hpp"
- #include "DmCSDemo.hpp"
- #include "Frmtrans.hpp"
- //---------------------------------------------------------------------------
- #pragma resource "*.dfm"
- TFrmLauncher *FrmLauncher;
- //---------------------------------------------------------------------------
- __fastcall TFrmLauncher::TFrmLauncher(TComponent* Owner)
- : TForm(Owner)
- {
- }
- //---------------------------------------------------------------------------
- void __fastcall TFrmLauncher::BtnCloseClick(TObject *Sender)
- {
- Close();
- }
- //---------------------------------------------------------------------
- void __fastcall TFrmLauncher::BtnViewsClick(TObject *Sender)
- {
- FrmViewDemo->ShowModal();
- }
- //---------------------------------------------------------------------
- void __fastcall TFrmLauncher::BtnTriggClick(TObject *Sender)
- {
- FrmTriggerDemo->ShowModal();
- }
- //---------------------------------------------------------------------
- void __fastcall TFrmLauncher::BtnQrySPClick(TObject *Sender)
- {
- FrmQueryProc->ShowModal();
- }
- //---------------------------------------------------------------------
- void __fastcall TFrmLauncher::BtnExecSPClick(TObject *Sender)
- {
- FrmExecProc->ShowModal();
- }
- //---------------------------------------------------------------------
- void __fastcall TFrmLauncher::BtnTransClick(TObject *Sender)
- {
- FrmTransDemo->ShowModal();
- }
- //---------------------------------------------------------------------
-