mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-26 04:47:35 +00:00
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>
This commit is contained in:
@@ -2051,6 +2051,7 @@ var
|
|||||||
OldTXSel: string;
|
OldTXSel: string;
|
||||||
begin
|
begin
|
||||||
Names := TStringList.Create;
|
Names := TStringList.Create;
|
||||||
|
FLoading := True;
|
||||||
try
|
try
|
||||||
if AudioOut <> nil then
|
if AudioOut <> nil then
|
||||||
begin
|
begin
|
||||||
@@ -2098,6 +2099,7 @@ begin
|
|||||||
else FCmbTXDev.ItemIndex := 0;
|
else FCmbTXDev.ItemIndex := 0;
|
||||||
end;
|
end;
|
||||||
finally
|
finally
|
||||||
|
FLoading := False;
|
||||||
Names.Free;
|
Names.Free;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|||||||
Reference in New Issue
Block a user