home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 2 / BBS in a box - Trilogy II.iso / Files / Hyper / U-Z / WindowScript™.Demo / WindowScript™ 1.0 Working Model / WindowScript™ 1.0 Working Model.rsrc / ljb_150_BigMessage < prev    next >
Encoding:
Text File  |  1992-04-29  |  1.1 KB  |  38 lines
  1. ItemType: WIND
  2. Rect: 128,68,600,103
  3. Style: Windoid
  4. HasTitleBar: TRUE
  5. HasCloseBox: TRUE
  6. HasZoomBox: TRUE
  7. HasGrowBox: FALSE
  8. MinSize: 472,35
  9. MaxSize: 472,231
  10. Visible: FALSE
  11. Hitmessage: BMHit
  12. MenuBar: BIGBROBAR
  13. Name: BigMessage
  14. TextFont: Geneva
  15.  
  16. ItemType: TEXT
  17. Rect: 11,8,463,24
  18. TextSize: 12
  19. Name: nowText
  20. LockText: FALSE
  21. Inset: 0
  22.  
  23. ItemType: LINE
  24. Rect: 10,26,463,27
  25. Pen: Gray
  26.  
  27. ItemType: PUSH
  28. Rect: 125,522,197,542
  29. Name: DoIt
  30. DefaultItem: TRUE
  31. Script: put wdName into wName¬if i0_selection of window wName ≠ 1 then put wasText_SELECTIONTEXT of window wName into inText else put nowText_Text of window wName into inText¬put DoIt(inText) into outText¬set NowText_Text of window wName to outText¬¬set wasText_Selection of window wName to "0"¬set wasText_TextOfSelection of window wName to outText & return¬set wasText_SelectionStyle of window wName to Plain¬¬set wasText_Selection of window wName to "0"¬set wasText_TextOfSelection of window wName to inText & return ¬set wasText_SelectionStyle of window wName to Bold¬set nowText_Selection of window wName to 32767
  32.  
  33. ItemType: TEXT
  34. Rect: 9,35,463,221
  35. TextSize: 10
  36. Name: wasText
  37. LockText: FALSE
  38. Scrolling: TRUE