mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-10-31 16:11:33 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			40 lines
		
	
	
		
			896 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			40 lines
		
	
	
		
			896 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
| {
 | |
|     This file is part of the Free Pascal run time library.
 | |
|     Copyright (c) 2007 by contributors of the Free Pascal Compiler
 | |
| 
 | |
|     Symbian OS unit that adds common types, constants and functions
 | |
|     for the Symbian API
 | |
| 
 | |
|     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.
 | |
| 
 | |
|  **********************************************************************}
 | |
| unit uiqclasses;
 | |
| 
 | |
| {$mode objfpc}{$H+}
 | |
| 
 | |
| interface
 | |
| 
 | |
| uses ctypes;
 | |
| 
 | |
| {$include e32def.inc}
 | |
| {$include e32err.inc}
 | |
| {.$include e32const.inc}
 | |
| {.$include e32cmn.inc}
 | |
| {.$include e32std.inc}
 | |
| 
 | |
| { e32std.h header file }
 | |
| 
 | |
| { User class }
 | |
| 
 | |
| function User_InfoPrint(aString: PChar): TInt; cdecl; external;
 | |
| 
 | |
| implementation
 | |
| 
 | |
| end.
 | |
| 
 | 
