home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / CSAPE32.ARJ / SOURCE / CSSRC / SDSETWID.C < prev    next >
C/C++ Source or Header  |  1990-03-28  |  945b  |  53 lines
  1. /*
  2.     sdsetwid.c        3/14/87
  3.  
  4.     % sed_SetWidth
  5.  
  6.     C-scape 3.2
  7.     Copyright (c) 1986, 1987, by Oakland Group, Inc.
  8.     ALL RIGHTS RESERVED.
  9.  
  10.     Revision History:
  11.     -----------------
  12.      6/30/88 jmd    added windows
  13.      7/08/88 jmd    removed xmin
  14.     12/10/88 jmd    added sed_DoThemBobs
  15.     12/20/88 jmd    removed bord_SendMsg
  16.  
  17.      8/08/89 jmd    removed bob stuff (handled by window now)
  18.  
  19.      3/28/90 jmd    ansi-fied
  20. */
  21.  
  22. #include "sed.h"
  23.  
  24. void sed_SetWidth(sed_type sed, int width)
  25. /* 
  26.     Sets the width of the sed.
  27.     The width is adjusted vs. the sed's position
  28.     so as to not allow the sed to go past the edge of the screen.
  29.     If there is a border, the border is sent a BDM_SETSIZE message
  30.     and it's width is compensated for.
  31.     The width can never be less than 1.
  32. */
  33. {
  34.     cs_Assert(sed_Ok(sed), CS_SD_SWID_SED, 0);
  35.     cs_Assert(width > 0, CS_SD_SWID_NEG, 0);
  36.  
  37.     /* adjust window */
  38.     win_SetSize(sed, win_GetHeight(sed), width);
  39. }            
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.