Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: AW: Rebol IRSee.r Discussing all things Rebol

From: depotcity:telus at: 3-May-2001 10:01

Hi. I noticed the button aspect when scrolling... Alan Kamp suggested the following.. Hi Terry, {Perhaps a bit more information on series will help with understanding what is happening here with the message/text string Cheers, Allen K} I went over the doc (very helpful) but I still don't understand why the text on the buttons would scroll? I'll double the size of the text to 2k, (a fresh version can be had at the LFReD rebsite) but it would be nice to have the text scroll down with each input, and then back to the top once the pane is refreshed. Anybody? TBrownell ----- Original Message ----- From: "Thorsten Moeller" <[moeller_thorsten--GMX--De]> To: <[rebol-list--rebol--com]> Sent: Thursday, May 03, 2001 12:14 AM Subject: [REBOL] AW: Rebol IRSee.r Discussing all things Rebol Hi Terry, just tried out your little tool. Very nice, but some things should be fixed. 1. If you scroll down and then move your mouse over the buttons, their text vanish. 2. The text input field should be a little bigger for longer messages. Just some suggestions:-) Thorsten -----Ursprüngliche Nachricht----- Von: [rebol-bounce--rebol--com] [mailto:[rebol-bounce--rebol--com]]Im Auftrag von Terry Brownell Gesendet: Mittwoch, 2. Mai 2001 21:15 An: Rebol List Betreff: [REBOL] Rebol IRSee.r Discussing all things Rebol Hello All Here's a simple IRC script... (also on the LFReD rebsite) Complete with profanity filter. The text field will refresh itself after 1000 characters... (an autoscroll feature would be nice) Any ideas or suggestions? Terry Brownell REBOL [ Title: "LFReD IRSee" Author: "Terry Brownell" Email: [tbrownell--yahoo--com] Date: 02-May-2001 File: %IRSee.r History: [{ Ver 1.0 }] ] read-it: write-it: view layout [ backdrop 103.134.170 effect [ grid 10x10 93.124.160 ] across handle: field "Handle" 100 93.124.160 button "Start" 75x25 93.124.160 [forever [wait 2 m/text: read read-it show m]] button "Quit" 75x25 93.124.160 [quit] return m: text 400x200 s4: slider 14x200 93.124.160 [scroll-para m s4] return message: field 93.124.160 return button 93.124.160 75x25 "Submit" #"^M" [read rejoin [write-it rejoin [handle/text ": " message/text]]] ]