[futurebasic] Re: [FB] List box refresh problem

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : September 2004 : Group Archive : Group : All Groups

From: Bernie Wylde <bernie.w@...>
Date: Fri, 17 Sep 2004 10:00:34 +0100
On 17 Sep 2004, at 9:14, Robert Purves wrote:

> Or perhaps it's going wrong because of the machine-tooled purity of 
> the code. May we assume that virtually all of your demo was generated 
> programmatically by a well-known FB4 utility?

You most certainly can but I'd question the statement "well-known". 
And, if it =is= well-known, I wish the sales were directly proportional 
to its well-knownness !

> A moment ago I was amazed to find myself talking to the author of The 
> Window Maker, indeed interviewing him.
> R: The stylistic precision of TWM code is noteworthy. Here I refer to 
> a property evidently despised by many FB programmers as icing, 
> cosmetic pedantry, or --- how cruel! --- iCandy.
> B: Well, you should know. Didn't we have a long email correspondence 
> on this exact subject?
> R: Er
> B: Surely you remember trying to browbeat me into copying your own 
> stylistic idiosyncrasies?

You didn't have to try very hard. I immediately accepted and 
incorporated your coding style without question.

> ...the source code of The Window Maker has a very different style from 
> its products.

Now... that is very, very true.

>  Personally, I'm into creative self-expression through code.
> '~'A
> '                    No Re-DIM'd Vars : Off
> '~'B
> WINDOW #1:clear¬
>  LOCAL
> DIM RECORD gBETCHADONTKNOWWHATTHISIS4'
> DIM o
>  DIM END  RECORD   .OZISE
>  local FN auntjemima&(a#,aPtr)'here is where we call the fn
> DIM @PUDDLEDUCK%,102 UU$(93),BAK%,@BE% AS INT'dim statement
> XREF TO_BE&(0);0'xref statment
> DIM @T,L,B;0,BE,R;0,RR'this is the rectangle
> t;8=WINDOW(_wndPointer)+_PortRECT'get wndPointer + the portRect stuff
>                                                    "BAKAGAIN"
> gBETCHADONTKNOWWHATTHISIS4.o(0) = 2'set the flag to 22
> IF R% AND((BAK)> 1)OR((NOT(RR))xOR(BAK%<=1))    THEN"BAKAGAIN"
> FOR RR = 0 TO BE OR NOT( TO_BE):NEXT RR%'fix up the rr stuff
>  END FN'end of fn
> FN  AUNTJEMIMA&  (0,17)'here is where we call FNAUNTJEMIM

Hey! How did you manage to decompile that from my app?

Thank you RP

LOL :)
BW