Changeset 11 for trunk/FormMain.pas

Timestamp:

Apr 15, 2026, 10:17:17 PM (2 weeks ago)

Author:

chronos

Message:

• Modified: EAN address as separate field.

File:

• trunk/FormMain.pas (modified) (1 diff)

trunk/FormMain.pas

@@ -360 +360 @@
       ListItem.Data := EdcProject.Eans[I];
       ListItem.SubItems.Add(Owner);
+      ListItem.SubItems.Add(Address);
+      ListItem.SubItems.Add(EanKindText[Kind]);
       ListItem.SubItems.Add(MeasureToStr(GetTotalIn(IntervalFrom, IntervalTo)));
       ListItem.SubItems.Add(MeasureToStr(GetShared(IntervalFrom, IntervalTo)));
       ListItem.SubItems.Add(IntToStr(Trunc(GetSharedPercent(IntervalFrom, IntervalTo))));
-      ListItem.SubItems.Add(EanKindText[Kind]);
       ListItem.SubItems.Add(FloatToStr(PriceLow));
       ListItem.SubItems.Add(FloatToStr(PriceHigh));