JCSV (Jans CSV Components): what changed
Revision 2 to 3. Removed lines have a minus sign; added lines have a plus sign.
| Old | New | Line | |
|---|---|---|---|
| 1 | 1 | ### About | |
| 2 | 2 | ||
| 3 | 3 | *JCSV (Jans Freeware CSV Database Components* is a set of components for using a CSV Database | |
| 4 | 4 | ||
| 5 | 5 | The download contains the component, an installation package. | |
| 6 | 6 | ||
| 7 | 7 | ### Author | |
| 8 | 8 | ||
| 9 | 9 | Jan Verhoeven Email jan1.verhoeven at wxs.nl Modified by David Stewart Email davesimplewear at yahoo dot com | |
| 10 | 10 | ||
| 11 | 11 | ### License | |
| 12 | 12 | ||
| 13 | 13 | [modified](http://svn.freepascal.org/svn/lazarus/trunk/COPYING.modifiedLGPL) [LGPL](http://svn.freepascal.org/svn/lazarus/trunk/COPYING.LGPL) (same as the FPC RTL and the Lazarus LCL). You can contact the author if the modified LGPL doesn't work with your project licensing. | |
| 14 | 14 | ||
| 15 | 15 | ### Download | |
| 16 | 16 | ||
| 17 | 17 | The latest stable release can be found on [the lazarus-ccr sf download location](http://sourceforge.net/projects/lazarus-ccr/files/JCSV/). Also from [David's Freeware](http://www.users.on.net/~dave.stewart/index.html). | |
| 18 | 18 | ||
| 19 | 19 | ### Example Program | |
| 20 | 20 | ||
| 21 | 21 | To create the example first create your csv database, using your text editor type the field names you wish to use, as in the image below. | |
| 22 | 22 | ||
| 23 | - | ||
| 23 | + | ```text | |
| 24 | + | Image:Example.png | |
| 25 | + | ``` | |
| 24 | 26 | ||
| 25 | 27 | You can search on any field by using the search button in the navigator. as shown in the images below. | |
| 26 | 28 | ||
| 27 | 29 |  | |
| 28 | 30 | ||
| 29 | 31 |  | |
| 30 | 32 | ||
| 31 | 33 |  | |
| 32 | 34 | ||
| 33 | 35 | The example code is listed below also. | |
| 34 | 36 | ||
| 35 | 37 | ``` pascal | |
| 36 | 38 | uses | |
| 37 | 39 | Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, | |
| 38 | 40 | StdCtrls, jvCSVBase; | |
| 39 | 41 | ||
| 40 | 42 | type | |
| 41 | 43 | ||
| 42 | 44 | { TForm1 } | |
| 43 | 45 | ||
| 44 | 46 | TForm1 = class(TForm) | |
| 45 | 47 | Button1: TButton; | |
| 46 | 48 | CSVBase: TjvCSVBase; | |
| 47 | 49 | jvCSVCheckBox1: TjvCSVCheckBox; | |
| 48 | 50 | jvCSVComboBox1: TjvCSVComboBox; | |
| 49 | 51 | jvCSVEdit1: TjvCSVEdit; | |
| 50 | 52 | jvCSVEdit2: TjvCSVEdit; | |
| 51 | 53 | jvCSVEdit3: TjvCSVEdit; | |
| 52 | 54 | jvCSVEdit4: TjvCSVEdit; | |
| 53 | 55 | jvCSVEdit5: TjvCSVEdit; | |
| 54 | 56 | jvCSVEdit6: TjvCSVEdit; | |
| 55 | 57 | jvCSVEdit7: TjvCSVEdit; | |
| 56 | 58 | jvCSVEdit8: TjvCSVEdit; | |
| 57 | 59 | jvCSVEdit9: TjvCSVEdit; | |
| 58 | 60 | jvCSVLabel1: TjvCSVLabel; | |
| 59 | 61 | jvCSVNavigator1: TjvCSVNavigator; | |
| 60 | 62 | Label1: TLabel; | |
| 61 | 63 | Label2: TLabel; | |
| 62 | 64 | Label3: TLabel; | |
| 63 | 65 | Label4: TLabel; | |
| 64 | 66 | procedure Button1Click(Sender: TObject); | |
| 65 | 67 | procedure FormShow(Sender: TObject); | |
| 66 | 68 | private | |
| 67 | 69 | { private declarations } | |
| 68 | 70 | public | |
| 69 | 71 | { public declarations } | |
| 70 | 72 | end; | |
| 71 | 73 | ||
| 72 | 74 | var | |
| 73 | 75 | Form1: TForm1; | |
| 74 | 76 | ||
| 75 | 77 | implementation | |
| 76 | 78 | ||
| 77 | 79 | { TForm1 } | |
| 78 | 80 | ||
| 79 | 81 | procedure TForm1.FormShow(Sender: TObject); | |
| 80 | 82 | begin | |
| 81 | 83 | CSVbase.DataBaseOpen(ExtractFilePath(ParamStr(0))+'example.csv'); | |
| 82 | 84 | end; | |
| 83 | 85 | ||
| 84 | 86 | procedure TForm1.Button1Click(Sender: TObject); | |
| 85 | 87 | begin | |
| 86 | 88 | jvCSVEdit8.Caption:= FormatDateTime('dd/mm/yy',now); | |
| 87 | 89 | end; | |
| 88 | 90 | ||
| 89 | 91 | initialization | |
| 90 | 92 | {$I Unit1.lrs} | |
| 91 | 93 | ||
| 92 | 94 | end. | |
| 93 | 95 | ``` | |
| 94 | 96 | ||
| 95 | 97 | ### Change Log | |
| 96 | 98 | ||
| 97 | 99 | - Version 1.0 *date* | |
| 98 | 100 | ||
| 99 | 101 | ### Dependencies / System Requirements | |
| 100 | 102 | ||
| 101 | 103 | - None | |
| 102 | 104 | ||
| 103 | 105 | Status: *Stable / Alpha* | |
| 104 | 106 | ||
| 105 | 107 | Issues: | |
| 106 | 108 | ||
| 107 | 109 | ### Installation | |
| 108 | 110 | ||
| 109 | 111 | - Use *.lpk file to install | |
| 110 | 112 | ||
| 111 | 113 | ### See Also | |
| 112 | 114 | ||
| 113 | 115 | - [[CsvDocument]] | |
| 114 | 116 | - [[CSV]] | |
| 115 | 117 | - [[ZMSQL]] | |
| 116 | 118 | ||
| 117 | 119 | --- | |
| 118 | 120 | *From the Free Pascal wiki, page "JCSV (Jans CSV Components)", as it stood on 2020-02-10 after a change by Andry, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* | |
| 119 | 121 | Category: Components | |
| 120 | 122 | Category: Data import and export |
