[futurebasic] Re: [FB] Unalterable Text Resources?

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : November 1999 : Group Archive : Group : All Groups

From: tedd <tedd@...>
Date: Tue, 16 Nov 1999 19:22:55 -0500
>>I have dumped the entire file into an EDIT FIELD and then tried to get at
>>each character in the text by doing a --
>>
>>   GET FIELD (efH&,ef)
>>   a$ = CHR$(PEEK([efH&] + i))
>>
>>-- but all I get is gibberish.
>>
>tedd,
>
>The edit field handle you receive from GET FIELD does not contain text,
>but a record structure. Try
>
>   GET FIELD (efH&,ef)
>   txtH& = efH&..teTextH&'get text handle from teRec
>   a$ = CHR$(PEEK([txtH&] + i))
>
> 0"0
> =J= a  y

=J= a  y:

Okay, I tried this:

  EDIT FIELD 99, %resID
  GET FIELD efH&,99
  textH& = efH&..teTextH&                         'get text handle from teRec
  FOR i = 1 TO 50
    a$ = CHR$(PEEK([textH&] + i))
    PRINT ">";a$;
  NEXT

But, all it does is crash and burn. Well... at least I don't get gibberish.

tedd

___________________________________________________________________
<mailto:tedd@...>	               http://sperling.com/