даров, после запуска можно указать wait
task := TTask.Create(procedure
begin
end);
task.Start;
// ждем выполнения
while not TTask.WaitForAll([task], 50) do
begin
CheckSynchronize;
Application.ProcessMessages;
end;
здесь делай уведомление об окончании выполнения
с waitforall я понял. как быть, если эта задача в form.oncreate?
не открывает форму, пока не закончится таск