From 3b62a502e22ad04bd37594547b806031a9fd2d25 Mon Sep 17 00:00:00 2001
From: Uladzimir Karpenka <i@vladimir.cc>
Date: Tue, 26 May 2026 19:47:35 +0300
Subject: [PATCH] Fix audio device not restored in settings: suppress callbacks
 during RefreshAudioDevices

RefreshAudioDevices was firing OnRXDevChange/OnTXDevChange when restoring
the combo selection, which called ApplyAudioDevice(-1,'') and wiped
FAudioOutDevName/FAudioInDevName before LoadValues could use them.

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
---
 SettingsForm.pas | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/SettingsForm.pas b/SettingsForm.pas
index 0440926..a6f8a10 100644
--- a/SettingsForm.pas
+++ b/SettingsForm.pas
@@ -2051,6 +2051,7 @@ var
   OldTXSel: string;
 begin
   Names := TStringList.Create;
+  FLoading := True;
   try
     if AudioOut <> nil then
     begin
@@ -2098,6 +2099,7 @@ begin
       else FCmbTXDev.ItemIndex := 0;
     end;
   finally
+    FLoading := False;
     Names.Free;
   end;
 end;