home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / Sample Code / Newton Sample Code 1.2 / Application Design / True Grid-1 / Project Data < prev    next >
Encoding:
Text File  |  1994-07-08  |  978 b   |  22 lines  |  [TEXT/ttxt]

  1. // Copyright © 1994 Apple Computer, Inc. All rights reserved.
  2.  
  3. constant kAppSymbol := '|TrueGrid:PIEDTS|;
  4. constant kAppObject := '["Record", "Records"];
  5. constant kSoupName := "TrueGrid:PIEDTS";
  6. DefConst('kSoupIndexes, '[{structure: slot, path: aString, type: string}]);
  7.  
  8. constant kSoupPad := 256;    // bytes of "undisplayed" data in the soup.
  9.  
  10. constant kNumbersList := '["1", "5", "10", "25", "50", "100"];
  11. constant kNumbersArray := '[1, 5, 10, 25, 50, 100];
  12.  
  13. // for tracking hilite in drawn rows
  14. DefConst('kXORstyle, {penPattern: vfNone, transferMode: modeXor, fillPattern: vfBlack});
  15.  
  16. // for drawn row.
  17. DefConst('kLeftTextStyle, {font: ROM_fontSystem9, penSize: 1, penPattern: vfBlack, justification: 'left});
  18. DefConst('kCenterTextStyle, {font: ROM_fontSystem9, penSize: 1, penPattern: vfBlack, justification: 'center});
  19. DefConst('kRightTextStyle, {font: ROM_fontSystem9, penSize: 1, penPattern: vfBlack, justification: 'right});
  20. DefConst('kBorderStyle, {penPattern: vfGray});
  21.  
  22.