home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Programme_zum_Heft / Programmieren / Kurztests / PascalPCQ / Include / Utils / Parameters.i < prev    next >
Text File  |  1990-12-13  |  658b  |  30 lines
  1.  
  2. {
  3.     Parameters.i
  4.  
  5.         This is the stuff necessary for command line work, including
  6.     the Workbench message.
  7. }
  8.  
  9. {$I "Include:Exec/Ports.i"}
  10. {$I "Include:Workbench/Startup.i"}
  11.  
  12. {
  13.     The following function just returns the Workbench message pointer.
  14. }
  15.  
  16. Function GetStartupMsg : WBStartupPtr;
  17.     external;
  18.  
  19. {
  20.     This procedure copies the requested parameter into the string S.
  21. S must already be allocated, of course.  Note that the parameters can
  22. come from the command line or from the Workbench message.  S will be
  23. a string of length 0 (in other words S^ = Chr(0)) if the parameter
  24. doesn't exist.
  25. }
  26.  
  27. Procedure GetParam(n : Short; S : String);
  28.     external;
  29.  
  30.