INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Standard dialog box to choose a font. ", "WEL: library of reusable components for Eiffel. ", "Based on WEL library for ISE Eiffel, used with permission. "
project: "Windows Eiffel Library"
copyright: "(c) 1986-1997 Interactive Software Engineering Inc. ", "Modifications and extensions: ", "(c) 1997 Object Tools ", "All rights reserved. Duplication and distribution prohibited", "May be used only with Visual Eiffel under terms of user ", "license "
cluster: wel
class WEL_CHOOSE_FONT_DIALOG
inherit

WEL_STANDARD_DIALOG
rename
make as standard_dialog_make
end

WEL_CF_CONSTANTS
export
{NONE}
all
end

WEL_BIT_OPERATIONS
export
{NONE}
all
end

WEL_FONT_TYPE_CONSTANTS
export
{NONE}
all
{ANY}
valid_font_type_constant
end
creation

make
feature {NONE}-- Initialization

make
-- Make and setup the structure.
-- By default the dialog will show the screen fonts.
feature -- Access

log_font: WEL_LOG_FONT

font_type: INTEGER
-- Type of the selected font.
-- See class WEL_FONT_TYPE_CONSTANTS for values.
require
selected: selected
ensure
valid_font_type: valid_font_type_constant (Result)

point_size: INTEGER
-- Size of the selected font (in units of 1/10 of
-- a point)
require
selected: selected

minimum_size: INTEGER
-- Minimum point size a user can select

maximum_size: INTEGER
-- Maximum point size a user can select

flags: INTEGER
-- Dialog box creation flags.
-- Can be a combination of the values defined in
-- class WEL_CF_CONSTANTS.

color: WEL_COLOR_REF
-- Font color
require
exits: exists
ensure
result_not_void: Result /= void
feature -- Element change

set_dc (a_dc: WEL_DC)
-- Set a device context `a_dc' of the printer whose
-- fonts will be listed in the dialog box.
require
a_dc_not_void: a_dc /= void
a_dc_exists: a_dc.exists

set_log_font (a_log_font: WEL_LOG_FONT)
-- Set `log_font' with `a_log_font'.
require
a_log_font_not_void: a_log_font /= void
ensure
log_font_set: log_font.item = a_log_font.item

set_minimum_size (size: INTEGER)
-- Set `minimum_size' with `size'.
ensure
minimum_size_set: minimum_size = size

set_maximum_size (size: INTEGER)
-- Set `maximum_size' with `size'.
ensure
maximum_size_set: maximum_size = size

set_color (a_color: WEL_COLOR_REF)
-- Set `color' with `a_color'.
ensure
color_set: color.is_equal (a_color)

set_flags (a_flags: INTEGER)
-- Set `flags' with `a_flags'.
-- See class WEL_CF_CONSTANTS for `a_flags' values.
ensure
flags_set: flags = a_flags

add_flag (a_flags: INTEGER)
-- Add `a_flags' to `flags'.
-- See class WEL_CF_CONSTANTS for `a_flags' values.
ensure
has_flag: has_flag (a_flags)

remove_flag (a_flags: INTEGER)
-- Remove `a_flags' from `flags'.
-- See class WEL_CF_CONSTANTS for `a_flags' values.
ensure
has_not_flag: not has_flag (a_flags)
feature -- Status report

has_flag (a_flags: INTEGER): BOOLEAN
-- Is `a_flags' set in `flags'?
-- See class WEL_CF_CONSTANTS for `a_flags' values.
feature -- Basic operations

activate (a_parent: WEL_COMPOSITE_WINDOW)
-- Activate the dialog box (modal mode) with
-- `a_parent' as owner.
feature -- Measurement

structure_size: INTEGER
-- Size to allocate (in bytes)
end -- class WEL_CHOOSE_FONT_DIALOG

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES