home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / progpas / prok344.arj / PROENTER.INT < prev    next >
Text File  |  1991-04-01  |  1KB  |  64 lines
  1.  
  2. (*
  3.  * Copyright 1987, 1991 Samuel H. Smith;  All rights reserved
  4.  *
  5.  * This is a component of the ProDoor System.
  6.  * Do not distribute modified versions without my permission.
  7.  * Do not remove or alter this notice or any other copyright notice.
  8.  * If you use this in your own program you must distribute source code.
  9.  * Do not use any of this in a commercial product.
  10.  *
  11.  *)
  12.  
  13. (*
  14.  * PCB ProDOOR ProEnter - Message Entry and Edit module
  15.  *
  16.  *)
  17.  
  18. unit ProEnter;
  19.  
  20. interface
  21.  
  22.    uses Tools, ProData;
  23.  
  24. type
  25.    message_entry_modes = (new_message, 
  26.                           reply_message, 
  27.                           reply_originator,
  28.                           comment_message,
  29.                           duplicate_message);
  30.    
  31. procedure save_message(mode: message_entry_modes);
  32. procedure show_margins;
  33. procedure show_line_number(n: integer);
  34. procedure continue_entry;
  35. procedure edit_line;
  36.  
  37. procedure insert_line(contents: string);
  38.    {open a new line at the cursor}
  39.  
  40. procedure insert_text;
  41.    {insert a line}
  42.  
  43. procedure delete_line;
  44.    {delete the line at the cursor}
  45.  
  46. procedure delete_text;
  47.    {delete a line}
  48.  
  49. procedure quote_from_original;
  50.  
  51. procedure display_original;
  52.    {display original message with optional quoting}
  53.  
  54. procedure count_lines;
  55.  
  56. procedure enter_message(mode: message_entry_modes);
  57.  
  58. procedure edit_message;
  59.  
  60. procedure edit_header;
  61.  
  62.  
  63. implementation
  64.