query_font — Abfragen der verfügbaren Fonts.
query_font( : : WindowHandle : Font)
query_font gibt für das Ausgabefenster die Namen aller
Fonts aus, die für die Textausgabe verwendet werden können. Diese können
mit der entsprechenden Syntax von dem Operator set_font gesetzt
werden. Verwendet werden die Fonts von write_string,
read_char, read_string und new_line.
Die Fonts unterscheiden sich oft stark auf verschiedenen Rechnern.
Man muss i.a. davon ausgehen, dass query_font auf verschiedenen
Rechnern auch verschiedene Fonts liefert.
WindowHandle (input_control) window → (handle)
Fenster-Handle.
Font (output_control) string-array → (string)
Tupel mit verfügbaren Fontnamen.
open_window(0,0,-1,-1,'root','visible','',WindowHandle)
set_check('~text')
query_font(WindowHandle,Fontlist)
set_color(WindowHandle,'white')
for i:=0 to |Fontlist|-1 by 1
set_display_font (WindowHandle,16,Fontlist[i],'true','false')
write_string(WindowHandle,Fontlist[i])
new_line(WindowHandle)
endfor
query_font liefert den Wert 2 (H_MSG_TRUE).
set_font,
write_string,
read_string,
read_char
set_font,
write_string,
read_string,
read_char,
new_line
Foundation