home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 9 / CDACTUAL9.iso / progs / CB / DATA.Z / CSDEMOS.CPP < prev    next >
Encoding:
C/C++ Source or Header  |  1996-10-21  |  1.6 KB  |  38 lines
  1. //  CSDEMOS
  2. //  Interbase Client Example
  3. //
  4. //  To run this app you need to create a BDE alias as follows,
  5. //
  6. //    1. Be sure Local Interbase and SQL Links are installed
  7. //    2. Run the BDE Configuration utility, BDECFG32.EXE
  8. //    3. Create a new Alias by the name 'IBLOCAL' of type INTRBASE
  9. //    4. Set the Server Name to <Interbase path>\EXAMPLES\EMPLOYEE.GDB
  10. //
  11. //---------------------------------------------------------------------------
  12. #include <vcl\vcl.h>
  13. #pragma hdrstop
  14. //---------------------------------------------------------------------------
  15. USEDATAMODULE("DMCSDEMO.CPP", DmEmployee);
  16. USEFORM("FRMEXESP.CPP", FrmExecProc);
  17. USEFORM("FRMMAIN.CPP", FrmLauncher);
  18. USEFORM("FRMQRYSP.CPP", FrmQueryProc);
  19. USEFORM("FRMTRANS.CPP", FrmTransDemo);
  20. USEFORM("FRMTRIGG.CPP", FrmTriggerDemo);
  21. USEFORM("FRMVIEWS.CPP", FrmViewDemo);
  22. //---------------------------------------------------------------------
  23. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  24. {
  25.     Application->Initialize();
  26.     Application->CreateForm(__classid(TFrmLauncher), &FrmLauncher);
  27.     Application->CreateForm(__classid(TFrmExecProc), &FrmExecProc);
  28.     Application->CreateForm(__classid(TFrmQueryProc), &FrmQueryProc);
  29.     Application->CreateForm(__classid(TFrmTransDemo), &FrmTransDemo);
  30.     Application->CreateForm(__classid(TFrmTriggerDemo), &FrmTriggerDemo);
  31.     Application->CreateForm(__classid(TFrmViewDemo), &FrmViewDemo);
  32.     Application->CreateForm(__classid(TDmEmployee), &DmEmployee);
  33.     Application->Run();
  34.  
  35.     return 0;
  36. }
  37. //---------------------------------------------------------------------------
  38.