Changeset 680

Timestamp:

Jul 26, 2025, 6:17:09 PM (17 hours ago)

Author:

chronos

Message:

• Fixed: Memory leaks from music player on application termination.

Location:

trunk

Files:

• Music.pas (modified) (1 diff)
• Packages/uos/uos_flat.pas (modified) (1 diff)
• Start.pas (modified) (1 diff)

trunk/Music.pas

@@ -250 +250 @@
   if PlayerIndex1 >= 0 then begin
     Initialize;
+    uos_EndProc(PlayerIndex1, nil);
     uos_Stop(PlayerIndex1);
   end;

trunk/Packages/uos/uos_flat.pas

@@ -2655 +2655 @@
   end;
   sleep(100);
+
   uos.uos_free();
 end;

trunk/Start.pas

@@ -332 +332 @@
 procedure TStartDlg.FormDestroy(Sender: TObject);
 begin
+  if MusicPlayer.Playing then MusicPlayer.Stop;
   SaveConfig;
   FreeAndNil(Translator);