From 452795dc592e539509738f110f54dc97b567e714 Mon Sep 17 00:00:00 2001
From: Uladzimir Karpenka <vladimir@Uladzimirs-MacBook-Pro.local>
Date: Mon, 8 Jun 2026 10:50:24 +0300
Subject: [PATCH] Fix: rewire OnPullMicSamples in RecreateDSPEngine

RecreateDSPEngine rebound OnAudio/OnSpectrum/OnWaterfall/OnTXIQ onto the
freshly created DSP engine but not OnPullMicSamples, so the sound-card mic
path was lost after a sample-rate change. Rebind it alongside the others.

Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
---
 MainForm.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/MainForm.pas b/MainForm.pas
index 8db3f15..91acc2a 100644
--- a/MainForm.pas
+++ b/MainForm.pas
@@ -3535,6 +3535,9 @@ begin
   FController.FDSPEngine.OnSpectrum  := OnSpectrumReady;
   FController.FDSPEngine.OnWaterfall := OnWaterfallReady;
   FController.FDSPEngine.OnTXIQ      := FController.OnTXIQ;
+  // Иначе sound-card mic путь теряется после смены sample rate (колбэк
+  // навешивается в FormCreate, но новый движок про него не знал).
+  FController.FDSPEngine.OnPullMicSamples := FController.PullSoundCardMic;
 end;
 
 function TMainForm.EnsureWDSPWisdom: Boolean;