BaseDataWindow: Fix data renewal

Elwig/Windows/BaseDataWindow.xaml.AreaCom.cs

@@ -31,7 +31,11 @@ namespace Elwig.Windows {
         }
 
         private async Task AreaCommitmentTypesFinishEditing(AppDbContext ctx) {
-            ControlUtils.RenewItemsSource(AreaCommitmentTypeList, await ctx.AreaCommitmentTypes.OrderBy(v => v.SortId).ToListAsync());
+            ControlUtils.RenewItemsSource(AreaCommitmentTypeList, await ctx.AreaCommitmentTypes
+                .OrderBy(v => v.VtrgId)
+                .Include(t => t.WineVar)
+                .Include(t => t.WineAttr)
+                .ToListAsync());
             _actList = null;
             _acts = null;
             _actIds = null;