ew8bak/ewsdr
1
0
Fork 0
mirror of https://git.vladimir.cc/vladimir/ewsdr.git synced 2026-08-25 18:43:51 +00:00
Code Issues Packages Projects Releases Wiki Activity

fix waterfall init color to match surrounding panel

Browse Source 
Empty waterfall now fills with FTheme.Panel (same color as PanelRight)
instead of FTheme.BG, so there's no visible seam before stream starts.
Correct TColor→BGRA conversion (R/B swap) applied.

Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
ew8bak
2026-05-02 21:48:12 +03:00
co-authored by Claude Sonnet 4.6
parent d5000ac99f
commit fa38e433e1
1 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
SpectrumView.pas
+7 -2
View File
@@ -834,7 +834,12 @@ begin
begin
FWfBitmapW := W; FWfBitmapH := H;
SetLength(FWfPixels, W * H);
FillDWord(FWfPixels[0], W * H, 0);
// TColor = $00BBGGRR → waterfall pixel = $FF_RR_GG_BB (swap R и B)
Pal := $FF000000
or ((LongWord(FTheme.Panel) and $FF) shl 16)
or (LongWord(FTheme.Panel) and $FF00)
or ((LongWord(FTheme.Panel) shr 16) and $FF);
FillDWord(FWfPixels[0], W * H, Pal);
FWfBitmap.SetSize(W, H);
FreeAndNil(FWfIntfImg);
end;
@@ -1171,7 +1176,7 @@ begin
if (FWfBitmap <> nil) and (FWfBitmap.Width = W) and (FWfBitmap.Height = H) then
PB.Canvas.Draw(0, 0, FWfBitmap)
else begin
PB.Canvas.Brush.Color := clBlack;
PB.Canvas.Brush.Color := FTheme.Panel;
PB.Canvas.FillRect(Rect(0, 0, W, H));
end;
if FMarkerActive then DrawMarkerLine(PB.Canvas, W, H);