Category : Pascal Source Code
Archive   : TTT501-2.ZIP
Filename : UPGRADE.DOC

 
Output of file : UPGRADE.DOC contained in archive : TTT501-2.ZIP

U P G R A D E N O T E S F O R V E R S I O N 4 U S E R S
-----------------------------------------------------------------

This file contains important information for programmers who are upgrading
an application from version 4.0 to version 5.0 of the Toolkit.

During development of the new Toolkit, every effort has been made to maintain
consistency with version 4.0, but in certain units this was not possible.
As a result, some programs that were written for version 4.0 will need to be
modified before they will function with the new version. This document does
not identify any of the new additions to the Toolkit, only changes to
existing routines.

Listed below, in order of significance, are the details for each unit:

IOTTT5
------

This unit has undergone a very major rewrite with many new powerful features.
In order for the expanded IO routines to be consistent, all of the old
procedures have been renamed. The table below identifies the v4.0
procedure with the corresponding v5.0 procedure(s).

Version 4.0 Version 5.0

IO_SetFields Create_Fields
IO_SetColors Define_Colors
IO_DefineMsg Add_Message
IO_DefineStr Add_Field + String_Field
IO_DisplayFields Display_All_Fields
IO_SoundBeeper Allow_Beep
IO_ResetFields Dispose_Fields
IO_AllowEsc Allow_Esc
IO_Edit Process_Input

The Process_Input procedure is passed a parameter that identifies the field
number of the first field to highlight - not an error code. The variable
I_Char is updated with the character that the user pressed last. I_Char
will be set to #027 if the user escaped.

Listed below is a code fragment that has been converted from v4.0 to v5.0:


{Version 4.0 commands}
begin
IO_SetFields(3);
IO_SoundBeeper(False);
IO_DefineStr(1, 3, 2, 3, 2, 25, 1, Str1, '!!!!!!!!!!!!!!!!!!!!!!');
IO_DefineStr(2, 1, 3, 1, 3, 25, 3, Str2, '###');
IO_DefineStr(3, 2, 1, 2, 1, 25, 5, Str3, '(##-###) ##');
SaveScreen(1); {save previous input screen}
Attrib(1,1,80,25,darkgray,black); {darken the display but still visible}
FBox(X1,Y1,X2,Y2,blue,lightgray,1);
WriteAT(1,1,blue,lightgray,'Order description:');
WriteAT(1,3,blue,lightgray,'Quantity:');
WriteAT(1,5,blue,lightgray,'Part No:');
IO_Edit(Retcode);
IO_ResetFields;
RestoreScreen(1);
DisposeScreen(1);
end;


{equivalent version 5.0 commands}
begin
Create_Fields(3);
Allow_Beep(False);
Add_Field(1, 3, 2, 3, 2, 25, 1);
String_Field(1, Str1, '!!!!!!!!!!!!!!!!!!!!!!');
Add_Field(2, 1, 3, 1, 3, 25, 3);
String_Field(2, Str2, '###');
Add_Field(3, 2, 1, 2, 1, 25, 5);
String_Field(3, Str3, '(##-###) ##');
SaveScreen(1); {save previous input screen}
Attrib(1,1,80,25,darkgray,black); {darken the display but still visible}
FBox(X1,Y1,X2,Y2,blue,lightgray,1);
WriteAT(1,1,blue,lightgray,'Order description:');
WriteAT(1,3,blue,lightgray,'Quantity:');
WriteAT(1,5,blue,lightgray,'Part No:');
Process_Input(1);
Dispose_Fields;
RestoreScreen(1);
DisposeScreen(1);
end;

Review the IODEM?.pas files for more further examples of the new commands.

Set a conditional define IOFULL to enable all of the new features.


MenuTTT5
--------

A new procedure Menu_Set has been added. This procedure automatically
sets a menu_record variable to its default values. You MUST call this
procedure to initialize the menu_record variables, otherwise the system
will hang.

The major change is that a user hook has been added to the menu_record, and
it needs to be set to nil or to a far procedure. Refer to menudem1.pas
for a simple example.


DirTTT5
-------

This unit has been completely rewritten. The Display_Directory procedure
is now passed the fully qualified file mask instead of the path and filemask
separately.

The global variable "DTTT" (formerly "D") controls the look and feel of the
directory window.

Set a conditional define DIRFULL to enable all of the directory procedures.


WinTTT5
-------
A new global boolean variable W_Fatal is used to identify if the program will
halt when a window error occurs. Another global variable W_Error is updated
with the error codes after window operations.

The Screen_Size parameter is no longer needed. The Toolkit automatically
accommodates condensed screen displays.


MiscTTT5
--------
The function Exist can now be passed a file mask as well as a specific
filename.


FastTTT5
--------
The global variable WaitForRetrace has been renamed SnowProne.


PullTTT5
--------
The global variable PM has been renamed PTTT.


The v4.0 structure of the routines in KeyTTT5, readTTT5 and StrnTTT5
have not been affected.


-- o --



  3 Responses to “Category : Pascal Source Code
Archive   : TTT501-2.ZIP
Filename : UPGRADE.DOC

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/