Dec 232017
Fancy TPW routines for custom controls.
File TPWMI2.ZIP from The Programmer’s Corner in
Category Pascal Source Code
Fancy TPW routines for custom controls.
File Name File Size Zip Size Zip Type
BWCCOWL.PAS 2448 541 deflated
BWCCOWL.TPU 4128 1188 deflated
DISKC.EXE 23552 9946 deflated
DISKC.PAS 4161 1581 deflated
DISKD.EXE 23552 9946 deflated
DISKD.PAS 4161 1581 deflated
FRAMES.PAS 9256 1884 deflated
FRAMES.TPU 5296 1766 deflated
MEMSTAT.EXE 23296 9909 deflated
MEMSTAT.PAS 4466 1678 deflated
MEMSTAT.RES 1367 592 deflated
PCTTEST.EXE 24320 10152 deflated
PCTTEST.PAS 1694 669 deflated
PERCENT.PAS 8102 2129 deflated
PERCENT.RES 513 256 deflated
PERCENT.TPU 8208 3194 deflated
README.WRI 4352 2115 deflated
RESOURCE.EXE 24320 10299 deflated
RESOURCE.PAS 6934 2561 deflated
RESOURCE.RES 1401 618 deflated
RESOURCE.WRI 2944 1401 deflated

Download File TPWMI2.ZIP Here

Contents of the README.WRI file

1\!!!!!"oF}A bunch of miscellaneous TPW stuff! (working title)

I'm not going to go too much into explanations and descriptions here. I'm just throwing some stuff out at you which I hope will help you. I know I could have used some of these files before!
Anyway, because of the nature of the files, I only ask of you a few things. Since this is freeware, I can't be held responsible for how they affect your programs, computers, etc. Of course, I doubt a bug in a "Percent" meter would crash your hard drive, but you should always be cautious. Use these as you will with no guilt, but be sure to not redistribute edited source with my name on it, as I don't want to get called about your bugs.
If anyone has any questions, I have no problems with you contacting me (preferably through CompuServe). Also, I would love to hear about any bugs you found or any suggestions you have (we all know no program is ever truly finished).
The files included are as follows:
All they do is give you the free space in the appropriate drives. They're identical except for the drive name. They're not customizable, but that's why you have the source.
It takes the memory available at loading time and then calculates the percentage of memory available. This requires that you load it at the very beginning. I know there is a function for finding total memory, but I can't seem to find it. Any suggestions?
Same idea as the above, except it gives the percentage of resources available. I changed it recently to include bith USER and GDI space available.
For the above files, two important things should be taken note of: All of the programs use a VERY simple but necessary algorithm for scaling the text to fit the icon box. If you don't do this, the text runs out of its frame on SVGA screens with bigfonts loaded. Also, note the usage of the unbelievably useful FRAMES unit, described below.
A TWindow descendant that gives an extremely pretty Norton style percent box with a slightly Borland look. I just wish I had been able to use it in a few of my programs!! To take a look at it, try running the PCTTEST program.
An invaluable unit for drawing all types of 3-D frames. I had color-customized versions, but I erased them. The main three routines are self-explanatory. Just give them a DC and a rectangle and a few other important pieces of information, and they'll draw an indented box, outdented box, or a TPW IDE-style frame (look at the bottom status line). The last function is one I quickly wrote up to give you your very own BORLAND BRUSH! This brush is used in PCTTEST for the background.

Any ideas? Give me a (E-mail) ring! If you have no suggestions and you have made use of these, please drop me a line! I'd love to know if I'm being of any use!

Additions: I made a few changes, most notably the addition of the actual Frames unit (sorry - I forgot it on the last file) and the rewritten TPercent unit. The TPercent changes need a little explanation.
I rewrite TPercent as a TDlgWindow descendant so it is more customizable. Now, you can use your own dialogs as the template. TPercent can recognize more than 1 actual percent display (the first one is numbered 201) and more than 1 line of text (the first one is numbered 101). The state of the Cancel button is kept in CancelBool, and should be regularly checked, and reset if the user does not confirm the cancelled operation.

Good luck!

Steve Willer
Mark Data Management
CIS: 70400,3667
BIX/WIX: swiller




*;J\]Times New RomanSymbol Arial

 December 23, 2017  Add comments

 Leave a Reply

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>