Dec 172017
A functional replacement for ReadModal in Clipper. Supports mouse. | |||
---|---|---|---|
File Name | File Size | Zip Size | Zip Type |
INKEY2.CH | 2172 | 560 | deflated |
MAKE.BAT | 170 | 116 | deflated |
PHREAD | 2091 | 1110 | deflated |
PHREAD.CH | 1138 | 414 | deflated |
PHREAD.PRG | 25475 | 5731 | deflated |
PHREAD.TXT | 2104 | 1052 | deflated |
PH_MOUSE.ASM | 14229 | 2096 | deflated |
PH_MOUSE.OBJ | 939 | 573 | deflated |
TEST.PRG | 1870 | 607 | deflated |
TYPES.CH | 576 | 281 | deflated |
Download File PHREAD.ZIP Here
Contents of the PHREAD.TXT file
Goals and Objectives of PHREAD
A functional replacement for ReadModal. A number of
features were added:
*Optional Startup Field Select
*Optional ReadKeys
*Mouse Support
*Wrap Support
*Action Fields (Alternate Reader Supplied)
*Logical Toggle Fields (Alternate Reader Supplied)
Possible Future Enhancements
Memo Fields
Array Fields ( comma delimited, list box )
Vertical Scrolling ( w/virtual row coordinates )
Cargo Field:
When using the ButtonReader this field is the action
field.
Optional Startup Field:
A second parameter (numeric) will indicate which field
in which to begin the read.
ReadKeys:
An optional third parameter is an array of "ReadKeys".
These are just like SETKEYs except they only exist while
in the read. The format is as follows:
{ { key code, key action }, ... }
Where key codes is an inkey value. Key action can be one
of three different types:
NUMERIC -- jump to that field
BLOCK -- evaluate that block (current obj and
getlist are passed)
CHARACTER -- jump to field name (or do nothing)
Complete MOUSE support.
GetGotoFld an additional support field which will jump to
field number.
Also if you create any readers please use RDKey ( ) rather
than inkey ( ) and GetSetFocus ( obj ) rather than
obj:SetFocus ( ).
Sorry for the sad docs, but this is free after all. If you
have any questions / comments, find any bugs, or just find
this program feel free to leave me some e-mail at:
Blue Water BBS: (313)-651-7841 (User: Patrick Hurley)
Bix: phurley
Compu$erve: 76100, 1262
*** Blatant Advertisement Follows Be Warned ***
*** Blatant Advertisement Follows Be Warned ***
*** Blatant Advertisement Follows Be Warned ***
For all of you consulting needs please contact Foresight
Consulting experts in C, C++, ASM, Pascal, and Clipper.
Specializing in Project Development and Staff Training.
Foresight Consulting
(313)-382-6213
Allen Park, MI
48101
A functional replacement for ReadModal. A number of
features were added:
*Optional Startup Field Select
*Optional ReadKeys
*Mouse Support
*Wrap Support
*Action Fields (Alternate Reader Supplied)
*Logical Toggle Fields (Alternate Reader Supplied)
Possible Future Enhancements
Memo Fields
Array Fields ( comma delimited, list box )
Vertical Scrolling ( w/virtual row coordinates )
Cargo Field:
When using the ButtonReader this field is the action
field.
Optional Startup Field:
A second parameter (numeric) will indicate which field
in which to begin the read.
ReadKeys:
An optional third parameter is an array of "ReadKeys".
These are just like SETKEYs except they only exist while
in the read. The format is as follows:
{ { key code, key action }, ... }
Where key codes is an inkey value. Key action can be one
of three different types:
NUMERIC -- jump to that field
BLOCK -- evaluate that block (current obj and
getlist are passed)
CHARACTER -- jump to field name (or do nothing)
Complete MOUSE support.
GetGotoFld an additional support field which will jump to
field number.
Also if you create any readers please use RDKey ( ) rather
than inkey ( ) and GetSetFocus ( obj ) rather than
obj:SetFocus ( ).
Sorry for the sad docs, but this is free after all. If you
have any questions / comments, find any bugs, or just find
this program feel free to leave me some e-mail at:
Blue Water BBS: (313)-651-7841 (User: Patrick Hurley)
Bix: phurley
Compu$erve: 76100, 1262
*** Blatant Advertisement Follows Be Warned ***
*** Blatant Advertisement Follows Be Warned ***
*** Blatant Advertisement Follows Be Warned ***
For all of you consulting needs please contact Foresight
Consulting experts in C, C++, ASM, Pascal, and Clipper.
Specializing in Project Development and Staff Training.
Foresight Consulting
(313)-382-6213
Allen Park, MI
48101
December 17, 2017
Add comments