diff --git a/components/tvplanit/source/vpevnteditdlg.pas b/components/tvplanit/source/vpevnteditdlg.pas index 2d00822e9..c338e17ce 100644 --- a/components/tvplanit/source/vpevnteditdlg.pas +++ b/components/tvplanit/source/vpevnteditdlg.pas @@ -733,7 +733,7 @@ begin result := (DlgEventEdit.ReturnCode = rtCommit); if Result then begin DlgEventEdit.DePopulateDialog; - DataStore.PostEvents; +// DataStore.PostEvents; end; finally DlgEventEdit.Release; diff --git a/components/tvplanit/source/vptaskeditdlg.pas b/components/tvplanit/source/vptaskeditdlg.pas index 61ae5010f..451be1e7d 100644 --- a/components/tvplanit/source/vptaskeditdlg.pas +++ b/components/tvplanit/source/vptaskeditdlg.pas @@ -212,8 +212,8 @@ begin Task.Changed := Result; if Result then begin TaskEditForm.DePopulateSelf; - DataStore.PostTasks; - DataStore.NotifyDependents; +// DataStore.PostTasks; +// DataStore.NotifyDependents; end; finally TaskEditForm.Release; diff --git a/components/tvplanit/source/vptasklist.pas b/components/tvplanit/source/vptasklist.pas index 8441f5790..6c3abc04e 100644 --- a/components/tvplanit/source/vptasklist.pas +++ b/components/tvplanit/source/vptasklist.pas @@ -1464,6 +1464,7 @@ begin end; if AllowIt then begin DataStore.PostTasks(); + DataStore.NotifyDependents; Invalidate; end else begin if NewTask then begin