Klappt prima. Habe die TLiveBlameEditorPanel.PaintBoxPaint Methode um folgendes ergänzt:
Code:
try
// Ungefähr so gefunden bei David Hoyle - https://github.com/Embarcadero/OTAPI-Docs/blob/main/The%20Delphi%20IDE%20Open%20Tools%20API%20-%20Version%201.2.md
With (BorlandIDEServices As IOTAEditorServices) Do
if EditOptionsCount > 0 then
begin
FontName := EditorOptions[0].FontName;
FontSize := EditorOptions[0].FontSize;
end;
except
FontName := 'Consolas';
FontSize := 11;
end;
Und verwende die beiden Fonteigenschaften wo gebraucht. Das ging viel schneller als erwartet. Dann schau ich mir mal an, warum das Styling für den Tooltip ab 10.3 nicht mehr funktioniert.
Sherlock