mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 07:59:34 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			43 lines
		
	
	
		
			851 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			43 lines
		
	
	
		
			851 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
{
 | 
						|
    This file is part of the Free Component Library (FCL)
 | 
						|
    Copyright (c) 1999-2000 by Michael Van Canneyt and Florian Klaempfl
 | 
						|
 | 
						|
    Classes unit for BeOS
 | 
						|
 | 
						|
    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
 | 
						|
  typinfo,
 | 
						|
  sysutils;
 | 
						|
 | 
						|
{$i classesh.inc}
 | 
						|
 | 
						|
implementation
 | 
						|
 | 
						|
{ OS - independent class implementations are in /inc directory. }
 | 
						|
{$i classes.inc}
 | 
						|
 | 
						|
initialization
 | 
						|
  CommonInit;
 | 
						|
 | 
						|
finalization
 | 
						|
  CommonCleanup;
 | 
						|
 | 
						|
end.
 |