UPD: Forgotten file to previous commit.

This commit is contained in:
cobines 2011-02-22 01:54:44 +00:00
commit a78ead7338

View file

@ -4413,9 +4413,9 @@ procedure TfrmMain.CloseNotebook(ANotebook: TFileViewNotebook);
var
i: Integer;
begin
// First stop all work in threads.
// First stop all workers.
for i := 0 to ANotebook.PageCount - 1 do
ANotebook.View[i].StopBackgroundWork;
ANotebook.View[i].StopWorkers;
// Then remove file views.
ANotebook.RemoveAllPages;
end;