Changeset 137 for branches/generator/Forms/UFormRules.pas

Timestamp:

Dec 27, 2017, 6:05:11 PM (7 years ago)

Author:

chronos

Message:

• Added: Lookup tables can be defined and their usage set from grammer rules.

File:

• branches/generator/Forms/UFormRules.pas (modified) (2 diffs)

branches/generator/Forms/UFormRules.pas

@@ -35 +35 @@
     procedure FormCreate(Sender: TObject);
     procedure FormShow(Sender: TObject);
-    procedure ListView1Compare(Sender: TObject; Item1, Item2: TListItem;
-      Data: Integer; var Compare: Integer);
     procedure ListView1Data(Sender: TObject; Item: TListItem);
     procedure ListView1DblClick(Sender: TObject);
@@ -73 +71 @@
   ReloadList;
   UpdateInterface;
-end;
-
-procedure TFormRules.ListView1Compare(Sender: TObject; Item1, Item2: TListItem;
-  Data: Integer; var Compare: Integer);
-begin
-
 end;