home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d4xx / d430 / smartfields.lha / SmartFields / Functions / field_delete_backward.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-01-11  |  867 b   |  33 lines
  1. /***************************************
  2. *  FIELD DELETE BACKWARD v1.11
  3. *  © Copyright 1988 Timm Martin
  4. *  All Rights Reserved
  5. ****************************************/
  6.  
  7. #include <exec/io.h>
  8. #include <exec/types.h>
  9. #include <console/console.h>
  10. #include <console/fields.h>
  11. #include <console/functions.h>
  12. #include <toolkit/toolkit.h>
  13.  
  14. void field_delete_backward( field, wreq )
  15.   struct Field *field;
  16.   struct IOStdReq *wreq;
  17. {
  18.   REG int i;
  19.  
  20.   if (field->BufferPos) {
  21.     cursor_jump_left( wreq, field->BufferPos );
  22.     con_char_mult_delete( wreq, field->BufferPos );
  23.     for (i = 0; i < field->NumChars - field->BufferPos; i++)
  24.       *(field->Buffer + i) = *(field->Buffer + i + field->BufferPos);
  25.     for ( ; i < field->NumChars; i++)
  26.       *(field->Buffer + i) = '\0';
  27.     field->NumChars -= field->BufferPos;
  28.     field->BufferPos = 0;
  29.   }
  30.   else
  31.     FLASH_SCREEN;
  32. }
  33.