unit WebPageHtml; { WebPageHtml.pas — Встроенный HTML/CSS/JS интерфейс веб-пульта HPSDR. Содержит единственную функцию GetIndexHtml, которая возвращает полную HTML-страницу (одним файлом) для отправки клиенту по HTTP GET /. ИСПРАВЛЕНИЯ: - Кнопка START/STOP добавлена в тулбар 1 (шлёт set_run, зелёная/красная) - Кнопка RX/TX удалена из тулбара 2 - NR/NB/ANF: cur обновляется локально сразу при клике (иначе повторный клик инвертировал уже отправленное значение) - Opus: decodeFrame() правильный метод, async/await - Opus: opQueue буферизует пакеты пока WASM не готов - Opus: AudioContext создаётся только по user gesture (оверлей) - SPANS: только 48K..1536K } {$IFDEF FPC} {$MODE Delphi} {$LONGSTRINGS ON} {$ENDIF} interface function GetIndexHtml: string; implementation function GetIndexHtml: string; begin Result := '' + '' + '' + 'HPSDR Web Remote v2' + '' + '' + '' + '
' + // Тулбар 1: громкость, AGC, режимы, DSP кнопки, START/STOP '
' + '🔊' + '
70
' + '|' + '
RF90dB
' + '|' + '' + '|' + '
TX50
' + '|' + '
' + '' + '' + '' + '' + '' + '' + '' + '|' + '' + '
' + // Тулбар 2: S-метр, VFO A/B, диапазон, CW (кнопка TX/RX убрана) '
' + '' + '
' + '' + '
' + '
' + '' + '' + '' + '
' + '' + '' + '
' + '
' + '
' + '' + '' + '' + '' + '
' + '
' + '
' + '
' + '
' + '
connecting...
' + '
' + ''; end; end.