===> http://www.*-*-*.com/ ~jola/EFLIB/ <===

Try out a ***free*** object-oriented tool for Borland Pascal.
It includes *many* features, such as;

    - polymorphic, generic data structures such as doubly linked
      strucutures (stacks, queues, lists), cached structures,
      segmented structures, binary (search/AVL) trees, hash tables,
      virtual arrays, structure mirrors, and more.
    - virtualized screen I/O and virtual screens with presentation
      methods (fade in, explode, shrink, drag, ...).
    - mathematical procedures (equation solving)
    - device engines; keyboard, mouse, speaker, screen ...
    - polymorphic memory engine
    - polymorphic data streams including buffered data streams
    - windows, dialogue boxes, selecion lists, editors, browsers
    - button panels, menues

    ... just to pick out some examples. (All these features will be
        included in the next release, most of them are already
        available).

The OOP tool is not dependent of Turbo Vision.

For more information, please have a look at;

    http://www.*-*-*.com/ ~jola/EFLIB/
    http://www.*-*-*.com/ ~jola/EFLIB/Advanced/
    http://www.*-*-*.com/ ~jola/EFLIB/Features/

Beta testers receive a free and documented copy of EFLIB. Join the beta
team! Developing support needed, please send your comments, ideas,

Next release will include;
   * Rewritten multitasking engine
   * Polymorphic objects
   * New data structures such as; segmented lists and cached
     structures, and virtual arrays that grows automatically.
   * More advanced mathematical OOP functions, such as
     expression solver that uses binary trees - advices needed!
   * Iterative OOP equation solver that provides differential functions.

Greetings, Johan

[Short source code example included with this document]

[ Browser.pas < 1K ]
{ Borland Pascal Extended Function Library - EFLIB (C) Johan Larsson, 1996 }
{ Text browser demonstration                                               }

{ EFLIB IS PROTECTED BY THE COPYRIGHT LAW AND MAY NOT BE COPIED, SOLD OR   }
{ MANIPULATED. FOR MORE INFORMATION, SEE PROGRAM MANUAL! THIS DEMONSTRAT-  }
{ ION PROGRAM MAY FREELY BE USED AND DISTRIBUTED.                          }

uses EFLIBDEF, EFLIBDAT, EFLIBDIA, EFLIBSCR, EFLIBMSE, EFLIBIO,
     EFLIBTXT, EFLIBBAS;

var MyBrowser : BrowserObjectType;
    MyText    : TextObjectType;
    Filename  : string;

begin
     MyText.Initialize;
     if (ParamCount = 0) then Filename := 'HAMLET.TXT' else Filename := ParamStr(1);
     MyText.TransferFromFile (Filename);
     with MyBrowser do begin

                             DoubleBorder, TRUE, FALSE);
          Browse;
          Intercept;
     end;
     MyText.Intercept;
end.