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