Get the current font.
::get_font queries the name of the font used in the output window. The font is used by the operators ::write_string, ::read_string etc. The font is set by the operator ::set_font. Text windows as well as windows for image display use fonts. Both types of windows have a default font that can be modified with ::set_system('default_font',Fontname) prior to opening the window. A list of all available fonts can be obtained using ::query_font.
|
WindowHandle (input_control) |
window -> HTuple.long |
| Window identifier. | |
|
Font (output_control) |
string -> char * |
| Name of the current font. | |
get_font(WindowHandle,&CurrentFont) ; set_font(WindowHandle,MyFont) ; create_tuple(&String,1) ; sprintf(buf,"The name of my Font is: %s ",Myfont) ; set_s(String,buf,0) ; T_write_string(TupleWindowHandle,String) ; new_line(WindowHandle) ; set_font(WindowHandle,CurrentFont) ;
::get_font returns H_MSG_TRUE.
::open_window, ::open_textwindow, ::query_font
::set_font, ::query_font, ::open_window, ::open_textwindow, ::set_system
System