Einige der dort beschriebenen Befehle, die Texte auslesen sollen, funktionieren nur, wenn Cleartype abgeschaltet ist.
Dies kann man auch mit einem internen Befehl des MPR machen.
Dazu gibt es die folgenden Befehle mit denen man "Cleartype" und "Font Smoothing" beeinflussen kann.
In der aktuellen Version des MPR ist hier noch kein "Redraw" (Neuzeichnen) des Bildschirms eingebaut,
daher sollte man diese Befehle ganz zu Anfang aufrufen bevor man das Programm startet,
das man ggf. graphisch steuern möchte.
Zum nächsten Update ist hier eine Änderung vorgesehen, in dem der Befehl sofort ein Redraw macht.
An der Befehls-Syntax ändert sich dazu nichts.
Wer eine Bildschirmlupe hat, kann damit den Effekt auf das Schriftbild sofort sehen.
Die folgenden Befehle sind hierzu im MPR verfügbar:
1. Font-Smoothing an/aus
Code: Select all
' Fontsmoothing aus
GRN\g_set_fontsmoothing|0
' Fontsmoothing an
GRN\g_set_fontsmoothing|1
Code: Select all
' Cleartype aus
GRN\g_set_cleartype|0
' Cleartype an
GRN\g_set_cleartype|1
Code: Select all
' Die Variable $$VAR enthält nach dem Aufruf den Text "Cleartype" oder "Standard"
' je nach dem was im System eingestellt ist.
GRN.g_get_fontsmoothingtype|>$$VAR
Mit diesen Befehlen kann man abfragen was man mit den Befehlen oben gesetzt hat.
Code: Select all
' Die Variable $$CLT enthält 0 oder 1
GRN.g_get_cleartype|>$$CLT
Code: Select all
' Die Variable $$FSM enthält 0 oder 1
GRN.g_get_fontsmoothing|>$$FSM
Also zum Beispiel "sfs." statt der Langform "g_set_fontsmoothing".
Code: Select all
KRM\2
' Font-Smoothing und Cleartype setzen
GRN\sfs.|0
GRN\sct.|0
GRN\gfs.|>$$FSM
GRN\gfs.|>$$CLT
MBX\$$FSM-$$CLT
' Font-Smoothing und Cleartype abfragen
GRN\sfs.|1
GRN\sct.|1
GRN\gfs.|>$$FSM
GRN\gfs.|>$$CLT
MBX\$$FSM-$$CLT
@
Es wird hier jedoch Verbesserungen geben mit den nächsten Updates.