• R/O
  • SSH
  • HTTPS

id3v2editorplus: Commit


Commit MetaInfo

Revision48 (tree)
Time2020-03-22 04:38:37
Authorderekwildstar

Log Message

Corrigido erro que acontecia ao trocar de faixa com a música em execução
Ajustados os posicionamentos de alguns botões

Change Summary

Incremental Difference

--- trunk/V2/src/UClassesETipos.pas (revision 47)
+++ trunk/V2/src/UClassesETipos.pas (revision 48)
@@ -867,7 +867,7 @@
867867 FSaidaPosterior.Caption := Items[FIndice].Versos[1].Texto
868868 else
869869 FSaidaPosterior.Caption := '######## FIM ########';
870- end
870+ end
871871 else
872872 for var i: Word := 0 to Pred(Items[FIndice].Versos.Count) do
873873 if Items[FIndice].Versos[i].Tempo = APosicao then
--- trunk/V2/src/UDAMOPrincipal.pas (revision 47)
+++ trunk/V2/src/UDAMOPrincipal.pas (revision 48)
@@ -416,11 +416,11 @@
416416 if FIndiceDoArquivoAtual = -1 then
417417 Exit;
418418
419- BASSPararReproducao;
420-
421419 FSYLT.FinalizarThread;
422420 TIMEReprodutor.Parar;
423421
422+ BASSPararReproducao;
423+
424424 AtualizarTempoDecorrido(True);
425425
426426 AtualizarBotoesDoReprodutor;
@@ -442,6 +442,7 @@
442442
443443 ContinuarReproducao := AForcarReproducao or BASSEstaReproduzindo;
444444
445+ PararReproducao;
445446 BASSDescarregarStream;
446447
447448 if AUltima then
@@ -790,6 +791,7 @@
790791
791792 ContinuarReproducao := BASSEstaReproduzindo;
792793
794+ PararReproducao;
793795 BASSDescarregarStream;
794796
795797 if APrimeira then
Show on old repository browser