Aqui comigo ficou assim, conforme sugerido, mas o problema persiste, quanto fecho a aplicação não dá erro de imediato, mas apos algum tempo aparece o erro
segue o código
if Application.MessageBox(‘Você tem certeza que deseja realmente sair do sistema?’,’Aguarde!…’,MB_YESNO+MB_ICONQUESTION) = ID_YES then
begin
try
ucMycontrol.free; // Inclui essa linha antes de fechar o form.
//UCApplicationMessage1.Free;
Action :=caFree;
Application.terminate;
except
Action :=caFree;
end;
end else
Action :=caNone;
