Changeset 9 for trunk/EdcProject.pas

Timestamp:

Apr 14, 2026, 12:57:08 PM (2 weeks ago)

Author:

chronos

Message:

• Modified: Loading of spot prices and calculation prices for each EAN.

File:

• trunk/EdcProject.pas (modified) (3 diffs)

trunk/EdcProject.pas

@@ -20 +20 @@
     SpotPrices: TSpotPrices;
     Eans: TEans;
-    procedure Import(ReportsDir: string);
+    procedure ImportReports(ReportsDir: string);
     procedure LoadFromFile(FileName: string);
     procedure SaveToFile(FileName: string);
@@ -43 +43 @@
 end;
 
-procedure TEdcProject.Import(ReportsDir: string);
+procedure TEdcProject.ImportReports(ReportsDir: string);
 var
   Reports: TStringList;
@@ -62 +62 @@
   for I := 0 to Eans.Count - 1 do
     Eans[I].Values.Sort(TComparer<TEanValue>.Construct(Eans[I].Values.Comparer));
-
 
   CreateEan('', STotalSupply, ekSupply);