HyperTerp 3.0 Demo

Thank you for looking at the HyperTerp demo package.

This package includes demo projects created with Delphi 
and the HyperTerp component. The Simple demo demonstrates
how easy it is to have a full functional Script enabled
application out of the box, the advanced demo demonstrates
advanced features and the debugger interface.

The HyperTerp Language Reference and Programmer's Guide are 
available in WinHelp format.

More than 20 short script samples are provided - You can 
execute these scripts, change them, or write new scripts 
with the HyperTerp demo projects.

HyperTerp is still in EEP, the documentation and software 
provided with this package might have some bugs or missing 
parts. The missing parts will be added to the shipping 
version, and the bugs will go away. 

If you are interested in HyperTerp, you can join the 
HyperTerp EEP. The EEP announcement is provided at the 
end of this message.

Thank you for your time and interest,
	
The HyperAct development Team.


----------------------------------------------------

Announcing the HyperTerp 3.0 EEP 3.

HyperAct, Inc.'s HyperTerp drop in script component enters a public 
EEP period!

HyperTerp is a sophisticated full featured Script language component 
for Delphi, written in Delphi. 

Adding a Pascal like language to your application is as easy as 
dragging and dropping a component from delphi's palette on a Form, 
and adding three lines of code.

HyperTerp features :

* A True Delphi component, no VBX's, No DLL's ..
* Small footprint, HyperTerp will add less than 200K to your application.
* Full featured - Pascal like language, support for procedures, loops, 
  global and local variables, arrays, conditional statements and blocks.
* Users can create and display Forms, Access procedures from the Windows API, 
  DLL's and more ..
* Easy to use, Drag & Drop from the component palette, set a property and 
  call a method!
* Easy to integrate - OnRead, OnWrite, OnError and OnAdvanceLine events 
  allow you to integrate HyperTerp with your application's look and feel.
* Easy to expand - Register your extensions in the OnRegisterProcs event, 
  create Form methods to respond to Extension Events.
* Debugger interface is provided - Source parsing events allow you to create 
  a full featured debugging facility.

Availability :

HyperTerp will be offered in 2 versions :

* HyperTerp/Delphi - Component and Help files, $149, Royality Free!
* HyperTerp/Pro    - HyperTerp/Delphi + Source code and a bonus DLL 
                     version. This version is priced at $395

The HyperTerp EEP is $199, it will provide you with the components, 
help and source code. A Free upgrade to the Pro version will be sent 
to EEP users when the product will be released.

Order the HyperTerp EEP from :

HyperAct, Inc.
P.O.Box 5517
Coralville, IA 52241
USA

Tel/Fax : +1 319 351 8413
CIS : 76350,333
Internet : rhalevi@hyperact.com
Web : http://www.hyperact.com


Some Examples :

* To add a basic interpreter to your application follow these steps :

1. Drag and Drop a THyperTerp on your form.
2. Add the following lines to a button or menu handler :

HyperTerp1.fileName := 'myscript.trp';
if (HyperTerp1.procExist('Main')) then
	HyperTerp1.executeProc('Main', isRunning);

* To integrate a component with your application's user interface :

1. Choose the HyperTerp component on your Form.
2. Choose the Events page in the object inspector.
3. Double Click on the OnWrite event and write the code that 
sends the passed string parameter to your user interface. 

eg - 

Procedure TForm1.HyperTerp1Write(Sender : TBasicParser; s : PChar);
begin
	myStatusLine.caption := strPas(s);
end;

4. Double Click on the OnRead event and write the code that reads a 
string from your user.
5. Double Click on the OnError event and write the code that displays 
a message if an error is found in the script.

eg - 

Procedure TForm1.HyperTerp1Error(Sender : TBasicParser; s : string);
begin
	messageDlg(s, mtError, [mbOk], 0);
end;

* To extend the interpreter to add a procedure to play a video file :

1. Double Click the OnRegisterProcs event and enter the following code :

Procedure TForm1.HyperTerp1RegisterProcs(Sender : TBasicParser);
begin
   HyperTerp1.defineExtensionProc('procedure playVideo(fileName : string);', 
                                        playVideo);
end;

2. Create a private form method with the following code :

procedure TForm1.playVideo(Sender : TBasicParser; Args : TProcParms);
begin
	mediaPlayer1.fileName := Args.parameters[1].AsString;
	mediaPlayer1.open;
end;

(This example assumes a TMediaPlayer has been placed on the form).

You users can now write things like :

procedure playIt;
var
	fn : string;
endVar
	write('Give me the name of the file :');
	read(fn);
	playVideo(fn);
endProc

* To extend the interpreter to add a function that returns true if the 
form is visible :

1. Add the following line to the OnRegisterProcs event handler :

HyperTerp1.defineExtensionProc('function isFormVisible : boolean;', isVisible);

2. Add the following private form method :

procedure TForm1.isVisible(Sender : TBasicParser; Args : TProcParms);
begin
	funcResultBool := visible;
end;