Automatic generation produced by ISE Eiffel
note description: "Mswin implementation for objects that represent paragraph formatting information." legal: "See notice at end of class." status: "See notice at end of class." date: "$Date: 2017-03-27 09:23:22 -0800 (Mon, 27 Mar 2017) $" revision: "$Revision: 100056 $" class interface EV_PARAGRAPH_FORMAT_IMP create make -- Initialize Current. ensure -- from EV_ANY_I is_initialized: get_state_flag (Is_initialized_flag) feature -- Access wel_alignment: INTEGER_32 -- Alignment type. -- See class WEL_PFA_CONSTANTS for values. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists Aspect_x: INTEGER_32 = 40 -- Relative width of a device pixel -- used for line drawing -- (from WEL_CAPABILITIES_CONSTANTS) Aspect_x_y: INTEGER_32 = 44 -- Diagonal width of a device pixel -- used for line drawing -- (from WEL_CAPABILITIES_CONSTANTS) Aspect_y: INTEGER_32 = 42 -- Relative height of a device pixel -- used for line drawing -- (from WEL_CAPABILITIES_CONSTANTS) Bits_pixel: INTEGER_32 = 12 -- Number of adjacent color bits for each pixel -- (from WEL_CAPABILITIES_CONSTANTS) border_space: INTEGER_32 -- Space between border and paragraph text in twips. -- Corresponds to wBorderWidth -- (from WEL_PARAGRAPH_FORMAT2) border_width: INTEGER_32 -- Border width in twips. Corresponds to wBorderWidth member. -- (from WEL_PARAGRAPH_FORMAT2) borders: INTEGER_32 -- Border location, style and color. Corresponds to -- wBorder member. -- (from WEL_PARAGRAPH_FORMAT2) Clip_caps: INTEGER_32 = 36 -- See class WEL_CLIPPING_CAPABILITIES_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) Color_resolution: INTEGER_32 = 108 -- Color resolution of the device in bits -- (from WEL_CAPABILITIES_CONSTANTS) Curve_caps: INTEGER_32 = 28 -- See class WEL_CURVE_CAPABILITIES_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) Driver_version: INTEGER_32 = 1 -- Version number of the device driver -- (from WEL_CAPABILITIES_CONSTANTS) Dt_bottom: INTEGER_32 = 8 -- Declared in Windows as DT_BOTTOM -- (from WEL_DT_CONSTANTS) Dt_calcrect: INTEGER_32 = 1024 -- Declared in Windows as DT_CALCRECT -- (from WEL_DT_CONSTANTS) Dt_center: INTEGER_32 = 1 -- Declared in Windows as DT_CENTER -- (from WEL_DT_CONSTANTS) Dt_expandtabs: INTEGER_32 = 64 -- Declared in Windows as DT_EXPANDTABS -- (from WEL_DT_CONSTANTS) Dt_externalleading: INTEGER_32 = 512 -- Declared in Windows as DT_EXTERNALLEADING -- (from WEL_DT_CONSTANTS) Dt_hideprefix: INTEGER_32 = 1048576 -- Declared in Windows as DT_HIDEPREFIX -- (from WEL_DT_CONSTANTS) Dt_internal: INTEGER_32 = 4096 -- Declared in Windows as DT_INTERNAL -- (from WEL_DT_CONSTANTS) Dt_left: INTEGER_32 = 0 -- Declared in Windows as DT_LEFT -- (from WEL_DT_CONSTANTS) Dt_noclip: INTEGER_32 = 256 -- Declared in Windows as DT_NOCLIP -- (from WEL_DT_CONSTANTS) Dt_noprefix: INTEGER_32 = 2048 -- Declared in Windows as DT_NOPREFIX -- (from WEL_DT_CONSTANTS) Dt_right: INTEGER_32 = 2 -- Declared in Windows as DT_RIGHT -- (from WEL_DT_CONSTANTS) Dt_singleline: INTEGER_32 = 32 -- Declared in Windows as DT_SINGLELINE -- (from WEL_DT_CONSTANTS) Dt_tabstop: INTEGER_32 = 128 -- Declared in Windows as DT_TABSTOP -- (from WEL_DT_CONSTANTS) Dt_top: INTEGER_32 = 0 -- Declared in Windows as DT_TOP -- (from WEL_DT_CONSTANTS) Dt_vcenter: INTEGER_32 = 4 -- Declared in Windows as DT_VCENTER -- (from WEL_DT_CONSTANTS) Dt_word_ellipsis: INTEGER_32 = 262144 -- Declared in Windows as DT_WORD_ELLIPSIS -- (from WEL_DT_CONSTANTS) Dt_wordbreak: INTEGER_32 = 16 -- Declared in Windows as DT_WORDBREAK -- (from WEL_DT_CONSTANTS) effects: INTEGER_32 -- Effects applicable to Current, corresponding to wEffects member. -- (from WEL_PARAGRAPH_FORMAT2) generating_type: TYPE [detachable EV_PARAGRAPH_FORMAT_IMP] -- Type of current object -- (type of which it is a direct instance) -- (from ANY) ensure -- from ANY generating_type_not_void: Result /= Void generator: STRING_8 -- Name of current object's generating class -- (base class of the type of which it is a direct instance) -- (from ANY) ensure -- from ANY generator_not_void: Result /= Void generator_not_empty: not Result.is_empty Himetric_per_inch: INTEGER_32 = 2540 -- Defined as HIMETRIC_PER_INCH in AtlWin.h -- (from WEL_UNIT_CONVERSION) Horizontal_resolution: INTEGER_32 = 8 -- Width of the display, in pixels -- (from WEL_CAPABILITIES_CONSTANTS) Horizontal_size: INTEGER_32 = 4 -- Width of the physical display in millimeters -- (from WEL_CAPABILITIES_CONSTANTS) item: POINTER -- Generic Windows handle or structure pointer. -- Can be a HWND, HICON, RECT *, WNDCLASS *, etc... -- (from WEL_ANY) Line_caps: INTEGER_32 = 30 -- See class WEL_LINE_CAPABILITIES_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) line_spacing: INTEGER_32 -- Size of spacing between lines. Corresponds to -- dyLineSpacing member. -- (from WEL_PARAGRAPH_FORMAT2) line_spacing_rule: INTEGER_32 -- Type of line spacing. Corresponds to bLineSpacingRule member. -- (from WEL_PARAGRAPH_FORMAT2) Logical_pixels_x: INTEGER_32 = 88 -- Number of pixels per logical inch along -- the display width -- (from WEL_CAPABILITIES_CONSTANTS) Logical_pixels_y: INTEGER_32 = 90 -- Number of pixels per logical inch along -- the display height -- (from WEL_CAPABILITIES_CONSTANTS) make -- Initialize Current. ensure -- from EV_ANY_I is_initialized: get_state_flag (Is_initialized_flag) mask: INTEGER_32 -- Valid information or attributes to set. -- See class WEL_PFM_CONSTANTS for values. -- This attribut is automatically set by the -- features set_*. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists Num_brushes: INTEGER_32 = 16 -- Number of device-specific brushes -- (from WEL_CAPABILITIES_CONSTANTS) Num_colors: INTEGER_32 = 24 -- Number of entries in the device's color table -- (from WEL_CAPABILITIES_CONSTANTS) Num_fonts: INTEGER_32 = 22 -- Number of device-specific fonts -- (from WEL_CAPABILITIES_CONSTANTS) Num_markers: INTEGER_32 = 20 -- Number of device-specific markers -- (from WEL_CAPABILITIES_CONSTANTS) Num_pens: INTEGER_32 = 18 -- Number of device-specific pens -- (from WEL_CAPABILITIES_CONSTANTS) Num_reserved: INTEGER_32 = 106 -- Number of reserved entries in the system palette -- (from WEL_CAPABILITIES_CONSTANTS) numbering: INTEGER_32 -- Numbering type -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists numbering_start: INTEGER_32 -- Starting number for numbered paragraphs. -- Corresponds to wNumberingStart member -- (from WEL_PARAGRAPH_FORMAT2) numbering_style: INTEGER_32 -- Numbering style used with numbered paragraphs. -- Corresponds to the wNumberingStyle member. -- (from WEL_PARAGRAPH_FORMAT2) numbering_tab: INTEGER_32 -- Minimum space between paragraph number and -- paragraph text. Corresponds to wNumberingTab mamber. -- (from WEL_PARAGRAPH_FORMAT2) offset: INTEGER_32 -- Indentation of the second line and subsequent -- lines, relative to the starting indentation. The -- first line is indented if this member is negative, -- or outdented is this member is positive. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists old_make (an_interface: attached like interface) -- Make Current with interface an_interface. require -- from EV_ANY_I an_interface_not_void: an_interface /= Void ensure -- from EV_ANY_I interface_assigned: interface = an_interface base_make_called: base_make_called Pdevice_size: INTEGER_32 = 26 -- Size of the PDEVICE internal structure, in bytes -- (from WEL_CAPABILITIES_CONSTANTS) Pfa_center: INTEGER_32 = 3 -- Paragraphs are centered. -- (from WEL_PFA_CONSTANTS) Pfa_full_interword: INTEGER_32 = 5 -- Paragraphs are justified by expanding blanks alone. -- (from WEL_PFA_CONSTANTS) Pfa_justify: INTEGER_32 = 4 -- Paragraphs are justified. -- (from WEL_PFA_CONSTANTS) Pfa_left: INTEGER_32 = 1 -- Paragraphs are aligned with the left margin. -- (from WEL_PFA_CONSTANTS) Pfa_right: INTEGER_32 = 2 -- Paragraphs are aligned with the right margin. -- (from WEL_PFA_CONSTANTS) Pfm_alignment: INTEGER_32 = 8 -- The wAlignment member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_border: INTEGER_32 = 2048 -- The wBorderSpace, wBorderWidth and wBorders members are valid. -- (from WEL_PFM_CONSTANTS) Pfm_linespacing: INTEGER_32 = 256 -- The dyLineSpacing member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_numbering: INTEGER_32 = 32 -- The wNumbering member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_numberingstart: INTEGER_32 = 32768 -- The wNumberingStart member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_numberingstyle: INTEGER_32 = 8092 -- The wNumberingStyle member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_numberingtab: INTEGER_32 = 16384 -- The wNumberingTab member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_offset: INTEGER_32 = 4 -- The dxStartIndent member is valid and specifies -- a relative value. -- (from WEL_PFM_CONSTANTS) Pfm_offsetindent: INTEGER_32 = -2147483648 -- The dxOffset member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_rightindent: INTEGER_32 = 2 -- The dxRightIndent member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_shading: INTEGER_32 = 4096 -- The wShadingStyle and wShadingWeight members arevalid. -- (from WEL_PFM_CONSTANTS) Pfm_spaceafter: INTEGER_32 = 128 -- The dySpaceAfter member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_spacebefore: INTEGER_32 = 64 -- The dySpaceBefore member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_startindent: INTEGER_32 = 1 -- The dxStartIndent member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_style: INTEGER_32 = 512 -- The sStyle member is valid. -- (from WEL_PFM_CONSTANTS) Pfm_tabstops: INTEGER_32 = 16 -- The cTabStobs and rgxTabStops members are valid. -- (from WEL_PFM_CONSTANTS) Physical_offset_x: INTEGER_32 = 112 -- Distance from left edge of the printable area, in -- device units. -- (from WEL_CAPABILITIES_CONSTANTS) Physical_offset_y: INTEGER_32 = 113 -- Distance from top edge of the printable area, in -- device units. -- (from WEL_CAPABILITIES_CONSTANTS) Planes: INTEGER_32 = 14 -- Number of color planes -- (from WEL_CAPABILITIES_CONSTANTS) Polygonal_caps: INTEGER_32 = 32 -- See class WEL_POLYGONAL_CAPABILITIES_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) Raster_caps: INTEGER_32 = 38 -- See class WEL_RASTER_CAPABILITIES_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) right_indent: INTEGER_32 -- Size of the right indentation, relative to the right -- margin -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists Scaling_factor_x: INTEGER_32 = 114 -- Scaling factor for the x-axis of the printer. -- (from WEL_CAPABILITIES_CONSTANTS) Scaling_factor_y: INTEGER_32 = 115 -- Scaling factor for the y-axis of the printer. -- (from WEL_CAPABILITIES_CONSTANTS) shading_style: INTEGER_32 -- Style and colors used for background shading. -- Corresponds to wShadingStyle member. -- (from WEL_PARAGRAPH_FORMAT2) shading_weight: INTEGER_32 -- Percentage of foreground color used in shading. -- Corresponds to wShadingWeight member. -- (from WEL_PARAGRAPH_FORMAT2) Size_palette: INTEGER_32 = 104 -- Number of entries in the system palette -- (from WEL_CAPABILITIES_CONSTANTS) space_after: INTEGER_32 -- Size of spacing after paragraph in twips. Corresponds to -- dySpaceAfter member. -- (from WEL_PARAGRAPH_FORMAT2) space_before: INTEGER_32 -- Size of spacing before paragraph in twips. Corresponds to -- dySpaceBefore member. -- (from WEL_PARAGRAPH_FORMAT2) start_indent: INTEGER_32 -- Indentation of the first line in the paragraph -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists style: INTEGER_32 -- Text style. Corresponds to sStyle member. -- (from WEL_PARAGRAPH_FORMAT2) tabulations: ARRAY [INTEGER_32] -- Contains tab stops -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT result_not_void: Result /= Void Technology: INTEGER_32 = 2 -- Device technology. -- See class WEL_DEVICE_TECHNOLOGY_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) Text_caps: INTEGER_32 = 34 -- See class WEL_TEXT_CAPABILITIES_CONSTANTS -- (from WEL_CAPABILITIES_CONSTANTS) Vertical_resolution: INTEGER_32 = 10 -- Height of the display, in raster lines -- (from WEL_CAPABILITIES_CONSTANTS) Vertical_size: INTEGER_32 = 6 -- Height of the physical display in millimeters -- (from WEL_CAPABILITIES_CONSTANTS) feature -- Measurement max_tab_stops: INTEGER_32 -- (from WEL_PARAGRAPH_FORMAT) Structure_size: INTEGER_32 -- Size to allocate (in bytes) -- (from WEL_PARAGRAPH_FORMAT2) require -- from WEL_STRUCTURE True ensure -- from WEL_STRUCTURE positive_result: Result > 0 feature -- Comparison frozen deep_equal (a: detachable ANY; b: like arg #1): BOOLEAN -- Are a and b either both void -- or attached to isomorphic object structures? -- (from ANY) ensure -- from ANY instance_free: class shallow_implies_deep: standard_equal (a, b) implies Result both_or_none_void: (a = Void) implies (Result = (b = Void)) same_type: (Result and (a /= Void)) implies (b /= Void and then a.same_type (b)) symmetric: Result implies deep_equal (b, a) frozen equal (a: detachable ANY; b: like arg #1): BOOLEAN -- Are a and b either both void or attached -- to objects considered equal? -- (from ANY) ensure -- from ANY instance_free: class definition: Result = (a = Void and b = Void) or else ((a /= Void and b /= Void) and then a.is_equal (b)) frozen is_deep_equal alias "≡≡≡" (other: EV_PARAGRAPH_FORMAT_IMP): BOOLEAN -- Are Current and other attached to isomorphic object structures? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY shallow_implies_deep: standard_is_equal (other) implies Result same_type: Result implies same_type (other) symmetric: Result implies other.is_deep_equal (Current) frozen standard_equal (a: detachable ANY; b: like arg #1): BOOLEAN -- Are a and b either both void or attached to -- field-by-field identical objects of the same type? -- Always uses default object comparison criterion. -- (from ANY) ensure -- from ANY instance_free: class definition: Result = (a = Void and b = Void) or else ((a /= Void and b /= Void) and then a.standard_is_equal (b)) frozen standard_is_equal alias "≜" (other: EV_PARAGRAPH_FORMAT_IMP): BOOLEAN -- Is other attached to an object of the same type -- as current object, and field-by-field identical to it? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY same_type: Result implies same_type (other) symmetric: Result implies other.standard_is_equal (Current) feature -- Status report alignment: INTEGER_32 -- Current alignment. See EV_PARAGRAPH_CONSTANTS -- for possible values. bottom_spacing: INTEGER_32 -- Spacing between bottom of paragraph and next line in pixels. conforms_to (other: ANY): BOOLEAN -- Does type of current object conform to type -- of other (as per Eiffel: The Language, chapter 13)? -- (from ANY) require -- from ANY other_not_void: other /= Void exists: BOOLEAN -- Does the `item` exist? -- (from WEL_ANY) ensure -- from WEL_ANY Result = (item /= default_pointer) flag_set (flags, mask: INTEGER_32): BOOLEAN -- Is `mask` set in flags? -- (from WEL_BIT_OPERATIONS) has_mask (a_mask: INTEGER_32): BOOLEAN -- Is a_mask set in `mask`? -- See class WEL_PFM_CONSTANTS for a_mask values. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists is_destroyed: BOOLEAN -- Is Current no longer usable? -- (from EV_ANY_I) left_margin: INTEGER_32 -- Left margin between border and text in pixels. right_margin: INTEGER_32 -- Right margin between line end and border in pixels. same_type (other: ANY): BOOLEAN -- Is type of current object identical to type of other? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY definition: Result = (conforms_to (other) and other.conforms_to (Current)) shared: BOOLEAN -- Is `item` shared by another object? -- If False (by default), `item` will -- be destroyed by destroy_item. -- If True, `item` will not be destroyed. -- (from WEL_ANY) top_spacing: INTEGER_32 -- Spacing between top of paragraph and previous line in pixels. feature -- Status setting set_alignment (an_alignment: INTEGER_32) -- Assign an_alignment to `alignment. ensure -- from EV_PARAGRAPH_FORMAT_I alignment_set: alignment = an_alignment set_bottom_spacing (a_spacing: INTEGER_32) -- Set `bottom_spacing` to a_spacing. require -- from EV_PARAGRAPH_FORMAT_I spacing_non_negative: a_spacing >= 0 ensure -- from EV_PARAGRAPH_FORMAT_I spacing_set: bottom_spacing = a_spacing set_left_margin (a_margin: INTEGER_32) -- Set `left_margin` to a_margin. require -- from EV_PARAGRAPH_FORMAT_I margin_non_negative: a_margin >= 0 ensure -- from EV_PARAGRAPH_FORMAT_I margin_set: left_margin = a_margin set_right_margin (a_margin: INTEGER_32) -- Set `right_margin` to a_margin. require -- from EV_PARAGRAPH_FORMAT_I margin_non_negative: a_margin >= 0 ensure -- from EV_PARAGRAPH_FORMAT_I margin_set: right_margin = a_margin set_shared -- Set `shared` to True. -- (from WEL_ANY) ensure -- from WEL_ANY shared: shared set_top_spacing (a_spacing: INTEGER_32) -- Set `top_spacing` to a_spacing. require -- from EV_PARAGRAPH_FORMAT_I spacing_non_negative: a_spacing >= 0 ensure -- from EV_PARAGRAPH_FORMAT_I spacing_set: top_spacing = a_spacing set_unshared -- Set `shared` to False. -- (from WEL_ANY) ensure -- from WEL_ANY unshared: not shared feature -- Element change add_mask (a_mask: INTEGER_32) -- Add a_mask to `mask`. -- See class WEL_PFM_CONSTANTS for a_mask values. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT has_mask: has_mask (a_mask) bullet_numbering -- Add bullets. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT bullet_numbering: numbering = pfn_bullet no_numbering -- Remove any numbering. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT no_numbering: numbering = 0 remove_mask (a_mask: INTEGER_32) -- Remove a_mask from `mask`. -- See class WEL_PFM_CONSTANTS for a_mask values. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT has_not_mask: not has_mask (a_mask) wel_set_alignment (an_alignment: INTEGER_32) -- Set `alignment` with an_alignment. -- See class WEL_PFA_CONSTANTS for values. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT alignment_set: wel_alignment = an_alignment set_border_space (a_space: INTEGER_32) -- Set `border_space` to a_space. -- (from WEL_PARAGRAPH_FORMAT2) set_border_width (a_width: INTEGER_32) -- Set `border_width` to a_width. -- (from WEL_PARAGRAPH_FORMAT2) set_borders (a_border: INTEGER_32) -- Set `borders` to a_border. -- (from WEL_PARAGRAPH_FORMAT2) set_center_alignment -- Paragraphs are centered. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT alignment_set: wel_alignment = Pfa_center set_default_tabulation -- Set the default tabulation. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists set_effects (an_effects: INTEGER_32) -- Set `effects` to an_effects. -- (from WEL_PARAGRAPH_FORMAT2) ensure -- from WEL_PARAGRAPH_FORMAT2 effects_set: effects = an_effects set_item (an_item: POINTER) -- Set `item` with an_item -- (from WEL_ANY) ensure -- from WEL_ANY item_set: item = an_item set_left_alignment -- Paragraphs are aligned with the left margin. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT alignment_set: wel_alignment = Pfa_left set_line_spacing (space: INTEGER_32) -- Set `line_spacing` to space. -- (from WEL_PARAGRAPH_FORMAT2) ensure -- from WEL_PARAGRAPH_FORMAT2 space_set: line_spacing = space set_line_spacing_rule (a_rule: INTEGER_32) -- Set `line_spacing_rule` to a_rule. -- (from WEL_PARAGRAPH_FORMAT2) set_mask (a_mask: INTEGER_32) -- Set `mask` with a_mask. -- See class WEL_PFM_CONSTANTS for a_mask values. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT mask_set: mask = a_mask set_numbering_start (a_start: INTEGER_32) -- Set `numbering_start` to a_start. -- (from WEL_PARAGRAPH_FORMAT2) set_numbering_style (a_style: INTEGER_32) -- Set `numbering_style` to a_style. -- (from WEL_PARAGRAPH_FORMAT2) set_numbering_tab (a_tab: INTEGER_32) -- Set `numbering_tab` to a_tab. -- (from WEL_PARAGRAPH_FORMAT2) set_offset (an_offset: INTEGER_32) -- Set `offset` with an_offset. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT offset_set: offset = an_offset set_right_alignment -- Paragraphs are aligned with the right margin. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT alignment_set: wel_alignment = Pfa_right set_right_indent (a_right_indent: INTEGER_32) -- Set `right_indent` with a_right_indent. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT right_indent_set: right_indent = a_right_indent set_shading_style (a_style: INTEGER_32) -- Set `shading_style` to a_style. -- (from WEL_PARAGRAPH_FORMAT2) set_shading_weight (a_weight: INTEGER_32) -- Set shading_widget to a_weight. -- (from WEL_PARAGRAPH_FORMAT2) set_space_after (space: INTEGER_32) -- Set `space_after` to space. -- (from WEL_PARAGRAPH_FORMAT2) ensure -- from WEL_PARAGRAPH_FORMAT2 space_set: space_after = space set_space_before (space: INTEGER_32) -- Set `space_before` to space. -- (from WEL_PARAGRAPH_FORMAT2) ensure -- from WEL_PARAGRAPH_FORMAT2 space_set: space_before = space set_start_indent (a_start_indent: INTEGER_32) -- Set `start_indent` with a_start_indent. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists ensure -- from WEL_PARAGRAPH_FORMAT start_indent_set: start_indent = a_start_indent set_style (a_style: INTEGER_32) -- Set `style` to a_style. -- (from WEL_PARAGRAPH_FORMAT2) set_tabulation (tab: INTEGER_32) -- Set a tab stop at every tab. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists set_tabulations (tabs: ARRAY [INTEGER_32]) -- Set tabulation stops using the values of tabs. -- (from WEL_PARAGRAPH_FORMAT) require -- from WEL_PARAGRAPH_FORMAT exists: exists tabs_not_void: tabs /= Void tabs_count: tabs.count <= max_tab_stops ensure -- from WEL_PARAGRAPH_FORMAT tabulations_set: tabulations.same_items (tabs) feature -- Removal dispose -- Destroy the inner structure of Current. -- -- This function should be called by the GC when the -- object is collected or by the user if Current is -- no more usefull. -- (from WEL_ANY) feature -- Duplication frozen deep_copy (other: EV_PARAGRAPH_FORMAT_IMP) -- Effect equivalent to that of: -- `copy` (other . `deep_twin`) -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY deep_equal: deep_equal (Current, other) frozen deep_twin: EV_PARAGRAPH_FORMAT_IMP -- New object structure recursively duplicated from Current. -- (from ANY) ensure -- from ANY deep_twin_not_void: Result /= Void deep_equal: deep_equal (Current, Result) frozen standard_copy (other: EV_PARAGRAPH_FORMAT_IMP) -- Copy every field of other onto corresponding field -- of current object. -- (from ANY) require -- from ANY other_not_void: other /= Void type_identity: same_type (other) ensure -- from ANY is_standard_equal: standard_is_equal (other) frozen standard_twin: EV_PARAGRAPH_FORMAT_IMP -- New object field-by-field identical to other. -- Always uses default copying semantics. -- (from ANY) ensure -- from ANY standard_twin_not_void: Result /= Void equal: standard_equal (Result, Current) frozen twin: EV_PARAGRAPH_FORMAT_IMP -- New object equal to Current -- `twin` calls `copy`; to change copying/twinning semantics, redefine `copy`. -- (from ANY) ensure -- from ANY twin_not_void: Result /= Void is_equal: Result ~ Current feature -- Basic operations clear_flag (flags, mask: INTEGER_32): INTEGER_32 -- Clear the `mask` in flags -- (from WEL_BIT_OPERATIONS) ensure -- from WEL_BIT_OPERATIONS flag_unset: not flag_set (Result, mask) copy (other: EV_PARAGRAPH_FORMAT_IMP) -- Update current object using fields of object attached -- to other, so as to yield equal objects. -- (from WEL_STRUCTURE) require -- from ANY other_not_void: other /= Void type_identity: same_type (other) ensure -- from ANY is_equal: Current ~ other frozen default: detachable EV_PARAGRAPH_FORMAT_IMP -- Default value of object's type -- (from ANY) frozen default_pointer: POINTER -- Default value of type POINTER -- (Avoid the need to write p.`default` for -- some p of type POINTER.) -- (from ANY) ensure -- from ANY instance_free: class default_rescue -- Process exception for routines with no Rescue clause. -- (Default: do nothing.) -- (from ANY) frozen do_nothing -- Execute a null action. -- (from ANY) ensure -- from ANY instance_free: class wel_initialize -- Fill Current with zeros. -- (from WEL_STRUCTURE) require -- from WEL_STRUCTURE exists: exists initialize_with_character (a_character: CHARACTER_8) -- Fill current with a_character. -- (from WEL_STRUCTURE) require -- from WEL_STRUCTURE exists: exists is_equal (other: EV_PARAGRAPH_FORMAT_IMP): BOOLEAN -- Is other attached to an object considered -- equal to current object? -- (from WEL_STRUCTURE) require -- from ANY other_not_void: other /= Void ensure -- from ANY symmetric: Result implies other ~ Current consistent: standard_is_equal (other) implies Result memory_copy (source_pointer: POINTER; length: INTEGER_32) -- Copy length bytes from source_pointer to `item`. -- (from WEL_STRUCTURE) require -- from WEL_STRUCTURE length_small_enough: length <= Structure_size length_large_enough: length > 0 exists: exists set_flag (flags, mask: INTEGER_32): INTEGER_32 -- Set the `mask` in flags -- (from WEL_BIT_OPERATIONS) ensure -- from WEL_BIT_OPERATIONS flag_set: flag_set (Result, mask) feature -- Basic Operations himetric_to_pixel (a_size_in_himetric: WEL_SIZE): WEL_SIZE -- Convert himetric into pixels. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION non_void_size: a_size_in_himetric /= Void a_size_in_himetric_exists: a_size_in_himetric.exists ensure -- from WEL_UNIT_CONVERSION non_void_result: Result /= Void logical_to_pixel (hdc: WEL_DC; lo: INTEGER_32): INTEGER_32 -- Convert lo expressed in logical unit into pixel unit. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION hdc_not_void: hdc /= Void hdc_exists: hdc.exists logical_to_point (hdc: WEL_DC; lo: INTEGER_32): INTEGER_32 -- Convert a size lo expressed in logical unit into point. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION hdc_not_void: hdc /= Void hdc_exists: hdc.exists map_loghim_to_pixel (x, ppli: INTEGER_32): INTEGER_32 -- Defined as MAP_LOGHIM_TO_PIX in AtlWin.h -- (from WEL_UNIT_CONVERSION) map_pixel_to_loghim (x, ppli: INTEGER_32): INTEGER_32 -- Defined as MAP_PIX_TO_LOGHIM in AtlWin.h -- (from WEL_UNIT_CONVERSION) pixel_to_himetric (a_size_in_pixel: WEL_SIZE): WEL_SIZE -- Convert pixels into himetric. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION non_void_size: a_size_in_pixel /= Void a_size_in_pixel_exists: a_size_in_pixel.exists ensure -- from WEL_UNIT_CONVERSION non_void_result: Result /= Void pixel_to_logical (hdc: WEL_DC; pi: INTEGER_32): INTEGER_32 -- Convert pi expressed in pixel unit into logical unit. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION hdc_not_void: hdc /= Void hdc_exists: hdc.exists pixel_to_point (hdc: WEL_DC; pi: INTEGER_32): INTEGER_32 -- Convert a size pi expressed in pixel into point. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION hdc_not_void: hdc /= Void hdc_exists: hdc.exists point_to_logical (hdc: WEL_DC; pt, divisor: INTEGER_32): INTEGER_32 -- Convert a size pt/divisor expressed in point into logical units. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION hdc_not_void: hdc /= Void hdc_exists: hdc.exists point_to_pixel (hdc: WEL_DC; pt, divisor: INTEGER_32): INTEGER_32 -- Convert a size pt/divisor expressed in point into pixel. -- (from WEL_UNIT_CONVERSION) require -- from WEL_UNIT_CONVERSION hdc_not_void: hdc /= Void hdc_exists: hdc.exists feature -- Output Io: STD_FILES -- Handle to standard file setup -- (from ANY) ensure -- from ANY instance_free: class io_not_void: Result /= Void out: STRING_8 -- New string containing terse printable representation -- of current object -- (from ANY) ensure -- from ANY out_not_void: Result /= Void print (o: detachable ANY) -- Write terse external representation of o -- on standard output. -- (from ANY) ensure -- from ANY instance_free: class frozen tagged_out: STRING_8 -- New string containing terse printable representation -- of current object -- (from ANY) ensure -- from ANY tagged_out_not_void: Result /= Void feature -- Platform Operating_environment: OPERATING_ENVIRONMENT -- Objects available from the operating system -- (from ANY) ensure -- from ANY instance_free: class operating_environment_not_void: Result /= Void invariant -- from EV_ANY_I interface_coupled: is_usable implies interface /= Void and then attached_interface.implementation = Current base_make_called: is_usable implies base_make_called -- from ANY reflexive_equality: standard_is_equal (Current) reflexive_conformance: conforms_to (Current) note copyright: "Copyright (c) 1984-2017, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" source: "[ Eiffel Software 5949 Hollister Ave., Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end -- class EV_PARAGRAPH_FORMAT_IMP -- Generated by Eiffel Studio --
For more details: eiffel.org