Стартовый пул

Abbrevia/MPL-1_1.txt

@@ -0,0 +1,470 @@
+                          MOZILLA PUBLIC LICENSE
+                                Version 1.1
+
+                              ---------------
+
+1. Definitions.
+
+     1.0.1. "Commercial Use" means distribution or otherwise making the
+     Covered Code available to a third party.
+
+     1.1. "Contributor" means each entity that creates or contributes to
+     the creation of Modifications.
+
+     1.2. "Contributor Version" means the combination of the Original
+     Code, prior Modifications used by a Contributor, and the Modifications
+     made by that particular Contributor.
+
+     1.3. "Covered Code" means the Original Code or Modifications or the
+     combination of the Original Code and Modifications, in each case
+     including portions thereof.
+
+     1.4. "Electronic Distribution Mechanism" means a mechanism generally
+     accepted in the software development community for the electronic
+     transfer of data.
+
+     1.5. "Executable" means Covered Code in any form other than Source
+     Code.
+
+     1.6. "Initial Developer" means the individual or entity identified
+     as the Initial Developer in the Source Code notice required by Exhibit
+     A.
+
+     1.7. "Larger Work" means a work which combines Covered Code or
+     portions thereof with code not governed by the terms of this License.
+
+     1.8. "License" means this document.
+
+     1.8.1. "Licensable" means having the right to grant, to the maximum
+     extent possible, whether at the time of the initial grant or
+     subsequently acquired, any and all of the rights conveyed herein.
+
+     1.9. "Modifications" means any addition to or deletion from the
+     substance or structure of either the Original Code or any previous
+     Modifications. When Covered Code is released as a series of files, a
+     Modification is:
+          A. Any addition to or deletion from the contents of a file
+          containing Original Code or previous Modifications.
+
+          B. Any new file that contains any part of the Original Code or
+          previous Modifications.
+
+     1.10. "Original Code" means Source Code of computer software code
+     which is described in the Source Code notice required by Exhibit A as
+     Original Code, and which, at the time of its release under this
+     License is not already Covered Code governed by this License.
+
+     1.10.1. "Patent Claims" means any patent claim(s), now owned or
+     hereafter acquired, including without limitation,  method, process,
+     and apparatus claims, in any patent Licensable by grantor.
+
+     1.11. "Source Code" means the preferred form of the Covered Code for
+     making modifications to it, including all modules it contains, plus
+     any associated interface definition files, scripts used to control
+     compilation and installation of an Executable, or source code
+     differential comparisons against either the Original Code or another
+     well known, available Covered Code of the Contributor's choice. The
+     Source Code can be in a compressed or archival form, provided the
+     appropriate decompression or de-archiving software is widely available
+     for no charge.
+
+     1.12. "You" (or "Your")  means an individual or a legal entity
+     exercising rights under, and complying with all of the terms of, this
+     License or a future version of this License issued under Section 6.1.
+     For legal entities, "You" includes any entity which controls, is
+     controlled by, or is under common control with You. For purposes of
+     this definition, "control" means (a) the power, direct or indirect,
+     to cause the direction or management of such entity, whether by
+     contract or otherwise, or (b) ownership of more than fifty percent
+     (50%) of the outstanding shares or beneficial ownership of such
+     entity.
+
+2. Source Code License.
+
+     2.1. The Initial Developer Grant.
+     The Initial Developer hereby grants You a world-wide, royalty-free,
+     non-exclusive license, subject to third party intellectual property
+     claims:
+          (a)  under intellectual property rights (other than patent or
+          trademark) Licensable by Initial Developer to use, reproduce,
+          modify, display, perform, sublicense and distribute the Original
+          Code (or portions thereof) with or without Modifications, and/or
+          as part of a Larger Work; and
+
+          (b) under Patents Claims infringed by the making, using or
+          selling of Original Code, to make, have made, use, practice,
+          sell, and offer for sale, and/or otherwise dispose of the
+          Original Code (or portions thereof).
+
+          (c) the licenses granted in this Section 2.1(a) and (b) are
+          effective on the date Initial Developer first distributes
+          Original Code under the terms of this License.
+
+          (d) Notwithstanding Section 2.1(b) above, no patent license is
+          granted: 1) for code that You delete from the Original Code; 2)
+          separate from the Original Code;  or 3) for infringements caused
+          by: i) the modification of the Original Code or ii) the
+          combination of the Original Code with other software or devices.
+
+     2.2. Contributor Grant.
+     Subject to third party intellectual property claims, each Contributor
+     hereby grants You a world-wide, royalty-free, non-exclusive license
+
+          (a)  under intellectual property rights (other than patent or
+          trademark) Licensable by Contributor, to use, reproduce, modify,
+          display, perform, sublicense and distribute the Modifications
+          created by such Contributor (or portions thereof) either on an
+          unmodified basis, with other Modifications, as Covered Code
+          and/or as part of a Larger Work; and
+
+          (b) under Patent Claims infringed by the making, using, or
+          selling of  Modifications made by that Contributor either alone
+          and/or in combination with its Contributor Version (or portions
+          of such combination), to make, use, sell, offer for sale, have
+          made, and/or otherwise dispose of: 1) Modifications made by that
+          Contributor (or portions thereof); and 2) the combination of
+          Modifications made by that Contributor with its Contributor
+          Version (or portions of such combination).
+
+          (c) the licenses granted in Sections 2.2(a) and 2.2(b) are
+          effective on the date Contributor first makes Commercial Use of
+          the Covered Code.
+
+          (d)    Notwithstanding Section 2.2(b) above, no patent license is
+          granted: 1) for any code that Contributor has deleted from the
+          Contributor Version; 2)  separate from the Contributor Version;
+          3)  for infringements caused by: i) third party modifications of
+          Contributor Version or ii)  the combination of Modifications made
+          by that Contributor with other software  (except as part of the
+          Contributor Version) or other devices; or 4) under Patent Claims
+          infringed by Covered Code in the absence of Modifications made by
+          that Contributor.
+
+3. Distribution Obligations.
+
+     3.1. Application of License.
+     The Modifications which You create or to which You contribute are
+     governed by the terms of this License, including without limitation
+     Section 2.2. The Source Code version of Covered Code may be
+     distributed only under the terms of this License or a future version
+     of this License released under Section 6.1, and You must include a
+     copy of this License with every copy of the Source Code You
+     distribute. You may not offer or impose any terms on any Source Code
+     version that alters or restricts the applicable version of this
+     License or the recipients' rights hereunder. However, You may include
+     an additional document offering the additional rights described in
+     Section 3.5.
+
+     3.2. Availability of Source Code.
+     Any Modification which You create or to which You contribute must be
+     made available in Source Code form under the terms of this License
+     either on the same media as an Executable version or via an accepted
+     Electronic Distribution Mechanism to anyone to whom you made an
+     Executable version available; and if made available via Electronic
+     Distribution Mechanism, must remain available for at least twelve (12)
+     months after the date it initially became available, or at least six
+     (6) months after a subsequent version of that particular Modification
+     has been made available to such recipients. You are responsible for
+     ensuring that the Source Code version remains available even if the
+     Electronic Distribution Mechanism is maintained by a third party.
+
+     3.3. Description of Modifications.
+     You must cause all Covered Code to which You contribute to contain a
+     file documenting the changes You made to create that Covered Code and
+     the date of any change. You must include a prominent statement that
+     the Modification is derived, directly or indirectly, from Original
+     Code provided by the Initial Developer and including the name of the
+     Initial Developer in (a) the Source Code, and (b) in any notice in an
+     Executable version or related documentation in which You describe the
+     origin or ownership of the Covered Code.
+
+     3.4. Intellectual Property Matters
+          (a) Third Party Claims.
+          If Contributor has knowledge that a license under a third party's
+          intellectual property rights is required to exercise the rights
+          granted by such Contributor under Sections 2.1 or 2.2,
+          Contributor must include a text file with the Source Code
+          distribution titled "LEGAL" which describes the claim and the
+          party making the claim in sufficient detail that a recipient will
+          know whom to contact. If Contributor obtains such knowledge after
+          the Modification is made available as described in Section 3.2,
+          Contributor shall promptly modify the LEGAL file in all copies
+          Contributor makes available thereafter and shall take other steps
+          (such as notifying appropriate mailing lists or newsgroups)
+          reasonably calculated to inform those who received the Covered
+          Code that new knowledge has been obtained.
+
+          (b) Contributor APIs.
+          If Contributor's Modifications include an application programming
+          interface and Contributor has knowledge of patent licenses which
+          are reasonably necessary to implement that API, Contributor must
+          also include this information in the LEGAL file.
+
+               (c)    Representations.
+          Contributor represents that, except as disclosed pursuant to
+          Section 3.4(a) above, Contributor believes that Contributor's
+          Modifications are Contributor's original creation(s) and/or
+          Contributor has sufficient rights to grant the rights conveyed by
+          this License.
+
+     3.5. Required Notices.
+     You must duplicate the notice in Exhibit A in each file of the Source
+     Code.  If it is not possible to put such notice in a particular Source
+     Code file due to its structure, then You must include such notice in a
+     location (such as a relevant directory) where a user would be likely
+     to look for such a notice.  If You created one or more Modification(s)
+     You may add your name as a Contributor to the notice described in
+     Exhibit A.  You must also duplicate this License in any documentation
+     for the Source Code where You describe recipients' rights or ownership
+     rights relating to Covered Code.  You may choose to offer, and to
+     charge a fee for, warranty, support, indemnity or liability
+     obligations to one or more recipients of Covered Code. However, You
+     may do so only on Your own behalf, and not on behalf of the Initial
+     Developer or any Contributor. You must make it absolutely clear than
+     any such warranty, support, indemnity or liability obligation is
+     offered by You alone, and You hereby agree to indemnify the Initial
+     Developer and every Contributor for any liability incurred by the
+     Initial Developer or such Contributor as a result of warranty,
+     support, indemnity or liability terms You offer.
+
+     3.6. Distribution of Executable Versions.
+     You may distribute Covered Code in Executable form only if the
+     requirements of Section 3.1-3.5 have been met for that Covered Code,
+     and if You include a notice stating that the Source Code version of
+     the Covered Code is available under the terms of this License,
+     including a description of how and where You have fulfilled the
+     obligations of Section 3.2. The notice must be conspicuously included
+     in any notice in an Executable version, related documentation or
+     collateral in which You describe recipients' rights relating to the
+     Covered Code. You may distribute the Executable version of Covered
+     Code or ownership rights under a license of Your choice, which may
+     contain terms different from this License, provided that You are in
+     compliance with the terms of this License and that the license for the
+     Executable version does not attempt to limit or alter the recipient's
+     rights in the Source Code version from the rights set forth in this
+     License. If You distribute the Executable version under a different
+     license You must make it absolutely clear that any terms which differ
+     from this License are offered by You alone, not by the Initial
+     Developer or any Contributor. You hereby agree to indemnify the
+     Initial Developer and every Contributor for any liability incurred by
+     the Initial Developer or such Contributor as a result of any such
+     terms You offer.
+
+     3.7. Larger Works.
+     You may create a Larger Work by combining Covered Code with other code
+     not governed by the terms of this License and distribute the Larger
+     Work as a single product. In such a case, You must make sure the
+     requirements of this License are fulfilled for the Covered Code.
+
+4. Inability to Comply Due to Statute or Regulation.
+
+     If it is impossible for You to comply with any of the terms of this
+     License with respect to some or all of the Covered Code due to
+     statute, judicial order, or regulation then You must: (a) comply with
+     the terms of this License to the maximum extent possible; and (b)
+     describe the limitations and the code they affect. Such description
+     must be included in the LEGAL file described in Section 3.4 and must
+     be included with all distributions of the Source Code. Except to the
+     extent prohibited by statute or regulation, such description must be
+     sufficiently detailed for a recipient of ordinary skill to be able to
+     understand it.
+
+5. Application of this License.
+
+     This License applies to code to which the Initial Developer has
+     attached the notice in Exhibit A and to related Covered Code.
+
+6. Versions of the License.
+
+     6.1. New Versions.
+     Netscape Communications Corporation ("Netscape") may publish revised
+     and/or new versions of the License from time to time. Each version
+     will be given a distinguishing version number.
+
+     6.2. Effect of New Versions.
+     Once Covered Code has been published under a particular version of the
+     License, You may always continue to use it under the terms of that
+     version. You may also choose to use such Covered Code under the terms
+     of any subsequent version of the License published by Netscape. No one
+     other than Netscape has the right to modify the terms applicable to
+     Covered Code created under this License.
+
+     6.3. Derivative Works.
+     If You create or use a modified version of this License (which you may
+     only do in order to apply it to code which is not already Covered Code
+     governed by this License), You must (a) rename Your license so that
+     the phrases "Mozilla", "MOZILLAPL", "MOZPL", "Netscape",
+     "MPL", "NPL" or any confusingly similar phrase do not appear in your
+     license (except to note that your license differs from this License)
+     and (b) otherwise make it clear that Your version of the license
+     contains terms which differ from the Mozilla Public License and
+     Netscape Public License. (Filling in the name of the Initial
+     Developer, Original Code or Contributor in the notice described in
+     Exhibit A shall not of themselves be deemed to be modifications of
+     this License.)
+
+7. DISCLAIMER OF WARRANTY.
+
+     COVERED CODE IS PROVIDED UNDER THIS LICENSE ON AN "AS IS" BASIS,
+     WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+     WITHOUT LIMITATION, WARRANTIES THAT THE COVERED CODE IS FREE OF
+     DEFECTS, MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE OR NON-INFRINGING.
+     THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE COVERED CODE
+     IS WITH YOU. SHOULD ANY COVERED CODE PROVE DEFECTIVE IN ANY RESPECT,
+     YOU (NOT THE INITIAL DEVELOPER OR ANY OTHER CONTRIBUTOR) ASSUME THE
+     COST OF ANY NECESSARY SERVICING, REPAIR OR CORRECTION. THIS DISCLAIMER
+     OF WARRANTY CONSTITUTES AN ESSENTIAL PART OF THIS LICENSE. NO USE OF
+     ANY COVERED CODE IS AUTHORIZED HEREUNDER EXCEPT UNDER THIS DISCLAIMER.
+
+8. TERMINATION.
+
+     8.1.  This License and the rights granted hereunder will terminate
+     automatically if You fail to comply with terms herein and fail to cure
+     such breach within 30 days of becoming aware of the breach. All
+     sublicenses to the Covered Code which are properly granted shall
+     survive any termination of this License. Provisions which, by their
+     nature, must remain in effect beyond the termination of this License
+     shall survive.
+
+     8.2.  If You initiate litigation by asserting a patent infringement
+     claim (excluding declatory judgment actions) against Initial Developer
+     or a Contributor (the Initial Developer or Contributor against whom
+     You file such action is referred to as "Participant")  alleging that:
+
+     (a)  such Participant's Contributor Version directly or indirectly
+     infringes any patent, then any and all rights granted by such
+     Participant to You under Sections 2.1 and/or 2.2 of this License
+     shall, upon 60 days notice from Participant terminate prospectively,
+     unless if within 60 days after receipt of notice You either: (i)
+     agree in writing to pay Participant a mutually agreeable reasonable
+     royalty for Your past and future use of Modifications made by such
+     Participant, or (ii) withdraw Your litigation claim with respect to
+     the Contributor Version against such Participant.  If within 60 days
+     of notice, a reasonable royalty and payment arrangement are not
+     mutually agreed upon in writing by the parties or the litigation claim
+     is not withdrawn, the rights granted by Participant to You under
+     Sections 2.1 and/or 2.2 automatically terminate at the expiration of
+     the 60 day notice period specified above.
+
+     (b)  any software, hardware, or device, other than such Participant's
+     Contributor Version, directly or indirectly infringes any patent, then
+     any rights granted to You by such Participant under Sections 2.1(b)
+     and 2.2(b) are revoked effective as of the date You first made, used,
+     sold, distributed, or had made, Modifications made by that
+     Participant.
+
+     8.3.  If You assert a patent infringement claim against Participant
+     alleging that such Participant's Contributor Version directly or
+     indirectly infringes any patent where such claim is resolved (such as
+     by license or settlement) prior to the initiation of patent
+     infringement litigation, then the reasonable value of the licenses
+     granted by such Participant under Sections 2.1 or 2.2 shall be taken
+     into account in determining the amount or value of any payment or
+     license.
+
+     8.4.  In the event of termination under Sections 8.1 or 8.2 above,
+     all end user license agreements (excluding distributors and resellers)
+     which have been validly granted by You or any distributor hereunder
+     prior to termination shall survive termination.
+
+9. LIMITATION OF LIABILITY.
+
+     UNDER NO CIRCUMSTANCES AND UNDER NO LEGAL THEORY, WHETHER TORT
+     (INCLUDING NEGLIGENCE), CONTRACT, OR OTHERWISE, SHALL YOU, THE INITIAL
+     DEVELOPER, ANY OTHER CONTRIBUTOR, OR ANY DISTRIBUTOR OF COVERED CODE,
+     OR ANY SUPPLIER OF ANY OF SUCH PARTIES, BE LIABLE TO ANY PERSON FOR
+     ANY INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES OF ANY
+     CHARACTER INCLUDING, WITHOUT LIMITATION, DAMAGES FOR LOSS OF GOODWILL,
+     WORK STOPPAGE, COMPUTER FAILURE OR MALFUNCTION, OR ANY AND ALL OTHER
+     COMMERCIAL DAMAGES OR LOSSES, EVEN IF SUCH PARTY SHALL HAVE BEEN
+     INFORMED OF THE POSSIBILITY OF SUCH DAMAGES. THIS LIMITATION OF
+     LIABILITY SHALL NOT APPLY TO LIABILITY FOR DEATH OR PERSONAL INJURY
+     RESULTING FROM SUCH PARTY'S NEGLIGENCE TO THE EXTENT APPLICABLE LAW
+     PROHIBITS SUCH LIMITATION. SOME JURISDICTIONS DO NOT ALLOW THE
+     EXCLUSION OR LIMITATION OF INCIDENTAL OR CONSEQUENTIAL DAMAGES, SO
+     THIS EXCLUSION AND LIMITATION MAY NOT APPLY TO YOU.
+
+10. U.S. GOVERNMENT END USERS.
+
+     The Covered Code is a "commercial item," as that term is defined in
+     48 C.F.R. 2.101 (Oct. 1995), consisting of "commercial computer
+     software" and "commercial computer software documentation," as such
+     terms are used in 48 C.F.R. 12.212 (Sept. 1995). Consistent with 48
+     C.F.R. 12.212 and 48 C.F.R. 227.7202-1 through 227.7202-4 (June 1995),
+     all U.S. Government End Users acquire Covered Code with only those
+     rights set forth herein.
+
+11. MISCELLANEOUS.
+
+     This License represents the complete agreement concerning subject
+     matter hereof. If any provision of this License is held to be
+     unenforceable, such provision shall be reformed only to the extent
+     necessary to make it enforceable. This License shall be governed by
+     California law provisions (except to the extent applicable law, if
+     any, provides otherwise), excluding its conflict-of-law provisions.
+     With respect to disputes in which at least one party is a citizen of,
+     or an entity chartered or registered to do business in the United
+     States of America, any litigation relating to this License shall be
+     subject to the jurisdiction of the Federal Courts of the Northern
+     District of California, with venue lying in Santa Clara County,
+     California, with the losing party responsible for costs, including
+     without limitation, court costs and reasonable attorneys' fees and
+     expenses. The application of the United Nations Convention on
+     Contracts for the International Sale of Goods is expressly excluded.
+     Any law or regulation which provides that the language of a contract
+     shall be construed against the drafter shall not apply to this
+     License.
+
+12. RESPONSIBILITY FOR CLAIMS.
+
+     As between Initial Developer and the Contributors, each party is
+     responsible for claims and damages arising, directly or indirectly,
+     out of its utilization of rights under this License and You agree to
+     work with Initial Developer and Contributors to distribute such
+     responsibility on an equitable basis. Nothing herein is intended or
+     shall be deemed to constitute any admission of liability.
+
+13. MULTIPLE-LICENSED CODE.
+
+     Initial Developer may designate portions of the Covered Code as
+     "Multiple-Licensed".  "Multiple-Licensed" means that the Initial
+     Developer permits you to utilize portions of the Covered Code under
+     Your choice of the NPL or the alternative licenses, if any, specified
+     by the Initial Developer in the file described in Exhibit A.
+
+EXHIBIT A -Mozilla Public License.
+
+     ``The contents of this file are subject to the Mozilla Public License
+     Version 1.1 (the "License"); you may not use this file except in
+     compliance with the License. You may obtain a copy of the License at
+     http://www.mozilla.org/MPL/
+
+     Software distributed under the License is distributed on an "AS IS"
+     basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the
+     License for the specific language governing rights and limitations
+     under the License.
+
+     The Original Code is ______________________________________.
+
+     The Initial Developer of the Original Code is ________________________.
+     Portions created by ______________________ are Copyright (C) ______
+     _______________________. All Rights Reserved.
+
+     Contributor(s): ______________________________________.
+
+     Alternatively, the contents of this file may be used under the terms
+     of the _____ license (the  "[___] License"), in which case the
+     provisions of [______] License are applicable instead of those
+     above.  If you wish to allow use of your version of this file only
+     under the terms of the [____] License and not to allow others to use
+     your version of this file under the MPL, indicate your decision by
+     deleting  the provisions above and replace  them with the notice and
+     other provisions required by the [___] License.  If you do not delete
+     the provisions above, a recipient may use your version of this file
+     under either the MPL or the [___] License."
+
+     [NOTE: The text of this Exhibit A may differ slightly from the text of
+     the notices in the Source Code files of the Original Code. You should
+     use the text of this Exhibit A rather than the text found in the
+     Original Code Source Code for Your Modifications.]
+

Abbrevia/Readme.html

@@ -0,0 +1,221 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
+<html lang="en-us">
+<head>
+  <title>Abbrevia v5.0</title>
+  <meta content="text/html;charset=ISO-8859-1" http-equiv="Content-Type">
+  <style type="text/css">
+    a:link {color: #03f; text-decoration: none;}
+    a:visited {color: #03f; text-decoration: none;}
+    a:hover {text-decoration: underline;}
+    h3 > a:hover {text-decoration: none;}
+    body {font-family: 'Verdana', 'Arial', Sans-Serif; font-size: 10pt;}
+    li {margin-bottom: .3em;}
+  </style>
+</head>
+
+<body>
+
+<h1>Abbrevia</h1>
+
+<p>Version 5.0<br>
+December 6, 2011<br>
+<a href="http://tpabbrevia.sourceforge.net/">Home Page</a></p>
+
+<hr>
+
+<h3>Table of contents</h3>
+
+<ul>
+  <li><a href="#intro">Introduction</a></li>
+  <li><a href="#packages">Packages</a></li>
+  <li><a href="#install">Installation</a></li>
+  <li><a href="#support">Support and feedback</a></li>
+  <li><a href="#devel">Development sources</a></li>
+  <li><a href="#contribute">Getting involved</a></li>
+  <li><a href="#license">License</a></li>
+  <li><a href="#changes">Changes from 4.0</a></li>
+</ul>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="intro">Introduction</a></h3>
+
+<p>Abbrevia is a compression toolkit for Embarcadero Delphi, C++ Builder, and Kylix, and FreePascal. It supports PKZip, Microsoft CAB, tar, gzip, bzip2 and zlib compression formats, and the creation of self-extracting executables.  It includes several visual components that simplify displaying zip files.</p>
+
+<p>Abbrevia 5.0 adds a number of new features and support for more platforms:</p>
+
+<ul>
+  <li>RAD Studio XE2 support, including both 64-bit Windows and OS X</li>
+  <li>FreePascal support on Windows, OS X, and Linux</li>
+  <li>TAbTreeView and TAbListView VCL controls that provide an Explorer/WinZip-like interface</li>
+  <li>ZIP64 support, for archives larger than 2GB</li>
+  <li>Improved split/spanned zip support</li>
+  <li>Expanded LZMA support</li>
+  <li>Unicode filenames in tar and gzip archives</li>
+</ul>
+
+<p>This is a source-only release. It includes design-time and run-time packages for Delphi 6 through Delphi XE2, C++Builder 2009 through XE2, and Kylix 3.  FreePascal is supported, but runtime/design time packages are not included.  The LZMA, PPMd, and WavPack algorithms are only supported on Delphi/C++Builder for Windows (32 and 64-bit).</p>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="packages">Packages</a></h3>
+
+<p>Abbrevia includes the following packages:</p>
+
+<ul>
+  <li><b>Abbrevia.bpl</b>: Runtime non-visual components.  <code>TAbZipBrowse</code>, <code>TAbZipKit</code>, <code>TAbMakeCab</code>, etc.</li>
+  <li><b>AbbreviaVCL.bpl</b>: Runtime visual components.  <code>TAbTreeView</code>, <code>TAbListView</code>, <code>TAbProgressBar</code>.</li>
+  <li><b>AbbreviaVCLDesign.bpl</b>: Designtime support.</li>
+  <li><b>AbbreviaCLX.bpl</b>, <b>AbbreviaCLXDesign.bpl</b> (Delphi 6/7): CLX visual components.</li>
+</ul>
+
+<p><code>$LIBSUFFIX</code> is used, so each .bpl/.bpi will have a version number after it corresponding to the compiler version (e.g. 160 for Delphi XE2).</p>
+
+<p>The Kylix 3 <code>AbbreviaCLX</code> package includes all of the non-visual runtime units, and the <code>Abbrevia</code> package is not included separately.</p>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="install">Installation</a></h3>
+
+<p>To install TurboPower Abbrevia into your IDE:</p>
+
+<ol>
+  <li>Unzip the release files into a directory (e.g., d:\abbrevia).</li>
+  <li>Start Delphi or C++Builder.</li>
+  <li>Add the source subdirectory (e.g. d:\abbrevia\source) to the Delphi Library path.  When using XE2 or later, add it to all platforms.</li>
+  <li>If using C++Builder, add the source subdirectory to C++Builder's Include and Library paths.</li>
+  <li>Open the project group in the packages directory that corresponds to the IDE being used (e.g. "Delphi XE2.groupproj").</li>
+  <li>Start at the top of the project group and compile each package in turn.  If using C++Builder, install each one after compiling.</li>
+  <li>Select the "AbbreviaVCLDesign" package and install it.  The IDE should notify you that the components have been installed.  If you are using Delphi 7 you can install "AbbreviaCLXDesign" as well to get CLX designtime support.</li>
+  <li>Make sure the PATH environmental variable contains the directory in which the compiled packages (i.e. BPL or DPL files) were placed.</li>
+</ol>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="support">Support and feedback</a></h3>
+
+<p><a href="https://sourceforge.net/projects/tpabbrevia/forums">Support forums</a> are available on the SourceForge project site.</p>
+
+<p>Bug reports can be entered in the <a href="http://sourceforge.net/tracker/?atid=529778&group_id=71001&func=browse">bug tracker</a>. If possible please include a small test case that reproduces the issue. Sample files can be attached to the bug report, and confidential data can be emailed to the project administrator.</p>
+
+<p>If you have something you would like to see in the product feel free to add a <a href="http://sourceforge.net/tracker/?atid=529781&group_id=71001&func=browse">feature request</a>.</p>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="devel">Development sources</a></h3>
+
+<p>The current source code is available in the Subversion <a href="https://sourceforge.net/scm/?type=svn&group_id=71001">repository</a>. The code here may not be as stable or tested as the official releases, but may include bug fixes or new features not yet included in the downloadable releases.</p>
+
+<p>The repository also includes <a href="http://dunit.sourceforge.net/">DUnit</a> tests, the source code to the third-party libraries, and the Help source code.</p>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="contribute">Getting involved</a></h3>
+
+<p>If you want to help make Abbrevia better, there are several ways to get involved. We welcome help with features and bug fixes. Just look in the issue tracker to see what's needed. We're also looking for help for:</p>
+
+<ul>
+  <li>C++Builder maintainer</li>
+  <li>FreePascal maintainer</li>
+  <li>Webmaster</li>
+  <li>Documentation</li>
+  <li>Examples</li>
+</ul>
+
+
+<!--====================--><hr>
+
+
+<h3><a name="license">License</a></h3>
+
+<p>Abbrevia is licensed under the <a href="http://www.mozilla.org/MPL/MPL-1.1.html">Mozilla Public License</a>, version 1.1. It can be used in commercial and closed-source applications provided any changes to Abbrevia units are made available electronically.</p>
+
+<p>The <a href="http://www.wavpack.com/">WavPack</a> library used for zipx decompression has its own license, included as "WavPack License.txt". Redistribution requires a copyright notice in your documentation or elsewhere in your distribution. WavPack support can be removed by disabling the <b>UnzipZipxSupport</b> or <b>UnzipWavPackSupport</b> conditional define in <b>AbDefine.inc</b>.</p> 
+
+
+<!--====================--><hr>
+
+
+<h3><a name="changes">Changes from 4.0</a></h3>
+
+<p>These are the most significant features, fixes and changes made since v4.0. Information on earlier versions is available in the full <a href="http://tpabbrevia.sourceforge.net/Changelog">changelog</a>.</p>
+
+<h4>Features</h4>
+
+<ul>
+  <li>Added support for Delphi/C++Builder XE2, including the 64-bit Windows and OS X platforms.</li>
+  <li>Added support for FreePascal 2.4/2.6 on Windows, OS X, and Linux.</li>
+  <li>Added <b>TAbTreeView</b> and <b>TAbListView</b> VCL controls that provide an Explorer/WinZip-like interface, and ComCtrlsDemo Delphi example to demonstrate their usage.</li>
+  <li>Added ZIP64 support (reading/writing zip archives larger than 2GB, containing files larger than 2GB, or containing more than 65K files).</li>
+  <li>Significantly improved split/spanned zip support.</li>
+  <li>Added LZMA buffer-to-buffer compression/decompression (<b>LzmaEncodeBuffer</b> and <b>LzmaDecodeBuffer</b>) and compression/decompression stream descendants (<b>TAbLZMACompressionStream</b> and <b>TAbLZMADecompressionStream</b>).  Thanks to Pierre le Riche.</li>
+  <li>Added support for tar and gzip archives containing filenames encoded in the system ANSI and OEM codepage and UTF-8.  New archives are written using UTF-8.</li>
+  <li>Added icon/text to RAD Studio's splash screen and about box.  Thanks to Lance Rasmussen.</li>
+  <li>Added VCL TAbProgressBar control that can replace TAbMeter.</li>
+  <li>Added 64-bit COM dll and support for per-user registration.</li>
+</ul>
+
+<h4>API Changes</h4>
+
+<ul>
+  <li>Renamed <code>LzEncode/LzDecode</code> to <code>LzmaEncodeStream/LzmaDecodeStream</code>.</li>
+  <li>Renamed <code>LzmaDecode</code> to <code>LzmaDecodeStream</code>.</li>
+  <li>Various changes due to split/spanned zip changes (see below).</li>
+</ul>
+
+<h4>Bug Fixes</h4>
+
+<ul>
+  <li>Fixed support for opening paths with a "\\?\" prefix.</li>
+  <li>Fixed buffer overflow in AbUtils.pas.</li>
+  <li>Fixed freshening/replacing items using absolute paths.</li>
+  <li>Fixed CAB files created with Delphi 2009 and later incorrectly including the "has next volume" flag.</li>
+  <li>Fixed Delphi 6 support. Thanks to Peter Luijer.</li>
+  <li>Fixed <code>AbFindFiles</code> so it finds system and hidden folders if the SearchAttr parameter includes them [3372355].</li>
+  <li>Fixed hang when trying to extract files that cross CAB boundaries when the next cab is not available [3370538].</li>
+  <li>Fixed extracting CAB archives so OnProcessItemFailure isn't called after a successful extraction.</li>
+  <li>Fixed LZMA support for streams larger than 2GB.</li>
+  <li>Fixed <code>AbGetDriveFreeSpace</code> buffer overflow and fixed support for free space larger than 2GB.</li>
+  <li>Fixed support for modifying SFX zips with non-native stubs (Linux on Windows and vice versa).</li>
+  <li>Fixed <code>TAbBitBucketStream</code> so it doesn't fault on writes larger than the buffer size, and supports sizes over 2GB.</li>
+  <li>Zip local file headers are now preserved when copying unmodified files to a new archive.</li>
+  <li>Local file headers are no longer copies of the central directory headers, since many of the defined extra data fields have different values in the two locations.</li>
+  <li>Fixed IZipKit (COM) support for enumerations (for each).</li>
+</ul>
+
+<h4>Split/Spanned Zip Changes</h4>
+
+<ul>
+  <li>
+    <h5>Bug Fixes</h5>
+    <ul>
+      <li>Added support for reading/writing unequally sized spans.</li>
+      <li>Split/spanned zips are now written to the final location as they're compressed, rather than writing everything to a virtual memory stream first.</li>
+      <li>Fixed writing headers that can't be spanned so they trigger a new span if necessary.</li>
+    </ul>
+  </li>
+  <li>
+    <h5>API Changes</h5>
+    <ul>
+      <li>Converting from an unspanned archive to a spanned one is no longer supported.</li>
+      <li><code>OnRequestImage</code>'s span numbers are now 1-based instead of 0-based to match <code>OnRequestNthDisk</code>.</li>
+      <li><code>OnArchiveSaveProgress</code> is now called at the same time as <code>OnArchiveProgress</code>, since there isn't a lengthy copy after a spanned archive is written.</li>
+      <li><code>TAbSpanStream</code> has been replaced by <code>TAbSpanReadStream</code> and <code>TAbSpanWriteStream</code>.</li>
+    </ul>
+  </li>
+</ul>
+
+</body>
+</html>

Abbrevia/WavPack License.txt

@@ -0,0 +1,25 @@
+               Copyright (c) 1998 - 2009 Conifer Software
+                          All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+
+    * Redistributions of source code must retain the above copyright notice,
+      this list of conditions and the following disclaimer.
+    * Redistributions in binary form must reproduce the above copyright notice,
+      this list of conditions and the following disclaimer in the
+      documentation and/or other materials provided with the distribution.
+    * Neither the name of Conifer Software nor the names of its contributors
+      may be used to endorse or promote products derived from this software
+      without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR
+ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

Abbrevia/examples/CBuilder/Abbrexam.bpr

@@ -0,0 +1,121 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = Abbrexam.exe
+OBJFILES = Abbrexam.obj UExample.obj UDemoDlg.obj
+RESFILES = Abbrexam.res
+RESDEPEN = $(RESFILES) UExample.dfm UDemoDlg.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -DUSEPACKAGES -I$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -DUSEPACKAGES \
+  -U$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Lib;$(BCB)\Lib\Obj;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W -$O- -v \
+  -JPHNV -M
+RFLAGS = -DUSEPACKAGES -i$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /dUSEPACKAGES /mx /w2 /zd
+LFLAGS = -L$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Lib;$(BCB)\Lib\Obj;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(PACKAGES) sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=4
+Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+Item2=..\..\Headers\CBuildr3;$(BCB)\include;$(BCB)\include\vcl;..\..
+Item3=..\..\Headers\CBuildr3;$(BCB)\include;$(BCB)\include\vcl;D:\Abbrevia
+
+[HistoryLists\hlLibraryPath]
+Count=7
+Item0=$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Lib;$(BCB)\Lib\Obj;..\..\packages;..\..\source
+Item1=$(BCB)\include;$(BCB)\include\vcl;$(BCB)\Lib\Obj;..\..\packages;..\..\source
+Item2=$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item3=$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source;D:\SourceForge\Abbrevia\packages
+Item4=$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item5=..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item6=..\..;$(BCB)\lib\obj;$(BCB)\lib;D:\Abbrevia
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Abbrexam.cpp

@@ -0,0 +1,51 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      Abbrexam.cpp                     */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("UExample.cpp", Form1);
+USERES("Abbrexam.res");
+USEFORM("UDemoDlg.cpp", DemoDlg);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->CreateForm(__classid(TForm1), &Form1);
+     Application->CreateForm(__classid(TDemoDlg), &DemoDlg);
+     Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/AllExamples.bpg

@@ -0,0 +1,85 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = Abbrexam CabExt CabFind CompPad Contents ExCBrows ExFilter Finder \
+  MakeCab MakeSfx selfex SelfExV SelfStub Streams StrmBmp StrmPad TPZip Unzip \
+  UsingAPI Zipper ZipReg ZipView
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+Abbrexam: Abbrexam.bpr
+  $(MAKE)
+
+CabExt: CabExt.bpr
+  $(MAKE)
+
+CabFind: CabFind.bpr
+  $(MAKE)
+
+CompPad: CompPad.bpr
+  $(MAKE)
+
+Contents: Contents.bpr
+  $(MAKE)
+
+ExCBrows: ExCBrows.bpr
+  $(MAKE)
+
+ExFilter: ExFilter.bpr
+  $(MAKE)
+
+Finder: Finder.bpr
+  $(MAKE)
+
+MakeCab: MakeCab.bpr
+  $(MAKE)
+
+MakeSfx: MakeSfx.bpr
+  $(MAKE)
+
+selfex: selfex.bpr
+  $(MAKE)
+
+SelfExV: SelfExV.bpr
+  $(MAKE)
+
+SelfStub: SelfStub.bpr
+  $(MAKE)
+
+Streams: Streams.bpr
+  $(MAKE)
+
+StrmBmp: StrmBmp.bpr
+  $(MAKE)
+
+StrmPad: StrmPad.bpr
+  $(MAKE)
+
+TPZip: TPZip.bpr
+  $(MAKE)
+
+Unzip: Unzip.bpr
+  $(MAKE)
+
+UsingAPI: UsingAPI.bpr
+  $(MAKE)
+
+Zipper: Zipper.bpr
+  $(MAKE)
+
+ZipReg: ZipReg.bpr
+  $(MAKE)
+
+ZipView: ZipView.bpr
+  $(MAKE)
+
+

Abbrevia/examples/CBuilder/CabExt.bpr

@@ -0,0 +1,112 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = CabExt.exe
+OBJFILES = CabExt.obj CabExt1.obj
+RESFILES = CabExt.res
+RESDEPEN = $(RESFILES) CabExt1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib vcl35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W -$O- -v \
+  -JPHNV -M
+RFLAGS = -i$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source /mx /w2 /zd
+LFLAGS = -L$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) -aa \
+  -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=4
+Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+Item2=..\..\Examples\CBuildr3;$(BCB)\include;$(BCB)\include\vcl
+Item3=..\..\Headers\CBuildr3;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=4
+Item0=$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item2=..\..\..\CBuildr3;..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item3=..\source;..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CabExt.cpp

@@ -0,0 +1,46 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("CabExt1.cpp", Form1);
+USERES("CabExt.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+	try
+	{
+		Application->Initialize();
+		Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+	}
+	catch (Exception &exception)
+	{
+		Application->ShowException(&exception);
+	}
+	return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CabExt1.cpp

@@ -0,0 +1,84 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "CabExt1.h"
+//---------------------------------------------------------------------------
+#pragma link "AbCabExt"
+#pragma link "AbCBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma link "AbMeter"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+
+char MainCaption[] = "Cabinet Extractor";
+bool AbortFlag;
+
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  if (OpenDialog1->Execute()) {
+    AbCabExtractor1->FileName = OpenDialog1->FileName;
+    AbCabExtractor1->BaseDirectory = ExtractFilePath(AbCabExtractor1->FileName);
+    Cursor = crHourGlass;
+    AbCabExtractor1->ExtractFiles("*.*");
+    Cursor = crDefault;
+  }
+  Caption = MainCaption;
+  AbortFlag = False;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbCabExtractor1ConfirmProcessItem(TObject *Sender,
+	TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm)
+{
+  Caption = "Extracting " + Item->FileName;
+  Confirm = !AbortFlag;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button2Click(TObject *Sender)
+{
+  AbortFlag = True;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
+{
+  AbCabExtractor1->FileName = "";	
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbCabExtractor1RequestImage(TObject *Sender,
+      Integer ImageNumber, AnsiString &ImageName, bool &Abort)
+{
+  Abort = InputQuery("Cab Extractor", "Next Cab name", ImageName);
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CabExt1.h

@@ -0,0 +1,66 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef CabExt1H
+#define CabExt1H
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\ComCtrls.hpp>
+#include <vcl\Dialogs.hpp>
+#include "AbCabExt.hpp"
+#include "AbCBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+#include "AbMeter.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+	TLabel *Label1;
+	TButton *Button1;
+	TMemo *Memo1;
+	TButton *Button2;
+	TOpenDialog *OpenDialog1;
+        TAbMeter *AbMeter1;
+        TAbCabExtractor *AbCabExtractor1;
+	void __fastcall Button1Click(TObject *Sender);
+	void __fastcall AbCabExtractor1ConfirmProcessItem(TObject *Sender,
+	TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm);
+	void __fastcall Button2Click(TObject *Sender);
+	void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
+        void __fastcall AbCabExtractor1RequestImage(TObject *Sender,
+          Integer ImageNumber, AnsiString &ImageName, bool &Abort);
+private:	// User declarations
+public:		// User declarations
+	__fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/CabFind.bpr

@@ -0,0 +1,188 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = CabFind.exe
+OBJFILES = CabFind.obj CabFind1.obj
+RESFILES = CabFind.res
+DEFFILE =
+RESDEPEN = $(RESFILES) CabFind1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib VCL35.lib
+SPARELIBS = VCL35.lib vclx35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHASM = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=3
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+Item2=..\..\CBuildr3;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=3
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..\..\abbrevia;..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item2=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=_RTLDLL
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=$(BCB)\source\vcl
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
+# ---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CabFind.cpp

@@ -0,0 +1,45 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+USERES("CabFind.res");
+USEFORM("CabFind1.cpp", Form1);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+        try
+        {
+                 Application->Initialize();
+                 Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+        }
+        catch (Exception &exception)
+        {
+                 Application->ShowException(&exception);
+        }
+        return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CabFind1.cpp

@@ -0,0 +1,107 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+
+#include "CabFind1.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma link "AbCBrows"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+
+bool Aborted;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+        : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
+{
+  Aborted = true;
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Edit1Change(TObject *Sender)
+{
+  Button1->Enabled = (Edit1->Text.Length() > 0);
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  Button1->Enabled = false;
+  Memo1->Clear();
+  try
+  {
+    Button2->Enabled = true;
+    Aborted = false;
+//     look in the file list box for the file
+    for (int i=0; i<FileListBox1->Items->Count; i++)
+    {
+      Application->ProcessMessages();
+      if (Aborted)
+        break;
+      if (CompareText(Edit1->Text, FileListBox1->Items->Strings[i]) == 0)
+      {
+        Memo1->Lines->Add("Found in " + FileListBox1->Directory);
+        break;
+      }
+//     now add search of zip and self extracting files
+      String CurFile = UpperCase(FileListBox1->Items->Strings[i]);
+      if (CurFile.Pos(".CAB") > 0)
+      {
+        try
+        {
+          AbCabBrowser1->FileName = FileListBox1->Items->Strings[i];
+          if (AbCabBrowser1->FindFile(Edit1->Text) >= 0)
+            Memo1->Lines->Add("Found in " + FileListBox1->Items->Strings[i]);
+        }
+        catch (...)
+        {
+        }
+      }  //if (CurFile...
+    } //for (int...
+  }
+  __finally
+  {
+    Memo1->Lines->Add("Done!");
+    Edit1->Enabled = true;
+    Button1->Enabled = true;
+    Button2->Enabled = false;
+  }
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Button2Click(TObject *Sender)
+{
+  Aborted = true;        
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CabFind1.h

@@ -0,0 +1,63 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef CabFind1H
+#define CabFind1H
+//---------------------------------------------------------------------------
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+#include "AbCBrows.hpp"
+#include <FileCtrl.hpp>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+        TLabel *Label1;
+        TLabel *Label2;
+        TEdit *Edit1;
+        TMemo *Memo1;
+        TDriveComboBox *DriveComboBox1;
+        TDirectoryListBox *DirectoryListBox1;
+        TFileListBox *FileListBox1;
+        TMemo *Memo2;
+        TButton *Button1;
+        TButton *Button2;
+        TAbCabBrowser *AbCabBrowser1;
+        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
+        void __fastcall Edit1Change(TObject *Sender);
+        void __fastcall Button1Click(TObject *Sender);
+        void __fastcall Button2Click(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+        __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/CompPad.bpr

@@ -0,0 +1,110 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = CompPad.exe
+OBJFILES = ..\..\source\AbZipper.obj ..\..\source\AbZipTyp.obj ..\..\source\AbArcTyp.obj \
+  ..\..\source\AbSpanSt.obj ..\..\source\AbUtils.obj CompPad.obj UCompPad.obj
+RESFILES = CompPad.res
+RESDEPEN = $(RESFILES) UCompPad.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;..\..\source
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..\..\abbrevia;..\..\source;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\..\source \
+  -DUSEPACKAGES -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -U..\..\..\abbrevia;..\..\source;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\..\source;$(DEBUGLIBPATH) \
+  -I..\..\..\abbrevia;..\..\source;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\..\source \
+  -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -DUSEPACKAGES -$Y -$W -$O- -v -JPHNV -M
+RFLAGS = -i..\..\..\abbrevia;..\..\source;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\..\source \
+  -DUSEPACKAGES
+AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\..\source \
+  /dUSEPACKAGES /mx /w2 /zd
+LFLAGS = -L..\..\..\abbrevia;..\..\source;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(PACKAGES) sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=1
+Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\..\source
+
+[HistoryLists\hlLibraryPath]
+Count=1
+Item0=$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\..\source
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/CompPad.cpp

@@ -0,0 +1,54 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      CompPad.cpp                      */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("UCompPad.cpp", Form1);
+USERES("CompPad.res");
+USEUNIT("..\..\source\AbZipper.pas");
+USEUNIT("..\..\source\AbZipTyp.pas");
+USEUNIT("..\..\source\AbArcTyp.pas");
+USEUNIT("..\..\source\AbSpanSt.pas");
+USEUNIT("..\..\source\AbUtils.pas");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Contents.bpr

@@ -0,0 +1,186 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = Contents.exe
+OBJFILES = Contents.obj UContent.obj
+RESFILES = Contents.res
+DEFFILE =
+RESDEPEN = $(RESFILES) UContent.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib VCLX35.lib VCL35.lib
+SPARELIBS = VCL35.lib VCLX35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHASM = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=_RTLDLL
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=$(BCB)\source\vcl
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
+# ---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Contents.cpp

@@ -0,0 +1,45 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+USERES("Contents.res");
+USEFORM("UContent.cpp", Form1);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+        try
+        {
+                 Application->Initialize();
+                 Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+        }
+        catch (Exception &exception)
+        {
+                 Application->ShowException(&exception);
+        }
+        return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/DgAbout.cpp

@@ -0,0 +1,46 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      DgAbout.cpp                      */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "DgAbout.h"
+//---------------------------------------------------------------------------
+#pragma resource "*.dfm"
+TdlgAboutBox *dlgAboutBox;
+//---------------------------------------------------------------------------
+__fastcall TdlgAboutBox::TdlgAboutBox(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TdlgAboutBox::FormCreate(TObject *Sender)
+{
+  Version->Caption = "Version " + String(AbVersion);
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/DgAbout.h

@@ -0,0 +1,66 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      DgAbout.h                        */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef DgAboutH
+#define DgAboutH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\ExtCtrls.hpp>
+#include "AbConst.hpp"
+//---------------------------------------------------------------------------
+class TdlgAboutBox : public TForm
+{
+__published:	// IDE-managed Components
+  TPanel *Panel1;
+  TLabel *Label8;
+  TImage *ProgramIcon;
+  TLabel *Label7;
+  TLabel *Label86;
+  TLabel *Label85;
+  TLabel *Label84;
+  TLabel *Version;
+  TPanel *Panel2;
+  TLabel *lnTitleShadow;
+  TLabel *lblTitle;
+  TLabel *Label5;
+  TLabel *Label1;
+  TButton *OKButton;
+  void __fastcall FormCreate(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+  __fastcall TdlgAboutBox(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TdlgAboutBox *dlgAboutBox;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/ExCBrow1.cpp

@@ -0,0 +1,108 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "ExCBrow1.h"
+//---------------------------------------------------------------------------
+#pragma link "AbMeter"
+#pragma link "AbCBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  if (OpenDialog1->Execute())
+    AbCabBrowser1->FileName = OpenDialog1->FileName;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button2Click(TObject *Sender)
+{
+  AbCabBrowser1->FileName = "";
+  Memo1->Clear();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbCabBrowser1Load(TObject *Sender)
+{
+  Memo1->Clear();
+  Memo1->Lines->Add(AbCabBrowser1->FileName);
+  Memo1->Lines->Add("----------------------------------------------");
+  String s = "  Size: \t \t ";
+  Memo1->Lines->Add(s + IntToStr(AbCabBrowser1->CabSize));
+  s = "  Folders: \t \t ";
+  Memo1->Lines->Add(s + IntToStr(AbCabBrowser1->FolderCount));
+  s = "  Files: \t \t ";
+  Memo1->Lines->Add(s + IntToStr(AbCabBrowser1->Count));
+  s = "  SetID: \t \t ";
+  Memo1->Lines->Add(s + IntToStr(AbCabBrowser1->SetID));
+  s = "  Cab #: \t \t ";
+  Memo1->Lines->Add(s + IntToStr(AbCabBrowser1->CurrentCab));
+  s = "  hasPrev: \t ";
+  if (AbCabBrowser1->HasPrev)
+    s = s + "Yes";
+  else
+    s = s + "No";
+  Memo1->Lines->Add(s);
+  s = "  hasNext: \t ";
+  if (AbCabBrowser1->HasNext)
+    s = s + "Yes";
+  else
+    s = s + "No";
+  Memo1->Lines->Add(s);
+  Memo1->Lines->Add("  ");
+
+  if (AbCabBrowser1->Count > 0) {
+    s = "Files: \t \t Size \t Timestamp \t Attributes \t Partial File";
+    Memo1->Lines->Add(s);
+    s = "------------------------------------------------------------------";
+    Memo1->Lines->Add(s);
+    for (int i=0; i<AbCabBrowser1->Count; i++) {
+      Longint LI = AbCabBrowser1->Items[i]->LastModFileDate;
+      LI = LI << 16;
+      LI = LI + AbCabBrowser1->Items[i]->LastModFileTime;
+      TDateTime DT = FileDateToDateTime(LI);
+      s = AbCabBrowser1->Items[i]->FileName + "\t" +
+        IntToStr(AbCabBrowser1->Items[i]->UncompressedSize) + "\t" +
+        DateTimeToStr(DT) + "\t" +
+        IntToStr(AbCabBrowser1->Items[i]->ExternalFileAttributes) + "\t";
+      if (AbCabBrowser1->Items[i]->PartialFile)
+        s = s + "Yes";
+      else
+        s = s + "No";
+      Memo1->Lines->Add(s);
+    }
+  }
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExCBrow1.h

@@ -0,0 +1,68 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef ExCBrow1H
+#define ExCBrow1H
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\ExtCtrls.hpp>
+#include "AbMeter.hpp"
+#include <vcl\Dialogs.hpp>
+#include "AbCBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+	TMemo *Memo1;
+	TPanel *Panel1;
+	TLabel *Label1;
+	TButton *Button1;
+	TButton *Button2;
+	TPanel *Panel2;
+	TAbMeter *AbMeter1;
+	TAbMeter *AbMeter2;
+	TLabel *Label2;
+	TLabel *Label3;
+	TOpenDialog *OpenDialog1;
+	TAbCabBrowser *AbCabBrowser1;
+   TAbVCLMeterLink *AbVCLMeterLink1;
+   TAbVCLMeterLink *AbVCLMeterLink2;
+	void __fastcall Button1Click(TObject *Sender);
+	void __fastcall Button2Click(TObject *Sender);
+	void __fastcall AbCabBrowser1Load(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+	__fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/ExCBrows.bpr

@@ -0,0 +1,110 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = ExCBrows.exe
+OBJFILES = ExCBrows.obj ExCBrow1.obj
+RESFILES = ExCBrows.res
+RESDEPEN = $(RESFILES) ExCBrow1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib vcl35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExCBrows.cpp

@@ -0,0 +1,46 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("ExCBrow1.cpp", Form1);
+USERES("ExCBrows.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+	try
+	{
+		Application->Initialize();
+		Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+	}
+	catch (Exception &exception)
+	{
+		Application->ShowException(&exception);
+	}
+	return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExCf.bpr

@@ -0,0 +1,221 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = ExCf.exe
+OBJFILES = ..\..\source\AbHexVw.obj ..\..\source\AbCompnd.obj ExCf.obj uCfMain.obj \
+  uCfNewDg.obj uCfGenDg.obj
+RESFILES = ExCf.res
+DEFFILE =
+MAINSOURCE = ExCf.cpp
+RESDEPEN = $(RESFILES) uCfMain.dfm uCfNewDg.dfm uCfGenDg.dfm
+LIBFILES =
+IDLFILES =
+IDLGENFILES = 
+LIBRARIES = vcldbx35.lib vcldb35.lib vclx35.lib vcl35.lib
+PACKAGES =
+SPARELIBS = vcl35.lib vclx35.lib vcldb35.lib vcldbx35.lib
+DEFFILE =
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHPAS = .;
+PATHASM = .;..\..\source
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+USERDEFINES = 
+SYSDEFINES = NO_STRICT
+INCLUDEPATH = "D:\Program Files\Borland\BCB\CBuilder5\Projects";"D:\Program Files\Borland\BCB\";$(BCB)\include;$(BCB)\include\vcl;..\..
+LIBPATH = "D:\Program Files\Borland\BCB\CBuilder5\Projects";"D:\Program Files\Borland\BCB\";$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib;..\..
+WARNINGS= -w-par -w-8027 -w-8026
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Ve -r- -a8 -k -y -v -vi- -I..\..\source;$(BCB)\include;$(BCB)\include\vcl \
+  -D$(SYSDEFINES);$(USERDEFINES) -Vx -b- -c -tWM -tWM
+CFLAG2 = -I..\..\source;
+CFLAG3 =
+IDLCFLAGS = -I..\..\source -I$(BCB)\include -I$(BCB)\include\vcl -src_suffixcpp -boa
+PFLAGS = -I..\..\source; \
+  -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..\source;$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib;$(DEBUGLIBPATH) -$W \
+  -$O- -$YD -v -JPHNV -M -JPHNE -JPHNE
+RFLAGS = -i..\..\source;
+AFLAGS = /mx /w2 /zd /ic:\Abbrevia /i$(BCB)\include /i$(BCB)\include\vcl
+LFLAGS = -L..\..\source;$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib;$(DEBUGLIBPATH) -aa \
+  -Tpe -x -v
+IFLAGS =
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj sysinit.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=4
+Item0=c:\Abbrevia;$(BCB)\include;$(BCB)\include\vcl
+Item1=$(BCB)\include;$(BCB)\include\vcl;c:\abbrevia
+Item2=$(BCB)\include;$(BCB)\include\vcl;..\..;c:\abbrevia
+Item3=$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=4
+Item0=c:\Abbrevia;$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib
+Item1=$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib;c:\abbrevia
+Item2=$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib;..\..;c:\abbrevia
+Item3=$(BCB)\lib\obj;$(BCB)\lib;$(BCB)\projects\lib
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=$(BCB)\source\vcl
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if "$(USERDEFINES)" != ""
+AUSERDEFINES = -d$(USERDEFINES:;= -d)
+!else
+AUSERDEFINES =
+!endif
+
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(CPP32)
+CPP32 = cpp32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+
+!if !$d(IDL2CPP)
+IDL2CPP = idl2cpp
+!endif
+
+
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) -L$(LIBPATH) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) -U$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -O$(INCLUDEPATH) --BCB {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) -U$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -O$(INCLUDEPATH) --BCB {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(WARNINGS) -I$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(WARNINGS) -I$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -n$(@D) {$< }
+
+.c.i:
+    $(BCB)\BIN\$(CPP32) $(CFLAG1) $(WARNINGS) -I$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -n. {$< }
+
+.cpp.i:
+    $(BCB)\BIN\$(CPP32) $(CFLAG1) $(WARNINGS) -I$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -n. {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) -i$(INCLUDEPATH:;= -i) $(AUSERDEFINES) -d$(SYSDEFINES:;= -d) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -I$(INCLUDEPATH) -D$(USERDEFINES);$(SYSDEFINES) -fo$@ $<
+# ---------------------------------------------------------------------------
+
+
+
+

Abbrevia/examples/CBuilder/ExCf.cpp

@@ -0,0 +1,52 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+
+#include <vcl.h>
+#pragma hdrstop
+USERES("ExCf.res");
+USEFORM("uCfMain.cpp", fmCfMain);
+USEFORM("uCfNewDg.cpp", frmCfNewDlg);
+USEFORM("uCfGenDg.cpp", frmCfGenDlg);
+USEUNIT("..\..\source\AbHexVw.pas");
+USEUNIT("..\..\source\AbCompnd.pas");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+        try
+        {
+                 Application->Initialize();
+                 Application->CreateForm(__classid(TfmCfMain), &fmCfMain);
+                 Application->CreateForm(__classid(TfrmCfNewDlg), &frmCfNewDlg);
+                 Application->CreateForm(__classid(TfrmCfGenDlg), &frmCfGenDlg);
+                 Application->Run();
+        }
+        catch (Exception &exception)
+        {
+                 Application->ShowException(&exception);
+        }
+        return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExFilter.bpr

@@ -0,0 +1,110 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = ExFilter.exe
+OBJFILES = ExFilter.obj ExFiltr1.obj
+RESFILES = ExFilter.res
+RESDEPEN = $(RESFILES) ExFiltr1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib vcl35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExFilter.cpp

@@ -0,0 +1,46 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("ExFiltr1.cpp", Form1);
+USERES("ExFilter.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+	try
+	{
+		Application->Initialize();
+		Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+	}
+	catch (Exception &exception)
+	{
+		Application->ShowException(&exception);
+	}
+	return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExFiltr1.cpp

@@ -0,0 +1,156 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "ExFiltr1.h"
+//---------------------------------------------------------------------------#pragma link "AbMeter"
+#pragma link "AbZView"
+#pragma link "AbView"
+#pragma link "Grids"
+#pragma link "AbZipKit"
+#pragma link "AbZipper"
+#pragma link "AbZBrows"
+#pragma link "AbArcTyp"
+
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+
+char MainCaption[] = " ExFilter : Exception list example";
+char AddCaption[] = " Add files to zip archive ";
+char DeleteCaption[] = " Delete files from zip archive ";
+char ExtractCaption[] = " Extract files from zip archive ";
+
+bool AbortFlag;
+
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::OpenBtnClick(TObject *Sender)
+{
+  AbZipKit1->FileName = "";
+  AddBtn->Enabled = False;
+  DeleteBtn->Enabled = False;
+  OpenDialog1->FileName = "*.zip";
+  if (OpenDialog1->Execute()) {
+    AbZipKit1->FileName = OpenDialog1->FileName;
+    OpenBtn->Enabled = False;
+    CloseBtn->Enabled = True;
+    AddBtn->Enabled = True;
+    DeleteBtn->Enabled = True;
+    ExtractBtn->Enabled = True;
+    AbZipView1->Enabled = True;
+    Caption = " " + AbZipKit1->FileName;
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::CloseBtnClick(TObject *Sender)
+{
+  Screen->Cursor = crHourGlass;
+  Caption = "Saving " + AbZipKit1->FileName;
+  AbZipKit1->CloseArchive();
+  Screen->Cursor = crDefault;
+  OpenBtn->Enabled = True;
+  CloseBtn->Enabled = False;
+  AddBtn->Enabled = False;
+  DeleteBtn->Enabled = False;
+  ExtractBtn->Enabled = False;
+  AbZipView1->Enabled = False;
+  Caption = MainCaption;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AddBtnClick(TObject *Sender)
+{
+  AbortFlag = False;
+  AbZipKit1->BaseDirectory = DirectoryListBox1->Directory;
+  TColor SavedColor = AddGroup->Font->Color;
+  AddGroup->Font->Color = clRed;
+  AbZipKit1->AddFilesEx(FileMask1->Text, FilterMask1->Text, 0);
+  AbZipKit1->Save();
+  AddGroup->Font->Color = SavedColor;
+  AddGroup->Caption = AddCaption;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::DeleteBtnClick(TObject *Sender)
+{
+  AbortFlag = False;
+  TColor SavedColor = DeleteGroup->Font->Color;
+  DeleteGroup->Font->Color = clRed;
+  AbZipKit1->DeleteFilesEx(FileMask2->Text, FilterMask2->Text);
+  AbZipKit1->Save();
+  DeleteGroup->Font->Color = SavedColor;
+  DeleteGroup->Caption = DeleteCaption;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::ExtractBtnClick(TObject *Sender)
+{
+  AbortFlag = False;
+  AbZipKit1->BaseDirectory = DirectoryListBox2->Directory;
+  TColor SavedColor = ExtractGroup->Font->Color;
+  ExtractGroup->Font->Color = clRed;
+  AbZipKit1->ExtractFilesEx(FileMask3->Text, FilterMask3->Text);
+  ExtractGroup->Font->Color = SavedColor;
+  ExtractGroup->Caption = ExtractCaption;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbortBtnClick(TObject *Sender)
+{
+  AbortFlag = True;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::ExitBtnClick(TObject *Sender)
+{
+  AbZipKit1->CloseArchive();
+  Close();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::FormCreate(TObject *Sender)
+{
+  Caption = MainCaption;
+  AddGroup->Caption = AddCaption;
+  DeleteGroup->Caption = DeleteCaption;
+  ExtractGroup->Caption = ExtractCaption;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbZipKit1ConfirmProcessItem(TObject *Sender,
+	TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm)
+{
+  switch (ProcessType) {
+    case ptAdd  : AddGroup->Caption = " Adding " + Item->FileName + " ";
+      break;
+    case ptDelete : DeleteGroup->Caption = " Deleting " + Item->FileName + " ";
+      break;
+    case ptExtract : ExtractGroup->Caption = " Extracting " + Item->FileName + " ";
+      break;
+  }
+  Confirm = !AbortFlag;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/ExFiltr1.h

@@ -0,0 +1,102 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef ExFiltr1H
+#define ExFiltr1H
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include "AbMeter.hpp"
+#include "AbZView.hpp"
+#include "AbView.hpp"
+#include "Grids.hpp"
+#include <vcl\ExtCtrls.hpp>
+#include <vcl\FileCtrl.hpp>
+#include <vcl\Dialogs.hpp>
+#include "AbZipKit.hpp"
+#include "AbZipper.hpp"
+#include "AbZBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+	TLabel *Label4;
+	TAbMeter *AbMeter1;
+	TButton *OpenBtn;
+	TAbZipView *AbZipView1;
+	TButton *CloseBtn;
+	TGroupBox *AddGroup;
+	TLabel *Label1;
+	TLabel *Label2;
+	TLabel *Label3;
+	TBevel *Bevel1;
+	TEdit *FileMask1;
+	TEdit *FilterMask1;
+	TButton *AddBtn;
+	TDirectoryListBox *DirectoryListBox1;
+	TGroupBox *DeleteGroup;
+	TLabel *Label5;
+	TLabel *Label6;
+	TBevel *Bevel2;
+	TEdit *FileMask2;
+	TEdit *FilterMask2;
+	TButton *DeleteBtn;
+	TButton *AbortBtn;
+	TButton *ExitBtn;
+	TGroupBox *ExtractGroup;
+	TLabel *Label7;
+	TLabel *Label8;
+	TLabel *Label9;
+	TBevel *Bevel3;
+	TEdit *FileMask3;
+	TEdit *FilterMask3;
+	TButton *ExtractBtn;
+	TDirectoryListBox *DirectoryListBox2;
+	TOpenDialog *OpenDialog1;
+	TAbZipKit *AbZipKit1;
+   TAbVCLMeterLink *AbVCLMeterLink1;
+	void __fastcall OpenBtnClick(TObject *Sender);
+	void __fastcall CloseBtnClick(TObject *Sender);
+	void __fastcall AddBtnClick(TObject *Sender);
+	void __fastcall DeleteBtnClick(TObject *Sender);
+	void __fastcall ExtractBtnClick(TObject *Sender);
+	void __fastcall AbortBtnClick(TObject *Sender);
+	void __fastcall ExitBtnClick(TObject *Sender);
+	void __fastcall FormCreate(TObject *Sender);
+	void __fastcall AbZipKit1ConfirmProcessItem(TObject *Sender,
+	TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm);
+private:	// User declarations
+public:		// User declarations
+	__fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/Finder.bpr

@@ -0,0 +1,116 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = Finder.exe
+OBJFILES = Finder.obj UFinder.obj
+RESFILES = Finder.res
+RESDEPEN = $(RESFILES) UFinder.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib vcl35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=3
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+Item2=..\..\;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=3
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item2=..\..;$(BCB)\lib\release;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=_RTLDLL;USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Finder.cpp

@@ -0,0 +1,49 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      Finder.cpp                       */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("UFinder.cpp", Form1);
+USERES("Finder.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->CreateForm(__classid(TForm1), &Form1);
+     Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/MakeCab.bpr

@@ -0,0 +1,113 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = MakeCab.exe
+OBJFILES = MakeCab.obj MakeCab1.obj
+RESFILES = MakeCab.res
+RESDEPEN = $(RESFILES) MakeCab1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib vcl35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi vcldb35.bpi vcldbx35.bpi bcbsmp35.bpi dclocx35.bpi \
+  Qrpt35.bpi teeui35.bpi teedb35.bpi tee35.bpi ibsmp35.bpi dss35.bpi NMFast35.bpi \
+  inetdb35.bpi inet35.bpi VclMid35.bpi S402_r35.bpi S402br35.bpi o405_r35.bpi \
+  o405br35.bpi B304_r35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/MakeCab.cpp

@@ -0,0 +1,46 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("MakeCab1.cpp", Form1);
+USERES("MakeCab.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+	try
+	{
+		Application->Initialize();
+		Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+	}
+	catch (Exception &exception)
+	{
+		Application->ShowException(&exception);
+	}
+	return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/MakeCab1.cpp

@@ -0,0 +1,106 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "MakeCab1.h"
+//---------------------------------------------------------------------------
+#pragma link "AbMeter"
+#pragma link "AbCabMak"
+#pragma link "AbCBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+char MainCaption[] = "Make Cabinet archive";
+
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::CreateBtnClick(TObject *Sender)
+{
+  OpenDialog1->FileName = "*.cab";
+  OpenDialog1->Title = "Name of 1st cabinet";
+  if (OpenDialog1->Execute()) {
+    Panel1->Caption = "Creating " + OpenDialog1->FileName;
+    AbMakeCab1->OpenArchive(OpenDialog1->FileName);
+    Caption = AbMakeCab1->FileName;
+    Panel1->Caption = "Idle";
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AddBtnClick(TObject *Sender)
+{
+  OpenDialog1->FileName = "*.*";
+  OpenDialog1->Title = "Add files to cabinet";
+  if (OpenDialog1->Execute()) {
+    if (OpenDialog1->Files->Count > 0) {
+      TCursor SC = Cursor;
+      Cursor = crHourGlass;
+      for (int i=0; i<OpenDialog1->Files->Count; i++)
+        AbMakeCab1->AddFiles(OpenDialog1->Files->Strings[i], 0);
+      Cursor = SC;
+      Panel1->Caption = "Idle";
+    }
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::CloseBtnClick(TObject *Sender)
+{
+  Panel1->Caption = "Closing " + AbMakeCab1->FileName;
+  AbMakeCab1->CloseArchive();
+  Caption = MainCaption;
+  Panel1->Caption = "Idle";
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::NewFolderBtnClick(TObject *Sender)
+{
+  AbMakeCab1->StartNewFolder();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::NewCabBtnClick(TObject *Sender)
+{
+  AbMakeCab1->StartNewCabinet();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbMakeCab1ArchiveItemProgress(TObject *Sender,
+      TAbArchiveItem *Item, BYTE Progress, bool &Abort)
+{
+  Panel1->Caption = "Adding " + ExtractFileName(Item->FileName);
+  Abort = False;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbMakeCab1ConfirmProcessItem(TObject *Sender,
+      TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm)
+{
+  String s = ExtractFileExt(Item->FileName);
+  Confirm = True;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/MakeCab1.h

@@ -0,0 +1,73 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef MakeCab1H
+#define MakeCab1H
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include "AbMeter.hpp"
+#include <vcl\ExtCtrls.hpp>
+#include <vcl\Dialogs.hpp>
+#include "AbCabMak.hpp"
+#include "AbCBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+	TLabel *Label1;
+	TLabel *Label2;
+	TAbMeter *AbMeter1;
+	TButton *AddBtn;
+	TButton *CreateBtn;
+	TButton *CloseBtn;
+	TPanel *Panel1;
+	TButton *NewFolderBtn;
+	TButton *NewCabBtn;
+	TOpenDialog *OpenDialog1;
+	TAbMakeCab *AbMakeCab1;
+   TAbVCLMeterLink *AbVCLMeterLink1;
+	void __fastcall CreateBtnClick(TObject *Sender);
+	void __fastcall AddBtnClick(TObject *Sender);
+	void __fastcall CloseBtnClick(TObject *Sender);
+	void __fastcall NewFolderBtnClick(TObject *Sender);
+	void __fastcall NewCabBtnClick(TObject *Sender);
+	void __fastcall AbMakeCab1ArchiveItemProgress(TObject *Sender,
+          TAbArchiveItem *Item, BYTE Progress, bool &Abort);
+        void __fastcall AbMakeCab1ConfirmProcessItem(TObject *Sender,
+          TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm);
+private:	// User declarations
+public:		// User declarations
+	__fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/MakeSfx.bpr

@@ -0,0 +1,185 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = MakeSfx.exe
+OBJFILES = MakeSfx.obj UMakeSfx.obj
+RESFILES = MakeSfx.res
+DEFFILE =
+RESDEPEN = $(RESFILES) UMakeSfx.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib VCLX35.lib VCL35.lib
+SPARELIBS = VCL35.lib VCLX35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHASM = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..\packages;..\..\source;$(BCB)\include;$(BCB)\include\vcl \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..\packages;..\..\source;$(BCB)\include;$(BCB)\include\vcl -$Y -$W -$O- -v \
+  -JPHNV -M
+RFLAGS = -i..\..\packages;..\..\source;$(BCB)\include;$(BCB)\include\vcl
+AFLAGS = /i..\..\packages /i..\..\source /i$(BCB)\include /i$(BCB)\include\vcl /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..\packages;..\..\source;$(BCB)\include;$(BCB)\include\vcl
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=_RTLDLL
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=$(BCB)\source\vcl
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
+# ---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/MakeSfx.cpp

@@ -0,0 +1,45 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+USERES("MakeSfx.res");
+USEFORM("UMakeSfx.cpp", Form1);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+        try
+        {
+                 Application->Initialize();
+                 Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+        }
+        catch (Exception &exception)
+        {
+                 Application->ShowException(&exception);
+        }
+        return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SelfEx.cpp

@@ -0,0 +1,88 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      selfex.cpp                       */
+/*********************************************************/
+
+/* This program creates a ZIP stub called SELFEX.EXE. This
+stub can then be used to create self-extracting ZIP files.
+For more information on self-extracting ZIPs and ZIP stubs see
+page 112 in the Abbrevia manual. */
+
+
+#include <condefs.h>
+#include <stdio.h>
+#include "AbArcTyp.hpp"
+#include "AbUnzPrc.hpp"
+#include "AbUtils.hpp"
+#include "AbZipTyp.hpp"
+
+#pragma hdrstop
+
+class THelper : public TObject {
+  public:
+    __fastcall THelper() {}
+    void __fastcall UnzipProc(TObject* Sender,
+      TAbArchiveItem* Item, AnsiString NewName);
+};
+
+void __fastcall THelper::UnzipProc(TObject* Sender, TAbArchiveItem* Item, AnsiString NewName)
+{
+  AbUnzip( Sender, dynamic_cast<TAbZipItem *>(Item), NewName );
+}
+
+//---------------------------------------------------------------------------
+USERES("selfex.res");
+//---------------------------------------------------------------------------
+#pragma link "AbArcTyp"
+#pragma link "abutils"
+#pragma link "AbUnzPrc"
+#pragma link "AbZipTyp"
+//---------------------------------------------------------------------------
+
+#pragma argsused
+int main(int argc, char **argv)
+{
+  TAbZipArchive* ZipArchive;
+  THelper* Helper = new THelper;
+  printf("Abbrevia Self Extracting Archive");
+  ZipArchive = new TAbZipArchive(
+    ParamStr( 0 ), fmOpenRead | fmShareDenyNone);
+  SetCurrentDirectory(ExtractFilePath(ParamStr(0)).c_str());
+  try {
+    ZipArchive->Load();
+    ZipArchive->ExtractHelper = Helper->UnzipProc;
+    ZipArchive->ExtractFiles("*.*");
+  }
+  catch (...) {
+    delete Helper;
+    delete ZipArchive;
+    return 0;
+  }
+  delete Helper;
+  delete ZipArchive;
+  return 0;
+}
+ 

Abbrevia/examples/CBuilder/SelfExV.bpr

@@ -0,0 +1,117 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = SelfExV.exe
+OBJFILES = SelfExV.obj USelfExV.obj
+RESFILES = SelfExV.res
+RESDEPEN = $(RESFILES) USelfExV.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib vcl35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -DUSEPACKAGES \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -DUSEPACKAGES \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -DUSEPACKAGES \
+  -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /dUSEPACKAGES /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SelfExV.cpp

@@ -0,0 +1,49 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      SelfExV.cpp                      */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("USelfExV.cpp", Form1);
+USERES("SelfExV.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->CreateForm(__classid(TForm1), &Form1);
+     Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SelfStbV.bpr

@@ -0,0 +1,117 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = SelfStbV.exe
+OBJFILES = SelfStbV.obj SlfStbv1.obj
+RESFILES = SelfStbV.res
+RESDEPEN = $(RESFILES) SlfStbv1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vclx35.lib
+SPARELIBS = vcl35.lib vclx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -DUSEPACKAGES \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -DUSEPACKAGES \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -DUSEPACKAGES \
+  -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /dUSEPACKAGES /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(PACKAGES) sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SelfStbV.cpp

@@ -0,0 +1,49 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      SelfExV.cpp                      */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("SlfStbv1.cpp", Form1);
+USERES("SelfStbV.res");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SelfStbv.h

@@ -0,0 +1,58 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      USelfExV.h                       */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef SelfStbvH
+#define SelfStbvH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include "AbUnZper.hpp"
+#include "AbZBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+  TAbUnZipper *AbUnZipper1;
+    TMemo *Memo1;
+    TButton *Button1;
+  void __fastcall Button1Click(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/SelfStub.bpr

@@ -0,0 +1,176 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = SelfStub.exe
+OBJFILES = SelfStub.obj
+RESFILES = SelfStub.res
+RESDEPEN = $(RESFILES)
+LIBFILES =
+LIBRARIES = vcldb35.lib vcl35.lib
+SPARELIBS = vcl35.lib vcldb35.lib
+PACKAGES = vclx35.bpi VCL35.bpi vcldb35.bpi vcldbx35.bpi bcbsmp35.bpi dclocx35.bpi \
+  Qrpt35.bpi teeui35.bpi teedb35.bpi tee35.bpi ibsmp35.bpi dss35.bpi NMFast35.bpi \
+  inetdb35.bpi inet35.bpi VclMid35.bpi S402_r35.bpi S402br35.bpi o405_r35.bpi \
+  o405br35.bpi B304_r35.bpi
+DEFFILE =
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHASM = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx -tWC
+CFLAG2 = -I$(BCB)\include;$(BCB)\include\vcl;..\..\source;..\..\packages \
+  -H=$(BCB)\lib\vcl35.csm
+CFLAG3 = -Tkh30000
+PFLAGS = -U$(BCB)\lib\obj;$(BCB)\lib;..\..\source;..\..\packages;$(DEBUGLIBPATH) \
+  -I$(BCB)\include;$(BCB)\include\vcl;..\..\source;..\..\packages -$Y -$W -$O- -v \
+  -JPHN -M
+RFLAGS = -i$(BCB)\include;$(BCB)\include\vcl;..\..\source;..\..\packages
+AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\source /i..\..\packages /mx /w2 /zd
+LFLAGS = -L$(BCB)\lib\obj;$(BCB)\lib;..\..\source;..\..\packages;$(DEBUGLIBPATH) -ap \
+  -Tpe -x -Gn -v
+IFLAGS =
+# ---------------------------------------------------------------------------
+ALLOBJ = c0x32.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=Executable (Console)
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=1
+Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\source;..\..\packages
+
+[HistoryLists\hlLibraryPath]
+Count=1
+Item0=$(BCB)\lib\obj;$(BCB)\lib;..\..\source;..\..\packages
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[Debugging]
+DebugSourceDirs=$(BCB)\source\vcl
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
+# ---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SelfStub.cpp

@@ -0,0 +1,85 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      selfstub.cpp                     */
+/*********************************************************/
+
+/* This program creates a ZIP stub called SELFEX.EXE. This
+stub can then be used to create self-extracting ZIP files.
+For more information on self-extracting ZIPs and ZIP stubs see
+page 112 in the Abbrevia manual. */
+
+#include <condefs.h>
+#include <stdio.h>
+#include "AbArcTyp.hpp"
+#include "AbUnzPrc.hpp"
+#include "AbUtils.hpp"
+#include "AbZipTyp.hpp"
+
+#pragma hdrstop
+
+class THelper : public TObject {
+  public:
+    __fastcall THelper() {}
+    void __fastcall UnzipProc(TObject* Sender,
+      TAbArchiveItem* Item, AnsiString NewName);
+};
+
+void __fastcall THelper::UnzipProc(TObject* Sender, TAbArchiveItem* Item, AnsiString NewName)
+{
+  AbUnzip(Sender, (TAbZipItem*)Item, NewName);
+}
+//---------------------------------------------------------------------------
+USERES("SelfStub.res");
+//---------------------------------------------------------------------------
+#pragma link "AbArcTyp"
+#pragma link "abutils"
+#pragma link "AbUnzPrc"
+#pragma link "AbZipTyp"
+
+//---------------------------------------------------------------------------
+#pragma argsused
+int main(int argc, char **argv)
+{
+  TAbZipArchive* ZipArchive;
+  THelper* Helper = new THelper;
+  printf("Abbrevia Self Extracting Archive");
+  ZipArchive = new TAbZipArchive(
+    ParamStr( 0 ), fmOpenRead | fmShareDenyNone);
+  SetCurrentDirectory(ExtractFilePath(ParamStr(0)).c_str());
+  try {
+    ZipArchive->Load();
+    ZipArchive->ExtractHelper = Helper->UnzipProc;
+    ZipArchive->ExtractFiles("*.*");
+  }
+  catch (...) {
+    delete Helper;
+    delete ZipArchive;
+    return 0;
+  }
+  delete Helper;
+  delete ZipArchive;
+  return 0;
+}

Abbrevia/examples/CBuilder/SlfStbv1.cpp

@@ -0,0 +1,54 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      SelfStbV1.cpp                    */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "SlfStbv1.h"
+//---------------------------------------------------------------------------
+#pragma link "AbUnZper"
+#pragma link "AbZBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma link "AbUnzper"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  AbUnZipper1->FileName = ParamStr( 0 );
+  SetCurrentDirectory( ExtractFilePath( ParamStr( 0 ) ).c_str() );
+  AbUnZipper1->ExtractFiles( "*.*" );
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/SlfStbv1.h

@@ -0,0 +1,59 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      USelfExV.h                       */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef SlfStbv1H
+#define SlfStbv1H
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include "AbUnZper.hpp"
+#include "AbZBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+#include "AbUnzper.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+  TAbUnZipper *AbUnZipper1;
+    TMemo *Memo1;
+    TButton *Button1;
+  void __fastcall Button1Click(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/Streams.bpr

@@ -0,0 +1,186 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = Streams.exe
+OBJFILES = Streams.obj Streams1.obj
+RESFILES = Streams.res
+DEFFILE =
+RESDEPEN = $(RESFILES) Streams1.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib VCLX35.lib VCL35.lib
+SPARELIBS = VCL35.lib VCLX35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHASM = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=_RTLDLL
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=$(BCB)\source\vcl
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
+# ---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Streams.cpp

@@ -0,0 +1,45 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+USERES("Streams.res");
+USEFORM("Streams1.cpp", Form1);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+        try
+        {
+                 Application->Initialize();
+                 Application->CreateForm(__classid(TForm1), &Form1);
+                 Application->Run();
+        }
+        catch (Exception &exception)
+        {
+                 Application->ShowException(&exception);
+        }
+        return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Streams1.cpp

@@ -0,0 +1,105 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+
+#include "Streams1.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma link "AbArcTyp"
+#pragma link "AbView"
+#pragma link "AbZBrows"
+#pragma link "AbZipKit"
+#pragma link "AbZipper"
+#pragma link "AbZView"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+
+char MainCaption[] = " Extract to (or Add from) stream";
+
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+        : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Open1Click(TObject *Sender)
+{
+  OpenDialog1->FileName = "*.zip";
+  if (OpenDialog1->Execute())
+    AbZipKit1->FileName = OpenDialog1->FileName;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Extract1Click(TObject *Sender)
+{
+  TMemoryStream* ToStream;
+  Memo1->Clear();
+  ToStream = new TMemoryStream;
+  TAbArchiveItem* Item = AbZipView1->Items[AbZipView1->ActiveRow];
+  Caption = Item->FileName;
+  AbZipKit1->ExtractToStream(Item->FileName, ToStream);
+  ToStream->Position = 0;
+  Memo1->Lines->LoadFromStream(ToStream);
+  delete(ToStream);
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Close1Click(TObject *Sender)
+{
+  AbZipKit1->FileName = "";
+  Caption = MainCaption;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Exit1Click(TObject *Sender)
+{
+  Close1Click(0);
+  Close();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbZipView1DblClick(TObject *Sender)
+{
+  Extract1Click(0);
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Clearmemo1Click(TObject *Sender)
+{
+  Memo1->Clear();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Add1Click(TObject *Sender)
+{
+  TMemoryStream* FromStream;
+  AnsiString FN;
+  FromStream = new TMemoryStream;
+  Memo1->Lines->SaveToStream(FromStream);
+  if (InputQuery("Streams", "Give it a filename", FN)) {
+    Caption = FN;
+    AbZipKit1->AddFromStream(FN, FromStream);
+  }
+  delete(FromStream);
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/Streams1.h

@@ -0,0 +1,76 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef Streams1H
+#define Streams1H
+//---------------------------------------------------------------------------
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include "AbArcTyp.hpp"
+#include "AbView.hpp"
+#include "AbZBrows.hpp"
+#include "AbZipKit.hpp"
+#include "AbZipper.hpp"
+#include "AbZView.hpp"
+#include <Dialogs.hpp>
+#include <Grids.hpp>
+#include <Menus.hpp>
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+        TAbZipView *AbZipView1;
+        TMemo *Memo1;
+        TMainMenu *MainMenu1;
+        TMenuItem *File1;
+        TMenuItem *Open1;
+        TMenuItem *Close1;
+        TMenuItem *N1;
+        TMenuItem *Exit1;
+        TMenuItem *Action1;
+        TMenuItem *Extract1;
+        TMenuItem *Add1;
+        TMenuItem *Clearmemo1;
+        TOpenDialog *OpenDialog1;
+        TAbZipKit *AbZipKit1;
+        void __fastcall Open1Click(TObject *Sender);
+        void __fastcall Extract1Click(TObject *Sender);
+        void __fastcall Close1Click(TObject *Sender);
+        void __fastcall Exit1Click(TObject *Sender);
+        void __fastcall AbZipView1DblClick(TObject *Sender);
+        void __fastcall Clearmemo1Click(TObject *Sender);
+        void __fastcall Add1Click(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+        __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/StrmBmp.bpr

@@ -0,0 +1,190 @@
+# ---------------------------------------------------------------------------
+!if !$d(BCB)
+BCB = $(MAKEDIR)\..
+!endif
+
+# ---------------------------------------------------------------------------
+# IDE SECTION
+# ---------------------------------------------------------------------------
+# The following section of the project makefile is managed by the BCB IDE.
+# It is recommended to use the IDE to change any of the values in this
+# section.
+# ---------------------------------------------------------------------------
+
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+PROJECT = StrmBmp.exe
+OBJFILES = StrmBmp.obj StrmBmpU.obj
+RESFILES = StrmBmp.res
+DEFFILE =
+RESDEPEN = $(RESFILES) StrmBmpU.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib VCLX35.lib VCL35.lib
+SPARELIBS = VCL35.lib VCLX35.lib B304_r35.lib
+PACKAGES = vclx35.bpi VCL35.bpi
+# ---------------------------------------------------------------------------
+PATHCPP = .;
+PATHASM = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
+[HistoryLists\hlIncludePath]
+Count=4
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+Item2=..\..\;$(BCB)\include;$(BCB)\include\vcl
+Item3=d:\abbrevia;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=4
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item2=..\..\;$(BCB)\lib\obj;$(BCB)\lib
+Item3=d:\abbrevia;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlDebugSourcePath]
+Count=1
+Item0=$(BCB)\source\vcl
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=_RTLDLL;USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+# ---------------------------------------------------------------------------
+# MAKE SECTION
+# ---------------------------------------------------------------------------
+# This section of the project file is not used by the BCB IDE.  It is for
+# the benefit of building from the command-line using the MAKE utility.
+# ---------------------------------------------------------------------------
+
+.autodepend
+# ---------------------------------------------------------------------------
+!if !$d(BCC32)
+BCC32 = bcc32
+!endif
+
+!if !$d(DCC32)
+DCC32 = dcc32
+!endif
+
+!if !$d(TASM32)
+TASM32 = tasm32
+!endif
+
+!if !$d(LINKER)
+LINKER = ilink32
+!endif
+
+!if !$d(BRCC32)
+BRCC32 = brcc32
+!endif
+# ---------------------------------------------------------------------------
+!if $d(PATHCPP)
+.PATH.CPP = $(PATHCPP)
+.PATH.C   = $(PATHCPP)
+!endif
+
+!if $d(PATHPAS)
+.PATH.PAS = $(PATHPAS)
+!endif
+
+!if $d(PATHASM)
+.PATH.ASM = $(PATHASM)
+!endif
+
+!if $d(PATHRC)
+.PATH.RC  = $(PATHRC)
+!endif
+# ---------------------------------------------------------------------------
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+# ---------------------------------------------------------------------------
+.pas.hpp:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.pas.obj:
+    $(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
+
+.cpp.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.c.obj:
+    $(BCB)\BIN\$(BCC32) $(CFLAG1) $(CFLAG2) $(CFLAG3) -n$(@D) {$< }
+
+.asm.obj:
+    $(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
+
+.rc.res:
+    $(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
+# ---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/StrmBmp.cpp

@@ -0,0 +1,45 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+USERES("StrmBmp.res");
+USEFORM("StrmBmpU.cpp", Form1);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+    Application->Initialize();
+    Application->CreateForm(__classid(TForm1), &Form1);
+    Application->Run();
+  }
+  catch (Exception &exception)
+  {
+    Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/StrmBmpU.cpp

@@ -0,0 +1,92 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+
+#include "StrmBmpU.h"
+
+#include "AbUnzPrc.hpp"
+#include "AbZipPrc.hpp"
+
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  // Create the compressed stream and the uncompressed stream.
+  TMemoryStream* UStrm = new TMemoryStream;
+  TMemoryStream* CStrm = new TMemoryStream;
+
+  // Copy the bitmap image to the memory stream.
+  Image1->Picture->Bitmap->SaveToStream(UStrm);
+
+  // Set the stream position to the beginning.
+  UStrm->Position = 0;
+
+  // Compress the stream.
+  DeflateStream(UStrm, CStrm);
+
+  // Remove all data from the uncompressed stream.
+  UStrm->Clear();
+
+  // Reset the compressed stream back to the beginning.
+  CStrm->Position = 0;
+
+  // Decompress the stream back to the original uncompressed
+  // stream and then reset the stream position back to 0.
+  InflateStream(CStrm, UStrm);
+  UStrm->Position = 0;
+
+  // Now create a new TImage. Make it the same size as the
+  // original image but move it down and to the left.
+  TImage* Image2 = new TImage(this);
+  Image2->Top = Image1->Top + 20;
+  Image2->Left = Image1->Left + 20;
+  Image2->Width = Image1->Width;
+  Image2->Height = Image1->Height;
+  Image2->Parent = this;
+
+  // Delete the original TImage.
+  delete Image1;
+
+  // Load the new bitmap with the data from the stream
+  // that contains the decompressed image.
+  Image2->Picture->Bitmap->LoadFromStream(UStrm);
+
+  // Free the memory streams.
+  delete UStrm;
+  delete CStrm;
+}
+//---------------------------------------------------------------------------
+

Abbrevia/examples/CBuilder/StrmBmpU.h

@@ -0,0 +1,50 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef StrmBmpUH
+#define StrmBmpUH
+//---------------------------------------------------------------------------
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include <ExtCtrls.hpp>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+  TButton *Button1;
+  TImage *Image1;
+  TMemo *Memo1;
+  void __fastcall Button1Click(TObject *Sender);
+  
+private:	// User declarations
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/StrmPad.bpr

@@ -0,0 +1,120 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = StrmPad.exe
+OBJFILES = StrmPad.obj UStrPad.obj
+RESFILES = StrmPad.res
+RESDEPEN = $(RESFILES) UStrPad.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vcldbx35.lib vcldb35.lib vclx35.lib
+SPARELIBS = vcl35.lib vclx35.lib vcldb35.lib vcldbx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -DUSEPACKAGES \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -DUSEPACKAGES \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -DUSEPACKAGES \
+  -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /dUSEPACKAGES /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(PACKAGES) sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=3
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+Item2=..\..\;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=3
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+Item2=..\..\;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlConditionals]
+Count=2
+Item0=USEPACKAGES
+Item1=_RTLDLL;USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/StrmPad.cpp

@@ -0,0 +1,51 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      StrmPad.cpp                      */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+//---------------------------------------------------------------------------
+USEFORM("UStrPad.cpp", Form1);
+USERES("StrmPad.res");
+USEOBJ("\Abbrevia\AbZipPrc.OBJ");
+USEOBJ("\Abbrevia\AbUnzPrc.OBJ");
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->CreateForm(__classid(TForm1), &Form1);
+     Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/TPZip.INI

@@ -0,0 +1,27 @@
+[General]
+Exists=1
+[View]
+CSize=1
+CMethod=1
+CRatio=0
+CRC=0
+EFA=0
+IFA=1
+Encryption=0
+TimeStamp=0
+USize=0
+MadeBy=0
+Needed=0
+Comment=0
+Hierarchy=1
+OutlineStyle=5
+[Preferences]
+BaseDirectory=C:\Abbrevia\EXAMPLES\CBuilder
+Confirmations=0
+CompressionMethodToUse=2
+DeflationOption=1
+CreateDirs=1
+RestorePath=0
+StripPath=0
+RemoveDots=1
+Recurse=0

Abbrevia/examples/CBuilder/TPZip.bpr

@@ -0,0 +1,117 @@
+# ---------------------------------------------------------------------------
+VERSION = BCB.03
+# ---------------------------------------------------------------------------
+!ifndef BCB
+BCB = $(MAKEDIR)\..
+!endif
+# ---------------------------------------------------------------------------
+PROJECT = TPZip.exe
+OBJFILES = TPZip.obj UMain.obj DgAbout.obj UBaseDlg.obj UDemoDlg.obj usplash.obj
+RESFILES = TPZip.res
+RESDEPEN = $(RESFILES) UMain.dfm DgAbout.dfm UBaseDlg.dfm UDemoDlg.dfm usplash.dfm
+LIBFILES =
+LIBRARIES = B304_r35.lib vcldbx35.lib vcldb35.lib vclx35.lib
+SPARELIBS = vcl35.lib vclx35.lib vcldb35.lib vcldbx35.lib B304_r35.lib
+PACKAGES = VCL35.bpi
+PATHASM = .;
+PATHCPP = .;
+PATHPAS = .;
+PATHRC = .;
+DEBUGLIBPATH = $(BCB)\lib\debug
+RELEASELIBPATH = $(BCB)\lib\release
+DEFFILE =
+# ---------------------------------------------------------------------------
+CFLAG1 = -Od -Hc -w -Ve -r- -k -y -v -vi- -c -b- -w-par -w-inl -Vx
+CFLAG2 = -DUSEPACKAGES \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source \
+  -H=$(BCB)\lib\vcld.csm
+CFLAG3 =
+PFLAGS = -AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE \
+  -DUSEPACKAGES \
+  -U..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -I..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source -$Y -$W \
+  -$O- -v -JPHNV -M
+RFLAGS = -DUSEPACKAGES \
+  -i..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+AFLAGS = /i..\.. /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\packages /i..\..\source \
+  /dUSEPACKAGES /mx /w2 /zd
+LFLAGS = -L..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source;$(DEBUGLIBPATH) \
+  -aa -Tpe -x -v
+IFLAGS =
+LINKER = ilink32
+# ---------------------------------------------------------------------------
+ALLOBJ = c0w32.obj $(PACKAGES) sysinit.obj $(OBJFILES)
+ALLRES = $(RESFILES)
+ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib
+# ---------------------------------------------------------------------------
+.autodepend
+
+!ifdef IDEOPTIONS
+
+[Version Info]
+IncludeVerInfo=0
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+
+[HistoryLists\hlIncludePath]
+Count=2
+Item0=..\..;$(BCB)\include;$(BCB)\include\vcl;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\include;$(BCB)\include\vcl
+
+[HistoryLists\hlLibraryPath]
+Count=2
+Item0=..\..;$(BCB)\lib\obj;$(BCB)\lib;..\..\packages;..\..\source
+Item1=..\..;$(BCB)\lib\obj;$(BCB)\lib
+
+[HistoryLists\hlConditionals]
+Count=1
+Item0=USEPACKAGES
+
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE
+
+[Debugging]
+DebugSourceDirs=
+
+[Parameters]
+RunParams=
+HostApplication=
+
+!endif
+
+$(PROJECT): $(OBJFILES) $(RESDEPEN) $(DEFFILE)
+    $(BCB)\BIN\$(LINKER) @&&!
+    $(LFLAGS) +
+    $(ALLOBJ), +
+    $(PROJECT),, +
+    $(ALLLIB), +
+    $(DEFFILE), +
+    $(ALLRES)
+!
+
+.pas.hpp:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.pas.obj:
+    $(BCB)\BIN\dcc32 $(PFLAGS) { $** }
+
+.cpp.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $*
+
+.c.obj:
+    $(BCB)\BIN\bcc32 $(CFLAG1) $(CFLAG2) -o$* $**
+
+.rc.res:
+    $(BCB)\BIN\brcc32 $(RFLAGS) $<
+#-----------------------------------------------------------------------------

Abbrevia/examples/CBuilder/TPZip.cpp

@@ -0,0 +1,60 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      TPZip.cpp                        */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "usplash.h"
+
+//---------------------------------------------------------------------------
+USEFORM("UMain.cpp", Form1);
+USERES("TPZip.res");
+USEFORM("DgAbout.cpp", dlgAboutBox);
+USEFORM("UBaseDlg.cpp", BaseDirDlg);
+USEFORM("UDemoDlg.cpp", DemoDlg);
+USEFORM("usplash.cpp", Splash);
+//---------------------------------------------------------------------------
+WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
+{
+  try
+  {
+     Application->Initialize();
+     Application->HelpFile = "Tpzip31.hlp";
+     Splash = new TSplash(Application);
+     Splash->Show();
+     Splash->Refresh();
+     Application->CreateForm(__classid(TForm1), &Form1);
+        Application->Run();
+  }
+  catch (Exception &exception)
+  {
+     Application->ShowException(&exception);
+  }
+  return 0;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/UBaseDlg.cpp

@@ -0,0 +1,60 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UBaseDlg.cpp                     */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "UBaseDlg.h"
+#include "UDemoDlg.h"
+//---------------------------------------------------------------------------
+#pragma resource "*.dfm"
+TBaseDirDlg *BaseDirDlg;
+//---------------------------------------------------------------------------
+__fastcall TBaseDirDlg::TBaseDirDlg(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TBaseDirDlg::Button3Click(TObject *Sender)
+{
+  TDemoDlg* dlg = new TDemoDlg(this);
+  try {
+    dlg->Caption = "Create Subdirectory";
+    dlg->Edit1->Text = "";
+    dlg->ShowModal();
+    if (dlg->ModalResult == mrOk && dlg->Edit1->Text != "" )
+      AbCreateDirectory(DLB->Directory + "\\" + dlg->Edit1->Text);
+    DLB->Update();
+  }
+  catch (...) {
+    delete dlg;
+    return;
+  }
+  delete dlg;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/UBaseDlg.h

@@ -0,0 +1,62 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UBaseDlg.h                       */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef UBaseDlgH
+#define UBaseDlgH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\FileCtrl.hpp>
+#include <AbUtils.hpp>
+//---------------------------------------------------------------------------
+class TBaseDirDlg : public TForm
+{
+__published:	// IDE-managed Components
+  TLabel *DirLabel;
+  TLabel *ActionLabel;
+  TButton *Button1;
+  TButton *Button2;
+  TEdit *Edit1;
+  TDriveComboBox *DriveComboBox1;
+  TDirectoryListBox *DLB;
+  TCheckBox *CheckBox2;
+  TCheckBox *CheckBox1;
+  TButton *Button3;
+  void __fastcall Button3Click(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+  __fastcall TBaseDirDlg(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TBaseDirDlg *BaseDirDlg;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UCompPad.cpp

@@ -0,0 +1,72 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UCompPad.cpp                     */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "UCompPad.h"
+//---------------------------------------------------------------------------
+#pragma link "AbZipKit"
+#pragma link "AbZipper"
+#pragma link "AbZBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::FormCreate(TObject *Sender)
+{
+  ZnfName = ChangeFileExt(Application->ExeName, ".zip");
+  TxtName = ExtractFileName( ChangeFileExt(Application->ExeName, ".txt") );
+  AbZipKit1->BaseDirectory = ExtractFilePath( Application->ExeName );
+  SetCurrentDirectory( AbZipKit1->BaseDirectory.c_str() );
+  AbZipKit1->FileName = ZnfName;
+  if (AbZipKit1->Count > 0) {
+    AbZipKit1->ExtractFiles( TxtName );
+    Memo1->Lines->LoadFromFile( TxtName );
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::FormDestroy(TObject *Sender)
+{
+  Memo1->Lines->SaveToFile( TxtName );
+  if (AbZipKit1->Count == 0)
+    AbZipKit1->AddFiles( TxtName, 0 );
+  else
+    AbZipKit1->FreshenFiles( TxtName );
+  AbZipKit1->Save();
+  DeleteFile( TxtName.c_str() );
+}
+//---------------------------------------------------------------------------
+ 

Abbrevia/examples/CBuilder/UCompPad.h

@@ -0,0 +1,68 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UCompPad.h                       */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef UCompPadH
+#define UCompPadH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include "AbZipKit.hpp"
+#include "AbZipper.hpp"
+#include "AbZBrows.hpp"
+#include "AbArcTyp.hpp"
+#include <ExtCtrls.hpp>
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+static String ZnfName;
+static String TxtName;
+
+
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+  TMemo *Memo1;
+  TAbZipKit *AbZipKit1;
+    TPanel *Panel1;
+    TMemo *Memo2;
+  void __fastcall FormCreate(TObject *Sender);
+  void __fastcall FormDestroy(TObject *Sender);
+private:	// User declarations
+//  String ZnfName;
+//  String TxtName;
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UContent.cpp

@@ -0,0 +1,63 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+
+#include "UContent.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma link "AbZBrows"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+        : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  ListBox1->Clear();
+  if (OpenDialog1->Execute())
+  {
+    try
+    {
+      AbZipBrowser1->FileName = OpenDialog1->FileName;
+      if (AbZipBrowser1->Count > 0)
+        for (int i= 0; i<AbZipBrowser1->Count; i++)
+            ListBox1->Items->Add(AbZipBrowser1->Items[i]->FileName);
+    }
+    catch (...)
+    {
+      ListBox1->Items->Add(OpenDialog1->FileName + " is not a valid archive.");
+    }
+  }
+}
+//---------------------------------------------------------------------------
+ 

Abbrevia/examples/CBuilder/UContent.h

@@ -0,0 +1,54 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef UContentH
+#define UContentH
+//---------------------------------------------------------------------------
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+#include "AbZBrows.hpp"
+#include <Dialogs.hpp>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+        TLabel *Label1;
+        TListBox *ListBox1;
+        TButton *Button1;
+        TOpenDialog *OpenDialog1;
+        TAbZipBrowser *AbZipBrowser1;
+        void __fastcall Button1Click(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+        __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UDemoDlg.cpp

@@ -0,0 +1,41 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UDemoDlg.cpp                     */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "UDemoDlg.h"
+//---------------------------------------------------------------------------
+#pragma resource "*.dfm"
+TDemoDlg *DemoDlg;
+//---------------------------------------------------------------------------
+__fastcall TDemoDlg::TDemoDlg(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/UDemoDlg.h

@@ -0,0 +1,52 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UDemoDlg.h                       */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef UDemoDlgH
+#define UDemoDlgH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+//---------------------------------------------------------------------------
+class TDemoDlg : public TForm
+{
+__published:	// IDE-managed Components
+  TButton *Button1;
+  TButton *Button2;
+  TEdit *Edit1;
+private:	// User declarations
+public:		// User declarations
+  __fastcall TDemoDlg(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TDemoDlg *DemoDlg;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UExample.cpp

@@ -0,0 +1,146 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UExample.cpp                     */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "UExample.h"
+#include "UDemoDlg.h"
+//---------------------------------------------------------------------------
+#pragma link "AbZipOut"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbMeter"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Open1Click(TObject *Sender)
+{
+  if (OpenDialog1->Execute()) {
+    AbZipOutline1->FileName = OpenDialog1->FileName;
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Exit1Click(TObject *Sender)
+{
+  Close();
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbZipOutline1Load(TObject *Sender)
+{
+  TopStatus->Caption = "  " + AbZipOutline1->FileName;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbZipOutline1MouseDown(TObject *Sender,
+  TMouseButton Button, TShiftState Shift, int X, int Y)
+{
+  if (Button == mbRight) {
+    // prepare popup menu
+    if (AbZipOutline1->Count > 0) {
+      // there are items in the outline - select the item under the mouse
+//      int i = AbZipOutline1->GetOutlineItem( X, Y );
+//      if (i != -1)
+//        AbZipOutline1->SelectedItem = i;
+    }
+    if (AbZipOutline1->FileName != "")
+      Add1->Enabled = true;
+    else
+      // archive has to be initialized before we can add to it
+      Add1->Enabled = false;
+    if (AbZipOutline1->SelectedZipItem) {
+      // pointing at a file - allow file operations
+      Delete1->Enabled = true;
+      Extract1->Enabled = true;
+      Freshen1->Enabled = true;
+      Move1->Enabled = true;
+    }
+    else {
+      // pointing at a directory - don"t allow file operations
+      Delete1->Enabled = false;
+      Extract1->Enabled = false;
+      Freshen1->Enabled = false;
+      Move1->Enabled = false;
+    }
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Delete1Click(TObject *Sender)
+{
+  AbZipOutline1->DeleteFiles( AbZipOutline1->SelectedZipItem->FileName );
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Extract1Click(TObject *Sender)
+{
+  AbZipOutline1->ExtractFiles( AbZipOutline1->SelectedZipItem->FileName );
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Freshen1Click(TObject *Sender)
+{
+  AbZipOutline1->FreshenFiles( AbZipOutline1->SelectedZipItem->FileName );
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Add1Click(TObject *Sender)
+{
+  DemoDlg->Caption = "Add Files with FileMask";
+  DemoDlg->Edit1->Text = "*.*";
+  DemoDlg->ShowModal();
+  if (DemoDlg->ModalResult == mrOk)
+    AbZipOutline1->AddFiles( DemoDlg->Edit1->Text, 0 );
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Move1Click(TObject *Sender)
+{
+  DemoDlg->Caption = "Move File to New Name";
+  DemoDlg->Edit1->Text = AbZipOutline1->SelectedZipItem->FileName;
+  DemoDlg->ShowModal();
+  if (DemoDlg->ModalResult == mrOk)
+    AbZipOutline1->Move( AbZipOutline1->SelectedZipItem, DemoDlg->Edit1->Text );
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbZipOutline1ProcessItemFailure(TObject *Sender,
+  TAbArchiveItem *Item, const TAbProcessType ProcessType,
+  TAbErrorClass ErrorClass, int ErrorCode)
+{
+  switch (ProcessType) {
+    case ptAdd : ShowMessage( "Failed to add " + Item->FileName ); break;
+    case ptMove : ShowMessage( "Failed to move " + Item->FileName ); break;
+    case ptExtract : ShowMessage( "Failed to extract " + Item->FileName ); break;
+    case ptFreshen : ShowMessage( "Failed to freshen " + Item->FileName ); break;
+  }
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::FormCreate(TObject *Sender)
+{
+  AbZipOutline1->BaseDirectory = ExtractFilePath( Application->ExeName );
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/UExample.h

@@ -0,0 +1,92 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UExample.h                       */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef UExampleH
+#define UExampleH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\ExtCtrls.hpp>
+#include "AbZipOut.hpp"
+#include "AbArcTyp.hpp"
+#include <vcl\Menus.hpp>
+#include <vcl\Dialogs.hpp>
+#include <vcl\ComCtrls.hpp>
+#include "AbBase.hpp"
+#include "AbMeter.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+  TPanel *BottomStatus;
+  TPanel *TopStatus;
+  TMainMenu *MainMenu1;
+  TMenuItem *File1;
+  TMenuItem *Open1;
+  TMenuItem *N1;
+  TMenuItem *Exit1;
+  TOpenDialog *OpenDialog1;
+  TPopupMenu *PopupMenu1;
+  TMenuItem *Add1;
+  TMenuItem *Delete1;
+  TMenuItem *Extract1;
+  TMenuItem *Freshen1;
+  TMenuItem *Move1;
+    TPanel *Panel1;
+    TMemo *Memo1;
+        TAbMeter *AbMeter1;
+        TAbMeter *AbMeter2;
+        TLabel *Label1;
+        TLabel *Label2;
+   TAbZipOutline *AbZipOutline1;
+  void __fastcall Open1Click(TObject *Sender);
+  void __fastcall Exit1Click(TObject *Sender);
+  void __fastcall AbZipOutline1Load(TObject *Sender);
+  void __fastcall AbZipOutline1MouseDown(TObject *Sender, TMouseButton Button,
+  TShiftState Shift, int X, int Y);
+  void __fastcall Delete1Click(TObject *Sender);
+  void __fastcall Extract1Click(TObject *Sender);
+  void __fastcall Freshen1Click(TObject *Sender);
+  void __fastcall Add1Click(TObject *Sender);
+  void __fastcall Move1Click(TObject *Sender);
+  void __fastcall AbZipOutline1ProcessItemFailure(TObject *Sender,
+  TAbArchiveItem *Item, const TAbProcessType ProcessType,
+  TAbErrorClass ErrorClass, int ErrorCode);
+  void __fastcall FormCreate(TObject *Sender);
+private:	// User declarations
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UFinder.cpp

@@ -0,0 +1,106 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UFinder.cpp                      */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "UFinder.h"
+//---------------------------------------------------------------------------
+#pragma link "AbZBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
+{
+  Aborted = true;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Edit1Change(TObject *Sender)
+{
+  Button1->Enabled = Edit1->Text.Length() > 0;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  Button1->Enabled = false;
+  Memo1->Clear();
+  try {
+    Button2->Enabled = true;
+    Aborted = false;
+    // look in the file list box for the file
+    for (int i=0;i<FileListBox1->Items->Count;i++) {
+      Application->ProcessMessages();
+      if (Aborted) break;
+      if (CompareText( Edit1->Text, FileListBox1->Items->Strings[i] ) == 0) {
+        Memo1->Lines->Add( "Found in " + FileListBox1->Directory );
+        break;
+      }
+      // now add search of zip and self extracting files
+      String CurFile = UpperCase( FileListBox1->Items->Strings[i] );
+      if (( CurFile.Pos( ".ZIP" ) > 0 ) ||
+         ( CurFile.Pos( ".EXE" ) > 0 )) {
+        try {
+          AbZipBrowser1->FileName = FileListBox1->Items->Strings[i];
+        }
+        catch(...) {
+        }
+        if (AbZipBrowser1->Count > 0) {
+          for (int j=0;j<AbZipBrowser1->Count;j++) {
+            if (Aborted) break;
+            if (AbZipBrowser1->Items[j]->MatchesStoredName(Edit1->Text)) {
+                Memo1->Lines->Add( "Found in " + FileListBox1->Items->Strings[i] );
+              break;
+            }
+          }
+        }
+      }
+    }
+  }
+  catch (...) {
+    Memo1->Lines->Add( "Done!" );
+    Edit1->Enabled = true;
+    Button1->Enabled = true;
+    Button2->Enabled = false;
+  }
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Button2Click(TObject *Sender)
+{
+  Aborted = true;
+}
+//---------------------------------------------------------------------------
+

Abbrevia/examples/CBuilder/UFinder.h

@@ -0,0 +1,71 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UFinder.h                        */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef UFinderH
+#define UFinderH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\Buttons.hpp>
+#include <vcl\FileCtrl.hpp>
+#include "AbZBrows.hpp"
+#include "AbArcTyp.hpp"
+#include "AbBase.hpp"
+#include "AbBrowse.hpp"
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+    TLabel *Label1;
+    TLabel *Label2;
+    TEdit *Edit1;
+    TMemo *Memo1;
+    TDriveComboBox *DriveComboBox1;
+    TDirectoryListBox *DirectoryListBox1;
+    TFileListBox *FileListBox1;
+    TMemo *Memo2;
+    TAbZipBrowser *AbZipBrowser1;
+        TButton *Button1;
+        TButton *Button2;
+  void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
+  void __fastcall Edit1Change(TObject *Sender);
+        void __fastcall Button1Click(TObject *Sender);
+        void __fastcall Button2Click(TObject *Sender);
+private:	// User declarations
+  bool Aborted;
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UMain.h

@@ -0,0 +1,262 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      UMain.h                          */
+/*   Copyright (c) TurboPower Software Co., 1997, 1998   */
+/*                 All Rights Reserved                   */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#ifndef UMainH
+#define UMainH
+//---------------------------------------------------------------------------
+#include <vcl\Classes.hpp>
+#include <vcl\Controls.hpp>
+#include <vcl\StdCtrls.hpp>
+#include <vcl\Forms.hpp>
+#include <vcl\ExtCtrls.hpp>
+#include "AbZipOut.hpp"
+#include "AbArcTyp.hpp"
+#include "AbZBrows.hpp"
+#include "AbDlgPwd.hpp"
+#include <vcl\FileCtrl.hpp>
+#include <vcl\Buttons.hpp>
+#include <vcl\Menus.hpp>
+#include <vcl\Dialogs.hpp>
+#include <vcl\IniFiles.hpp>
+#include <shellapi.h>
+#include <vcl\ComCtrls.hpp>
+#include "AbBase.hpp"
+#include "AbMeter.hpp"
+#include <Graphics.hpp>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+  TPanel *Panel1;
+  TLabel *Label1;
+  TLabel *Label2;
+  TPanel *Panel2;
+  TPanel *Panel3;
+  TPanel *Panel4;
+  TLabel *Label3;
+  TDriveComboBox *DriveComboBox1;
+  TFilterComboBox *FilterComboBox1;
+  TEdit *Edit1;
+  TDirectoryListBox *DirectoryListBox1;
+  TFileListBox *FileListBox1;
+  TPanel *Panel6;
+  TLabel *ArchiveLabel;
+  TPanel *Panel8;
+  TSpeedButton *SpeedButton1;
+  TSpeedButton *SpeedButton2;
+  TSpeedButton *SpeedButton3;
+  TSpeedButton *SpeedButton4;
+  TSpeedButton *SpeedButton5;
+  TSpeedButton *SpeedButton7;
+  TSpeedButton *SpeedButton8;
+  TSpeedButton *SpeedButton9;
+  TSpeedButton *SpeedButton10;
+  TSpeedButton *SpeedButton11;
+  TSpeedButton *SpeedButton12;
+  TSpeedButton *SpeedButton13;
+  TSpeedButton *SpeedButton14;
+  TImage *Image1;
+  TSpeedButton *sbNone;
+  TSpeedButton *sbAll;
+  TSpeedButton *sbDef;
+  TMainMenu *MainMenu1;
+  TMenuItem *File1;
+  TMenuItem *Open1;
+  TMenuItem *Save1;
+  TMenuItem *Close1;
+  TMenuItem *N4;
+  TMenuItem *Convert1;
+  TMenuItem *N1;
+  TMenuItem *Exit1;
+  TMenuItem *Preferences1;
+  TMenuItem *Confirmations1;
+  TMenuItem *CompressionMethodToUse1;
+  TMenuItem *Store1;
+  TMenuItem *Deflate1;
+  TMenuItem *Best1;
+  TMenuItem *DeflationOption1;
+  TMenuItem *Normal1;
+  TMenuItem *Maximum1;
+  TMenuItem *Fast1;
+  TMenuItem *SuperFast1;
+  TMenuItem *ExtractOptions1;
+  TMenuItem *CreateDirs1;
+  TMenuItem *RestorePath1;
+  TMenuItem *Password1;
+  TMenuItem *StoreOptions1;
+  TMenuItem *RecurseTree1;
+  TMenuItem *RemoveDots1;
+  TMenuItem *StripPath1;
+  TMenuItem *View1;
+  TMenuItem *Attributes1;
+  TMenuItem *za0;
+  TMenuItem *za1;
+  TMenuItem *za2;
+  TMenuItem *za3;
+  TMenuItem *za4;
+  TMenuItem *za5;
+  TMenuItem *za6;
+  TMenuItem *za7;
+  TMenuItem *za8;
+  TMenuItem *za9;
+  TMenuItem *za10;
+  TMenuItem *FileComment1;
+  TMenuItem *N3;
+  TMenuItem *None1;
+  TMenuItem *All1;
+  TMenuItem *Default1;
+  TMenuItem *Font1;
+  TMenuItem *Style1;
+  TMenuItem *Hierarchy1;
+  TMenuItem *N5;
+  TMenuItem *OS1;
+  TMenuItem *OS2;
+  TMenuItem *OS3;
+  TMenuItem *OS4;
+  TMenuItem *OS5;
+  TMenuItem *OS6;
+  TMenuItem *Items1;
+  TMenuItem *AddFiles1;
+  TMenuItem *DeleteFiles1;
+  TMenuItem *ExtractFiles1;
+  TMenuItem *FreshenFiles1;
+  TMenuItem *Help1;
+  TMenuItem *Contents1;
+  TMenuItem *N2;
+  TMenuItem *About1;
+  TFontDialog *FontDialog1;
+  TOpenDialog *OpenDialog1;
+  TPopupMenu *PopupMenu1;
+  TMenuItem *Delete1;
+  TMenuItem *Extract1;
+  TMenuItem *Freshen1;
+  TMenuItem *Move1;
+  TMenuItem *Run1;
+  TPanel *Panel5;
+  TMenuItem *TurboPowerontheWeb1;
+  TMenuItem *SendmailtoTurboPower1;
+  TMenuItem *AbbreviaontheWeb1;
+        TAbMeter *AbMeter1;
+        TAbMeter *AbMeter2;
+        TAbZipOutline *AbZipOutline1;
+  void __fastcall All1Click(TObject *Sender);
+  void __fastcall Exit1Click(TObject *Sender);
+  void __fastcall FormCreate(TObject *Sender);
+  void __fastcall Hierarchy1Click(TObject *Sender);
+  void __fastcall None1Click(TObject *Sender);
+  void __fastcall Save1Click(TObject *Sender);
+  void __fastcall za10Click(TObject *Sender);
+  void __fastcall Font1Click(TObject *Sender);
+  void __fastcall Open1Click(TObject *Sender);
+  void __fastcall AbZipOutline1DragOver(TObject *Sender, TObject *Source, int X,
+  int Y, TDragState State, bool &Accept);
+  void __fastcall AbZipOutline1DragDrop(TObject *Sender, TObject *Source, int X,
+  int Y);
+  void __fastcall AbZipOutline1DblClick(TObject *Sender);
+  void __fastcall AbZipOutline1MouseDown(TObject *Sender, TMouseButton Button,
+  TShiftState Shift, int X, int Y);
+  void __fastcall FileListBox1DragOver(TObject *Sender, TObject *Source, int X,
+  int Y, TDragState State, bool &Accept);
+  void __fastcall FileListBox1DragDrop(TObject *Sender, TObject *Source, int X,
+  int Y);
+  void __fastcall AbZipOutline1WindowsDrop(TObject *Sender, AnsiString FileName);
+  void __fastcall Best1Click(TObject *Sender);
+  void __fastcall SuperFast1Click(TObject *Sender);
+  void __fastcall CreateDirs1Click(TObject *Sender);
+  void __fastcall RestorePath1Click(TObject *Sender);
+  void __fastcall StripPath1Click(TObject *Sender);
+  void __fastcall AbZipOutline1Change(TObject *Sender);
+  void __fastcall Confirmations1Click(TObject *Sender);
+  void __fastcall AbZipOutline1ConfirmSave(TObject *Sender, bool &Confirm);
+  void __fastcall Delete1Click(TObject *Sender);
+  void __fastcall Extract1Click(TObject *Sender);
+  void __fastcall Freshen1Click(TObject *Sender);
+  void __fastcall Move1Click(TObject *Sender);
+  void __fastcall Password1Click(TObject *Sender);
+  void __fastcall AddFiles1Click(TObject *Sender);
+  void __fastcall FreshenFiles1Click(TObject *Sender);
+  void __fastcall AbZipOutline1ArchiveItemProgress(TObject *Sender,
+  TAbArchiveItem *Item, BYTE Progress, bool &Abort);
+  void __fastcall AbZipOutline1NeedPassword(TObject *Sender,
+  AnsiString &NewPassword);
+  void __fastcall DeleteFiles1Click(TObject *Sender);
+  void __fastcall ExtractFiles1Click(TObject *Sender);
+  void __fastcall FormDestroy(TObject *Sender);
+  void __fastcall Close1Click(TObject *Sender);
+  void __fastcall AbZipOutline1Load(TObject *Sender);
+  void __fastcall Convert1Click(TObject *Sender);
+  void __fastcall AbZipOutline1ConfirmOverwrite(AnsiString &Name, bool &Confirm);
+  void __fastcall Default1Click(TObject *Sender);
+  void __fastcall Contents1Click(TObject *Sender);
+  void __fastcall About1Click(TObject *Sender);
+  void __fastcall FileListBox1DblClick(TObject *Sender);
+  void __fastcall AbZipOutline1EndDrag(TObject *Sender, TObject *Target, int X,
+  int Y);
+  void __fastcall FileListBox1MouseDown(TObject *Sender, TMouseButton Button,
+  TShiftState Shift, int X, int Y);
+  void __fastcall FileListBox1MouseMove(TObject *Sender, TShiftState Shift,
+  int X, int Y);
+  void __fastcall AbZipOutline1MouseMove(TObject *Sender, TShiftState Shift,
+  int X, int Y);
+  void __fastcall Edit1Exit(TObject *Sender);
+  void __fastcall FormKeyPress(TObject *Sender, char &Key);
+  void __fastcall OS5Click(TObject *Sender);
+  void __fastcall AbZipOutline1ConfirmProcessItem(TObject *Sender,
+  TAbArchiveItem *Item, TAbProcessType ProcessType, bool &Confirm);
+  void __fastcall AbZipOutline1ProcessItemFailure(TObject *Sender,
+  TAbArchiveItem *Item, const TAbProcessType ProcessType,
+  TAbErrorClass ErrorClass, int ErrorCode);
+  
+  
+  
+  
+  void __fastcall TurboPowerontheWeb1Click(TObject *Sender);
+  void __fastcall AbbreviaontheWeb1Click(TObject *Sender);
+  void __fastcall SendmailtoTurboPower1Click(TObject *Sender);
+private:	// User declarations
+  int OutlineX, OutlineY, FileX, FileY;
+  String StubName;
+  void ReadIniSettings();
+  void SaveIniSettings();
+  void SetCaption();
+  void UpdateMenu();
+  void __fastcall DoConfirm(TObject* Sender, TAbArchiveItem* Item,
+                       bool& Confirm, String Caption);
+  void __fastcall GetMinMaxInfo(TWMGetMinMaxInfo& Msg);
+public:		// User declarations
+  __fastcall TForm1(TComponent* Owner);
+  BEGIN_MESSAGE_MAP
+    MESSAGE_HANDLER(WM_GETMINMAXINFO, TWMGetMinMaxInfo, GetMinMaxInfo)
+  END_MESSAGE_MAP(TForm);
+};
+//---------------------------------------------------------------------------
+extern TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/UMakeSfx.cpp

@@ -0,0 +1,71 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#include <vcl.h>
+#pragma hdrstop
+
+#include "UMakeSfx.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma link "AbBase"
+#pragma link "AbSelfEx"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+        : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+ if (AbMakeSelfExe1->Execute())
+   ShowMessage(AbMakeSelfExe1->SelfExe + " has been created");
+}
+//---------------------------------------------------------------------------
+
+void __fastcall TForm1::AbMakeSelfExe1GetStubExe(TObject *Sender,
+      AnsiString &aFilename, bool &Abort)
+{
+  OpenDialog1->Title = "Select executable stub";
+  OpenDialog1->FileName = "";
+  OpenDialog1->Filter = "Exe files|*.exe";
+  Abort = !OpenDialog1->Execute();
+  if (!Abort)
+    aFilename = OpenDialog1->FileName;
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::AbMakeSelfExe1GetZipFile(TObject *Sender,
+      AnsiString &aFilename, bool &Abort)
+{
+  OpenDialog1->Title = "Select executable stub";
+  OpenDialog1->FileName = "";
+  OpenDialog1->Filter = "Exe files|*.exe";
+  Abort = !OpenDialog1->Execute();
+  if (!Abort)
+    aFilename = OpenDialog1->FileName;
+}
+//---------------------------------------------------------------------------

Abbrevia/examples/CBuilder/UMakeSfx.h

@@ -0,0 +1,56 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+//---------------------------------------------------------------------------
+#ifndef UMakeSfxH
+#define UMakeSfxH
+//---------------------------------------------------------------------------
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include "AbBase.hpp"
+#include "AbSelfEx.hpp"
+#include <Dialogs.hpp>
+//---------------------------------------------------------------------------
+class TForm1 : public TForm
+{
+__published:	// IDE-managed Components
+        TMemo *Memo1;
+        TButton *Button1;
+        TAbMakeSelfExe *AbMakeSelfExe1;
+        TOpenDialog *OpenDialog1;
+        void __fastcall Button1Click(TObject *Sender);
+        void __fastcall AbMakeSelfExe1GetStubExe(TObject *Sender,
+          AnsiString &aFilename, bool &Abort);
+        void __fastcall AbMakeSelfExe1GetZipFile(TObject *Sender,
+          AnsiString &aFilename, bool &Abort);
+private:	// User declarations
+public:		// User declarations
+        __fastcall TForm1(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TForm1 *Form1;
+//---------------------------------------------------------------------------
+#endif

Abbrevia/examples/CBuilder/USelfExV.cpp

@@ -0,0 +1,54 @@
+// ***** BEGIN LICENSE BLOCK *****
+// * Version: MPL 1.1
+// *
+// * The contents of this file are subject to the Mozilla Public License Version
+// * 1.1 (the "License"); you may not use this file except in compliance with
+// * the License. You may obtain a copy of the License at
+// * http://www.mozilla.org/MPL/
+// *
+// * Software distributed under the License is distributed on an "AS IS" basis,
+// * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+// * for the specific language governing rights and limitations under the
+// * License.
+// *
+// * The Original Code is TurboPower Abbrevia
+// *
+// * The Initial Developer of the Original Code is
+// * TurboPower Software
+// *
+// * Portions created by the Initial Developer are Copyright (C) 1997-2002
+// * the Initial Developer. All Rights Reserved.
+// *
+// * Contributor(s):
+// *
+// * ***** END LICENSE BLOCK *****
+/*********************************************************/
+/*                      USelfExV.cpp                     */
+/*********************************************************/
+//---------------------------------------------------------------------------
+#include <vcl\vcl.h>
+#pragma hdrstop
+
+#include "USelfExV.h"
+//---------------------------------------------------------------------------
+#pragma link "AbUnZper"
+#pragma link "AbZBrows"
+#pragma link "AbArcTyp"
+#pragma link "AbBase"
+#pragma link "AbBrowse"
+#pragma link "AbUnzper"
+#pragma resource "*.dfm"
+TForm1 *Form1;
+//---------------------------------------------------------------------------
+__fastcall TForm1::TForm1(TComponent* Owner)
+  : TForm(Owner)
+{
+}
+//---------------------------------------------------------------------------
+void __fastcall TForm1::Button1Click(TObject *Sender)
+{
+  AbUnZipper1->FileName = ParamStr( 0 );
+  SetCurrentDirectory( ExtractFilePath( ParamStr( 0 ) ).c_str() );
+  AbUnZipper1->ExtractFiles( "*.*" );
+}
+//---------------------------------------------------------------------------