home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / lang / pascal / 8608 < prev    next >
Encoding:
Text File  |  1993-01-28  |  1.3 KB  |  44 lines
  1. Newsgroups: comp.lang.pascal
  2. Path: sparky!uunet!charon.amdahl.com!pacbell.com!decwrl!concert!gatech!swrinde!zaphod.mps.ohio-state.edu!cs.utexas.edu!convex!constellation!a.cs.okstate.edu!greaham
  3. From: greaham@a.cs.okstate.edu (GREAHAM DARIN DONA)
  4. Subject: Need Help with Resource and Init
  5. Message-ID: <1993Jan26.223719.16694@a.cs.okstate.edu>
  6. Organization: Oklahoma State University, Computer Science, Stillwater
  7. Date: Tue, 26 Jan 93 22:37:19 GMT
  8. Lines: 34
  9.  
  10.  
  11.  
  12.    I am attempting to place a derivation of a dialog box's Init constructor
  13. into a resource file.  The problem that arises is that the HandleEvent for
  14. the dialogbox no longer works.  I seem to be doing something dreadfully
  15. wrong but can't quite put my finger on it.  Simple type declaration:
  16.  
  17.    Type 
  18.      PBox = ^TBox;
  19.      TBox = Object(TDialog)
  20.         constructor Init;
  21.         destructor ...
  22.         procedure HandleEvent...
  23.      end;
  24.  
  25.  
  26.    Now that the Init is all in a resource file, using 
  27.           Box := New(PBox,Init)
  28.  
  29.    won't work, of course.  But
  30.           Box := PBox(ResFile.Get('DialogBox'));
  31.  
  32.    will but the HandleEvent doesn't respond.  I'm not for sure what to do
  33. past this point.  I've tried numerous things but nothing works.
  34.  
  35. BTW: The dialog box that is in the resource file is NOT inherited from 
  36.      PBox, should it?? 
  37.  
  38.  
  39.  
  40.    Thanks for any help.
  41.  
  42.    Darin...
  43.  
  44.