{-----------------------------------------------------------------------------} { Name : SdfData } { Application : TBaseTextDataSet TSdfDataSet TFixedFormatDataSet Components } { Version : 1.03 } { Author : Orlando Arrocha email: oarrocha@hotmail.com } { Date : Jan 2001 } { Purpose : This components are enhancements of the Borland's Sample } { TTextDataSet to access delimited (CSV/SDF) and fixed text } { files as if they where database tables. } { --------- } { History } { --------- } { 19/Jul/01 Version 1.03 (Orlando Arrocha) } { 18/Jun/01 Version 1.02 (Wayne Brantley) } { 30/Mar/01 Version 1.01 (Orlando Arrocha) } { 10/Jan/01 Version 1.00 (Orlando Arrocha) } { --------- } { TERMS } { --------- } { This component is provided AS-IS without any warranty of any kind, either } { express or implied. This component is freeware and can be used in any } { software product. Credits on applications used will be welcomed. } { If you find it useful, improve it or have a wish list ... please drop me } { a mail, I'll be glad to hear your comments. } { ---------------- } { How to Install } { ---------------- } { 1. Copy this SDFDATA.PAS and the associated SDFDATA.DCR to the folder } { from where you wish to install the component. This will probably be } { $(DELPHI)\Projects\BPL or a sub-folder of the $(DELPHI)\lib folder. } { 2. Copy to the same folder (the one choosen before) the files } { $(DELPHI)\Demos\DB\Textdata\Textdata.* (3 files - .pas, .res, .rc) } { $(DELPHI)\Demos\DB\Textdata\Textpkg.* (2 files - .dpk, .res) } { 3. Make the modifications noted under TEXTDATA.PAS Modifications } { subtitle. Note -- change only your copied files. } { 4. Install TEXTPKG.DPL by choosing the File | Open menu option. } { 5. Select Delphi Package (.dpk) filter on the Open File dialog and browse } { for TEXTPKG.DPK. } { 6. Press the Install button and close the window. } { 7. Install the TSdfDataSet and TFixedFormatDataSet components by choosing } { the Component | Install Component menu option. } { 8. Select the "Into exisiting package" page of the Install Components } { dialogue box. } { 9. Browse to the folder where you saved this file and select it. } { 10. Ensure that the "Package file name" edit box contains } { $...\TEXTPKG.DPK } { 11. Accept that the package will be rebuilt. } { } { ****************** } { * VERY IMPORTANT * } { ****************** } { You have to modify the file TEXTDATA.PAS, included in the DB Demos, } { as indicated behind (under TEXTDATA.PAS Modifications) and then } { compile and install TextPKG.DPK in order to install this component. } { } { ========================== } { TEXTDATA.PAS Modifications } { ========================== MAKE A BACKUP OF TEXTDATA.PAS FIRST } { } { Line : 327 in Function GetRecord } { -- Line says -- } { StrLCopy(Buffer, PChar(FData[FCurRec]), MaxStrLen); } { ^^^^^^^^^ } { -- must say -- } { StrLCopy(Buffer, PChar(FData[FCurRec]), GetRecordSize); } { ^^^^^^^^^^^^^ } { } { Line : 79 in TTextDataSet class Declaration } { -- Line says -- } { private } { ^^^^^^^ } { -- must say -- } { protected } { ^^^^^^^^^ } { } {-----------------------------------------------------------------------------}