home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual dBase v5.5 Compiler / SAMPLES.PAK / CUSTORD.MAK next >
Encoding:
Text File  |  1995-07-18  |  1.8 KB  |  68 lines
  1. *******************************************************************************
  2. *  PROGRAM:      Custord.mak
  3. *
  4. *  WRITTEN BY:   Borland Samples Group
  5. *
  6. *  DATE:         5/95
  7. *
  8. *  UPDATED:
  9. *
  10. *  VERSION:      Voyager
  11. *
  12. *  DESCRIPTION:  This program compiles all the necessary files for building
  13. *                Custord.exe, creating a response file, Comak.rsp.  It then
  14. *                builds the executable, Custord.exe from the files listed in
  15. *                Custord.rsp.
  16. *                If you want to build Custord.exe on your own, you can use the
  17. *                Custord.rsp response file, which already exists
  18. *
  19. *  USAGE:        DO Custord.mak
  20. *
  21. *******************************************************************************
  22. #include <Messdlg.h>
  23.  
  24. private saveTalk
  25.  
  26. * Environment
  27. if set("talk") = "ON"
  28.    set talk off
  29.    saveTalk = "ON"
  30. else
  31.    saveTalk = "OFF"
  32. endif
  33.  
  34. * Make sure Comak.rsp and Custord.exe don't exist
  35. if file("Comak.rsp")
  36.    delete file Comak.rsp
  37. endif
  38. if file("Custord.exe")
  39.    delete file Custord.exe
  40. endif
  41.  
  42. * Compile all necessary files to Comak.rsp response file.
  43. ?"Compiling necessary files..."
  44. compile auto Custord.wfm,;
  45.              Buttons.cc,;
  46.              Custord.qbe,;
  47.              Customer.mnu,;
  48.              Orders.mnu,;
  49.              Lineitem.mnu,;
  50.              Search.wfm,;
  51.              Sampproc.prg,;
  52.              &_dbwinhome.custom\vcr.cc;
  53.         to Comak.rsp
  54.  
  55. * Build Custord.exe from files listed in Comak.rsp
  56. ?"Building Custord.exe..."
  57. build from Comak.rsp;
  58.            to Custord.exe;
  59.            icon Custord.ico
  60. if file("Custord.exe")
  61.    InformationMessage("Custord.exe built successfully", "Info")
  62. else
  63.    AlertMessage("Couldn't build Custord.exe due to errors.", "Sorry")
  64. endif
  65.  
  66. set talk &saveTalk
  67.  
  68.