[futurebasic] Re: Window drawing

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : April 1998 : Group Archive : Group : All Groups

From: tedd <tedd@...>
Date: Thu, 30 Apr 1998 08:59:55 -0400
>Thanks for all the help. I couldn't get an edit field drawn by just using
>Autoclip = _false, but I have hopes for Andys method using PRINT. However,
>with this function all I get is the text flashed once fast and then it
>disappears.
>
>LOCAL FN buildWind
>  WINDOW 1,"Simpletween",(0,38)-(300,200),_doczoom+_noAutoClip
>  Height =WINDOW(_height)
>  Wideness =WINDOW(_width)
>  wd$=STR$(Wideness)
>  he$=STR$(Height)
>  msg$ =wd$+"x"+he$
>  PRINT%(0,WINDOW(_height)+12)msg$
>END FN
>
>Have I missed something obvious? If I can't get this one running I'll have
>a go at the trickier looking solutions with setting Clip regions etc.
>
>Cheers, Paul


Paul:

Yes, you missed something obvious. Try:

LOCAL FN buildWind
  WINDOW 1,"Simpletween",(0,38)-(300,200),_doczoom+_noAutoClip
  Height =WINDOW(_height)
  Wideness =WINDOW(_width)
  wd$=STR$(Wideness)
  he$=STR$(Height)
  msg$ =wd$+"x"+he$
  PRINT%(0,WINDOW(_height)+12)msg$
END FN

FN buildWind

INPUT "Enter anything to end";a$

END

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