117 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			C++
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			117 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			C++
		
	
	
		
			Executable File
		
	
	
	
	
//
 | 
						|
// GLARCF.CPP
 | 
						|
//
 | 
						|
//  Source file for ArchiveLib 2.0
 | 
						|
//
 | 
						|
//  Copyright (c) Greenleaf Software, Inc. 1994-1996
 | 
						|
//  All Rights Reserved
 | 
						|
//
 | 
						|
// CONTENTS
 | 
						|
//
 | 
						|
//  ALGlArchive::ALGlArchive(char *)
 | 
						|
//  newALGlArchive()
 | 
						|
//
 | 
						|
// REVISION HISTORY
 | 
						|
//
 | 
						|
//   February 14, 1996  2.0A : New Release
 | 
						|
//
 | 
						|
 | 
						|
#include "arclib.h"
 | 
						|
#if !defined( AL_IBM )
 | 
						|
#pragma hdrstop
 | 
						|
#endif
 | 
						|
 | 
						|
#include "filestor.h"
 | 
						|
#include "glarc.h"
 | 
						|
#include "_openf.h"
 | 
						|
 | 
						|
//
 | 
						|
// NAME
 | 
						|
//
 | 
						|
//  ALGlArchive::ALGlArchive()
 | 
						|
//
 | 
						|
// PLATFORMS/ENVIRONMENTS
 | 
						|
//
 | 
						|
//  Console  Windows  PM
 | 
						|
//  C++  C  VB  Delphi
 | 
						|
//
 | 
						|
// SHORT DESCRIPTION
 | 
						|
//
 | 
						|
//  A Greenleaf Archive constructor that creates a file object.
 | 
						|
//
 | 
						|
// C++ SYNOPSIS
 | 
						|
//
 | 
						|
//  #include "arclib.h"
 | 
						|
//  #include "glarc.h"
 | 
						|
//
 | 
						|
//  ALGlArchive::ALGlArchive( const char *file_name );
 | 
						|
//
 | 
						|
// C SYNOPSIS
 | 
						|
//
 | 
						|
//  #include "arclib.h"
 | 
						|
//  #include "glarc.h"
 | 
						|
//
 | 
						|
//  hALArchive newALGlArchive( char *name );
 | 
						|
//
 | 
						|
// VB SYNOPSIS
 | 
						|
//
 | 
						|
//  Declare Function newALGlArchiveLib "AL20LW" ( ByVal name$& ) As Long
 | 
						|
//
 | 
						|
// DELPHI SYNOPSIS
 | 
						|
//
 | 
						|
//  function newALGlArchive( name : String ) : hALArchive;
 | 
						|
//
 | 
						|
// ARGUMENTS
 | 
						|
//
 | 
						|
//  name  :  A character string that gives the name of the file that you
 | 
						|
//           want to use for this GlArchive.  The file name should be a
 | 
						|
//           legal one for your O/S or envrionment.
 | 
						|
//
 | 
						|
// DESCRIPTION
 | 
						|
//
 | 
						|
//  There are two versions of the ALGlArchive constructor.  The first creates
 | 
						|
//  an archive in a storage object.  The second, this function, creates a new
 | 
						|
//  ALFile object using the name you specify as an argument.  This is strictly
 | 
						|
//  a convenience, it lets you bypass the extra step required to build the
 | 
						|
//  file yourself.
 | 
						|
//
 | 
						|
//  Since the constructor has created the ALFile object on the fly, we ask
 | 
						|
//  the ALArchive constructor to set the delete_in_dtor flag.  This means
 | 
						|
//  that when the archive is destroyed, the underlying storage object
 | 
						|
//  will be destroyed as well.
 | 
						|
//
 | 
						|
// RETURNS
 | 
						|
//
 | 
						|
//  When called by C/VB/Delphi, or with operator new in C+, this constructor
 | 
						|
//  returns a pointer to a newly created ALGlArchive object.
 | 
						|
//
 | 
						|
// EXAMPLE
 | 
						|
//
 | 
						|
// SEE ALSO
 | 
						|
//
 | 
						|
// REVISION HISTORY
 | 
						|
//
 | 
						|
//   February 14, 1996  2.0A : New Release
 | 
						|
//
 | 
						|
 | 
						|
AL_PROTO
 | 
						|
ALGlArchive::ALGlArchive( const char AL_DLL_FAR *file_name )  /* Tag public function */
 | 
						|
    : ALArchive( new ALFile( file_name ), 1 )
 | 
						|
{
 | 
						|
    miVersion = 0x100;
 | 
						|
}
 | 
						|
 | 
						|
#if !defined( AL_NO_C )
 | 
						|
 | 
						|
extern "C" AL_LINKAGE hALArchive AL_FUNCTION
 | 
						|
newALGlArchive( char AL_DLL_FAR *name ) /* Tag public function */
 | 
						|
{
 | 
						|
    ALArchive *archive;
 | 
						|
 | 
						|
    archive = new ALGlArchive( name );
 | 
						|
    return (hALArchive) archive;
 | 
						|
}
 | 
						|
 | 
						|
#endif
 | 
						|
 |