query_fontT_query_fontQueryFontquery_fontQueryFontQueryFont (Operator)

Name

query_fontT_query_fontQueryFontquery_fontQueryFontQueryFont — Query the available fonts.

Signature

query_font( : : WindowHandle : Font)

Description

query_fontquery_fontQueryFontquery_fontQueryFontQueryFont queries the fonts available for text output in the output window. They can be set with the operator set_fontset_fontSetFontset_fontSetFontSetFont. Fonts are used by the operators write_stringwrite_stringWriteStringwrite_stringWriteStringWriteString, read_charread_charReadCharread_charReadCharReadChar, read_stringread_stringReadStringread_stringReadStringReadString and new_linenew_lineNewLinenew_lineNewLineNewLine.

Attention

For different machines the available fonts may differ a lot. Therefore query_fontquery_fontQueryFontquery_fontQueryFontQueryFont will return different fonts on different machines.

Parallelization

Multithreading type: reentrant (runs in parallel with non-exclusive operators).
Multithreading scope: global (may be called from any thread).
Processed without parallelization.

Parameters

WindowHandleWindowHandleWindowHandleWindowHandleWindowHandlewindowHandle (input_control) window → (integer)

Window identifier.

FontFontFontFontFontfont (output_control) string-array → (string)

Tuple with available font names.

Example (HDevelop)

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_font(WindowHandle,Fontlist[i])
  write_string(WindowHandle,Fontlist[i])
  new_line(WindowHandle)
endfor

Example (C)

open_window(0,0,-1,-1,"root","visible","",&WindowHandle) ;
set_check("~text") ;
create_tuple(&Fontlist,1) ;
create_tuple(&String,1) ;
create_tuple(&WindowHandleTuple,1) ;
set_i(WindowHandleTuple,WindowHandle,0) ;
T_query_font(WindowHandleTuple,&Fontlist) ;
set_color(WindowHandle,"white") ;
for(i=0; i<length_tuple(Fontlist); i++) ;
{
  charstring = get_s(Fontlist,i) ;
  set_font(WindowHandle,charstring) ;
  set_s(String,charstring,0) ;
  T_write_string(WindowHandleTuple,String) ;
  new_line(WindowHandle) ;
}

Example (HDevelop)

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_font(WindowHandle,Fontlist[i])
  write_string(WindowHandle,Fontlist[i])
  new_line(WindowHandle)
endfor

Example (HDevelop)

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_font(WindowHandle,Fontlist[i])
  write_string(WindowHandle,Fontlist[i])
  new_line(WindowHandle)
endfor

Example (HDevelop)

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_font(WindowHandle,Fontlist[i])
  write_string(WindowHandle,Fontlist[i])
  new_line(WindowHandle)
endfor

Example (HDevelop)

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_font(WindowHandle,Fontlist[i])
  write_string(WindowHandle,Fontlist[i])
  new_line(WindowHandle)
endfor

Result

query_fontquery_fontQueryFontquery_fontQueryFontQueryFont returns 2 (H_MSG_TRUE).

Possible Predecessors

open_windowopen_windowOpenWindowopen_windowOpenWindowOpenWindow, open_textwindowopen_textwindowOpenTextwindowopen_textwindowOpenTextwindowOpenTextwindow

Possible Successors

set_fontset_fontSetFontset_fontSetFontSetFont, write_stringwrite_stringWriteStringwrite_stringWriteStringWriteString, read_stringread_stringReadStringread_stringReadStringReadString, read_charread_charReadCharread_charReadCharReadChar

Module

Foundation

Operators