Rev 2 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 2 | Rev 4 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | unit RedundancyForm; |
1 | unit RedundancyForm; |
2 | 2 | ||
- | 3 | // TODO: man soll einstellen können, dass er redundanzen nur innerhalb eines datenträgers (= root node) findet |
|
- | 4 | ||
3 | interface |
5 | interface |
4 | 6 | ||
5 | uses |
7 | uses |
6 | Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, |
8 | Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, |
7 | System.Classes, Vcl.Graphics, AdoDb, |
9 | System.Classes, Vcl.Graphics, AdoDb, |