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_140_Balloon < prev    next >
Encoding:
Text File  |  1992-04-29  |  640 b   |  31 lines
  1. ItemType: WIND
  2. Rect: 128,76,328,209
  3. Style: Dialog
  4. HasTitleBar: TRUE
  5. HasCloseBox: FALSE
  6. Name: Balloon
  7. TextFont: Geneva
  8. TextSize: 10
  9. Params: i3_text
  10. Result: i3_text
  11.  
  12. ItemType: PUSH
  13. Rect: 139,108,191,124
  14. AutoSize: FALSE
  15. Name: OK
  16. DefaultItem: TRUE
  17. AutoClose: TRUE
  18.  
  19. ItemType: PUSH
  20. Rect: 66,108,126,124
  21. AutoSize: FALSE
  22. Name: Cancel
  23. CancelItem: TRUE
  24. AutoClose: TRUE
  25.  
  26. ItemType: TEXT
  27. Rect: 0,0,215,95
  28. Name: theText
  29. LockText: FALSE
  30. Scrolling: TRUE
  31. Script:   get (number of chars in objValue) - 255¬  if it > 0 then¬    answer "There are more than 255 characters in this ballon. You will need to eliminate "&it&" characters."¬    return "NG"¬  end if