12345678910111213141516171819202122232425262728293031323334353637383940414243444546 |
- {
- This file is part of the Free Component Library (FCL)
- Copyright (c) 1999-2000 by Michael Van Canneyt and Florian Klaempfl
- Classes unit for win32
- See the file COPYING.FPC, included in this distribution,
- for details about the copyright.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- **********************************************************************}
- {$mode objfpc}
- { determine the type of the resource/form file }
- {$define Win16Res}
- unit Classes;
- interface
- uses
- sysutils,
- types,
- typinfo,
- rtlconsts;
- {$i classesh.inc}
- implementation
- { OS - independent class implementations are in /inc directory. }
- {$i classes.inc}
- initialization
- CommonInit;
- finalization
- DoneThreads;
- CommonCleanup;
- end.
|