Editorschriftart auslesen

[Sherlock]

Danke! Probier ich gleich mal aus. Werde berichten ob es geklappt hat.

Sherlock

[Sherlock]

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

[himitsu]

Was liefert dein Code bei NICHT if EditOptionsCount > 0 then

[Sherlock]

Mittlerweile 11Pt Consolas

Ich war so froh, daß es lief, da hab ich die Details erst später rund gemacht.

Sherlock