home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 2 / goldfish_vol2_cd2.bin / bbs / gfx / jcgraph-1.21.lha / JcGraph / Rexx / WindowSet3.rex < prev   
OS/2 REXX Batch file  |  1992-10-05  |  610b  |  36 lines
  1. /* WindowSet3.rex */
  2. /* -------------- */
  3. /* Description: Save value to be used by 'Pre.3'                */
  4.  
  5. options results
  6.  
  7. address 'JCGRAPH'
  8.  
  9. if open('WinDflt','T:WinDflt3','W') then do
  10.  
  11.   'ActivateWindow Output'
  12.   'MoveWindow'
  13.   Size=result
  14.   writeln('WinDflt',Size)
  15.   'SizeWindow'
  16.   Size=result
  17.   writeln('WinDflt',Size)
  18.  
  19.   'ActivateWindow Preview'
  20.   'MoveWindow'
  21.   Size=result
  22.   writeln('WinDflt',Size)
  23.   'SizeWindow'
  24.   Size=result
  25.   writeln('WinDflt',Size)
  26.  
  27.   'ActivateWindow Interface'
  28.   'MoveWindow'
  29.   Size=result
  30.   writeln('WinDflt',Size)
  31.   'SizeWindow'
  32.   Size=result
  33.   writeln('WinDflt',Size)
  34.  
  35. end
  36.