This is the Version 0.9 of WPTools
This is an little incomplete version but I wanted to present it to anybody who is interested as soon as possible.
WPTools are
1. an editing control to edit text without the usual size limitation
different Font types, styles, justified text, centered text, indenting for each paragraph, user defined tabstops, WSIWYG printing, clipboard support in RTF, support for hyperlinks
2. the same control as a data aware control
3. a toolbar with ready to use listboxes and icons
4. a ruler similar to 'wordpad'
.... and there are many further ideas.
If you want to install the VCLs copy all files, except of the
files demo*, project1.* and unit1.* to your VCL-Directory. Then install 'WPTools.PAS'
Attention:
Please dont use the data aware control yet on serios data. I don't feel to have tested it enough. By using this software you agree not to hold me responsible for
any problems or damage that may result from using the software.
A brief description to use the components:
1. TWPToolBar
Put the VCL on your form. Set 'align' to alTop. Choose the listboxes you want to see, for example 'FontName,FontSize'...
Choose the action icons you want to use. In this Version, only the icons 'OPEN' and 'SAVE', 'CLOSE', 'PRINT', 'PRINTSETUP' are used.
If you select an updateobject wich may be a TLabel, TMemo, TEdit or TPanel control, the Font and Color of this control (+Childs) will be updated at once. You may select the updateobject by name too. This enables updating of dynamic created controls.
2. TWPRuler
Put the VCL on your form under TWPToolBar. Set 'align' to alTop.
3. TWPRichText
put the VCL on your Form. Size it or set align to 'alClient'. Set the ToolBar property.
Select VerScrollBar if you want to have a vertical scrollbar.
Select HorzScrollBar if you want to have a vertical scrollbar.
You may select a TScrollBar Control too, if you want to have the scrollbar not attached to the editwindow.
If you want to have the text formatted to the width of the editwindow you only have to set FitToWindowHorz to TRUE.
If you need hypertext support, you have only to create a handler for 'HyperLinkEvent'. It is called if the user doubleclicks on text marked as a hyperlink. (displayed with a blue underline).
In the OnCreate procedure of your form you have to call
RichText1.Init
4. TDBWPRichText
You need a TTable and a TDataSource Control. If you have designed them, put the BWPRichText VCL on your Form. Set the properties as above. Set the Properties DataSource and choose a FieldName wich represents a BlobField.Set your Table on active. Now you should see the Data of the first record.
The Version1.0 is expected until 12. Jan!
With ist you will get in addition to this version
- documatation in english and in german
- searching an replacing
- undo for the last delete action
- print support for not displayed text
- interface to a spellchecker
- some additional events, like OnFontChange
The professional Version is prized 99$ (=139 DM)
the privat-use-only version ist prized 49$ (=69DM)
only the professional version gives you the licence to give away your programs.
Both versions include
free Bugfixes
support via email
the source for the data aware control to alter the way how to access the database.
full documentation in German and in English
free or cheaper Update to later versions.
If you have improvements or suggestion
feel free to drop me an E-mail message.
Julian Ziersch,
100744.2101@CompuServe.Com
(sorry: I cant answer your request before 5. Jan 1996)
Problems with this Version:
If you want to enter a tabstop you have to type Ctrl+'I'.
search and replace ist not yet implemented
there is no support for plain text yet
the standard properties like SelStart, SelLenght are under construction
Best Regards,
Julian Ziersch