Joe Lewis Wilkins <PepeToo@...> on 7/5/00 11:46 AM scribed :

> Martin,
> 
> It would seem that you would exceed the 256 char limit of a string
> var well before you reached 150 words, but that and the 32k limit
> of characters in fields are the only thing I can thing of with the
> code you've shown us. The garbage would appear because you
> were reading beyond the bounds of what you had stored - I'd think.
> 
> Doubtful help, but???
> Joe Wilkins
> 

Martin, you need to write a custom LDEF Proc

hths (hope this helps some)

Pete...

> Martin Fitzgibbons wrote:
>> I am using the following function to display a list of unused words,
>> which works fine until there are about 150 words and then a whole lot of
>> crap appears in the RECT.
>> 
>> Is there a way around this?
>> 
>> Martin
>> 
>> LOCAL FN unusedlist(x$,p$)
>> INC(ucnt)
>> ulist$(ucnt) = x$
>> uclue$(ucnt) = p$
>> LONG IF ctab = 2
>> FOR x = 1 TO ucnt
>> a$ = a$ + ulist$(x) + CHR$(13)
>> NEXT x
>> pick = 1:scrollpos = 1
>> max = ucnt - 22
>> IF max < 22 THEN max = 22
>> SCROLL BUTTON 2,scrollpos,pick,max
>> COLOR _zWhite
>> BOX FILL 467,54 TO 614,405
>> COLOR _zBlack
>> CALL SETRECT(rect,466,53,615,410)
>> FN ScrollSTR(scrollpos,pick,@rect,12,0)
>> CALL FRAMERECT(rect)
>> COLOR _zWhite
>> BOX FILL 572,415 TO 616,429
>> COLOR _zBlack
>> a$ = STR$(ucnt)
>> CALL SETRECT(rect,572,415,616,429)
>> DEF CBOX(rect,a$)
>> END IF
>> END FN
>> 
>> --
>> To unsubscribe, send ANY message to <futurebasic-unsubscribe@...>
> 
> 
> --
> To unsubscribe, send ANY message to <futurebasic-unsubscribe@...>