home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / lang / pascal / 7793 < prev    next >
Encoding:
Internet Message Format  |  1993-01-02  |  1.9 KB
  1. Path: sparky!uunet!spool.mu.edu!olivea!charnel!sifon!thunder.mcrcim.mcgill.edu!poly-vlsi!music.mus.polymtl.ca
  2. From: CT80@music.mus.polymtl.ca (Steph)
  3. Newsgroups: comp.lang.pascal
  4. Subject: Re: TVision : BUG in my head or in TV?
  5. Message-ID: <01JAN93.18333440.0031@music.mus.polymtl.ca>
  6. Date: 1 Jan 93 21:58:31 GMT
  7. References: <30DEC92.02825818.0033@music.mus.polymtl.ca> <765343d37755t218@witsend.uucp>
  8. Sender: usenet@music.mus.polymtl.ca
  9. Organization: Ecole Polytechnique de Montreal
  10. Lines: 35
  11.  
  12. In article <765343d37755t218@witsend.uucp> "D. C. Sessions" <dcs@witsend.tnet.com> writes:
  13. >In <30DEC92.02825818.0033@music.mus.polymtl.ca>, CT80@music.mus.polymtl.ca (Steph)  wrote:
  14. >#
  15. ># f*ck.  I hate this editor.  Wish I could go back and modify that
  16. ># last one, but I can't.  Sorry about that.  In any case, yes, I
  17. ># add spaces to AText, then I call TStaticText.Init(Bounds, AText);
  18. >
  19. >  Try getting a different mailer?
  20. >
  21.  
  22. Ha!  I wish.  I'm getting my feed through school, and this system
  23. ain't UNIX, PC, XENIX or whatever.  It's MUSIC.  Hey, sounds neat,
  24. eh?  Well, there is no such thing as kill files in here, I'm not
  25. using RN/NN/anything, I'm just viewing files as they come and
  26. go.  Bah.  At least it's something!
  27.  
  28. ># What happens is this : I found out (after many bugs with this), that
  29. ># EndOfStatic (my before-adding-spaces-to-AText-length) is set to 0
  30. ># after the call to TStaticText.Init!  Why is this so?
  31. >
  32. >  TObject.Init zeros out the object in question.  Therefore, any
  33. >  initialization you do prior to a call to the ancestral Init
  34. >  procedure is wasted.
  35. >
  36. >--- D. C. Sessions                            Speaking for myself ---
  37. >--- Note new network address:                dcs@witsend.tnet.com ---
  38. >--- Author (and everything else!) of TMail  (DOS mail/news shell) ---
  39. >.
  40. >.
  41.  
  42. Someone else mentioned it before.  I don't know why/how it does it,
  43. but I programmed around it and now it works.  Sheesh, and I thought
  44. I didn't need people forcing me to do spaghetti.
  45.  
  46. Steph.
  47.