From 7cda7bb8baa08d59775bc4cfc5c2deaaf805c217 Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Tue, 6 May 2025 17:32:41 +0200
Subject: [PATCH] IDE: color presets, fix priorities for assembler win
 current-line vs selection

(cherry picked from commit 5e6de8cb95ef1c0644f97038bcb558545a0c4c19)
---
 ide/ColorDefault.xml | 4 ++--
 ide/ColorDelphi.xml  | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/ide/ColorDefault.xml b/ide/ColorDefault.xml
index abb6b32ceb..4db0bad0b5 100644
--- a/ide/ColorDefault.xml
+++ b/ide/ColorDefault.xml
@@ -249,8 +249,8 @@
           <ahaDefault Background="clForm" Foreground="clBlack" UseSchemeGlobals="False"/>
           <ahaAsmSourceFunc Style="fsBold"/>
           <ahaAsmSourceLine Style="fsBold"/>
-          <ahaTextBlock Background="clHighlight" Foreground="clHighlightText" UseSchemeGlobals="False"/>
-          <ahaLineHighlight Foreground="clHighlightText" FrameColor="clBlack" UseSchemeGlobals="False" Background="clHighlight"/>
+          <ahaTextBlock Background="clHighlight" Foreground="clHighlightText" UseSchemeGlobals="False" ForePriority="400" BackPriority="400" FramePriority="400"/>
+          <ahaLineHighlight Foreground="clHighlightText" FrameColor="clBlack" UseSchemeGlobals="False" Background="clHighlight" ForePriority="1000" BackPriority="1000" FramePriority="1000"/>
           <ahaMouseLink Style="fsUnderline" FrameColor="clNone" UseSchemeGlobals="False"/>
           <ahaAsmLinkTarget Foreground="clHotLight"/>
         </SchemeDefault>
diff --git a/ide/ColorDelphi.xml b/ide/ColorDelphi.xml
index cd5ca6f4c3..6359b917a2 100644
--- a/ide/ColorDelphi.xml
+++ b/ide/ColorDelphi.xml
@@ -228,8 +228,8 @@
           <ahaDefault Background="clForm" Foreground="clBlack" UseSchemeGlobals="False"/>
           <ahaAsmSourceFunc Style="fsBold"/>
           <ahaAsmSourceLine Style="fsBold"/>
-          <ahaTextBlock Background="clHighlight" Foreground="clHighlightText" UseSchemeGlobals="False"/>
-          <ahaLineHighlight Foreground="clHighlightText" FrameColor="clBlack" UseSchemeGlobals="False" Background="clHighlight"/>
+          <ahaTextBlock Background="clHighlight" Foreground="clHighlightText" UseSchemeGlobals="False" ForePriority="400" BackPriority="400" FramePriority="400"/>
+          <ahaLineHighlight Foreground="clHighlightText" FrameColor="clBlack" UseSchemeGlobals="False" Background="clHighlight" ForePriority="1000" BackPriority="1000" FramePriority="1000"/>
           <ahaMouseLink Style="fsUnderline" FrameColor="clNone" UseSchemeGlobals="False"/>
           <ahaAsmLinkTarget Foreground="clHotLight"/>
         </SchemeDelphi>