classes.pp 1.8 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980
  1. {
  2. $Id$
  3. This file is part of the Free Component Library (FCL)
  4. Copyright (c) 1999-2000 by Michael Van Canneyt and Florian Klaempfl
  5. Classes unit for win32
  6. See the file COPYING.FPC, included in this distribution,
  7. for details about the copyright.
  8. This program is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  11. **********************************************************************}
  12. {$mode objfpc}
  13. { determine the type of the resource/form file }
  14. {$define Win16Res}
  15. unit Classes;
  16. interface
  17. uses
  18. sysutils,
  19. types,
  20. typinfo,
  21. rtlconst,
  22. systhrds;
  23. {$i classesh.inc}
  24. implementation
  25. { OS - independent class implementations are in /inc directory. }
  26. {$i classes.inc}
  27. initialization
  28. CommonInit;
  29. finalization
  30. DoneThreads;
  31. CommonCleanup;
  32. end.
  33. {
  34. $Log$
  35. Revision 1.5 2004-09-26 19:25:49 armin
  36. * exiting threads at nlm unload
  37. Revision 1.4 2004/08/01 20:02:48 armin
  38. * changed dir separator from \ to /
  39. * long namespace by default
  40. * dos.exec implemented
  41. * getenv ('PATH') is now supported
  42. * changed FExpand to global version
  43. * fixed heaplist growth error
  44. * support SysOSFree
  45. * stackcheck was without saveregisters
  46. * fpc can compile itself on netware
  47. Revision 1.3 2004/01/22 17:11:23 peter
  48. * classes uses types to import TPoint and TRect
  49. Revision 1.2 2004/01/10 20:15:21 michael
  50. + Some more fixes to rtlconst. Const strings moved from classes to rtlconst
  51. Revision 1.1 2003/10/06 21:01:06 peter
  52. * moved classes unit to rtl
  53. Revision 1.1 2003/03/25 17:56:19 armin
  54. * first fcl implementation for netware
  55. Revision 1.3 2002/09/07 15:15:28 peter
  56. * old logs removed and tabs fixed
  57. }