Boa tarde, pessoal. Eu estou preso nesse impasse a 12 horas. O programa já está todo pronto, só a música que não toca. Eu consegui fazer uma Thread que toque a música, mas apenas por 1 vez. Se eu colocar um laço nela, ai tenho diversos errors, como o 1400. Parece que a thread não fecha quando se fecha o Form1, pois o problema sempre dá quando eu tento fecha-lo. Eu tenho apenas 2 units. 1 é o Form1 e a outra é a TMusica thread. Como resolvo isso? Já não sei mais o que tentar, já tentei o Goto, While, Repeat, With. Nada funciona, sempre tenho erros desde não compilar por erros de violação de acesso, a erros do programa não fechar e ter que ser matado, a música se chama music.mp3. Uso o Delphi XE8. Como resolvo? 

Obrigado a todos que responderem.