INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: ""
project: "Visual Eiffel Win32 Library"
revision: "$Revision: 1.1 $"
copyright: "Copyright (C) 1996-2005 Object Tools Group"
license: "http://visual-eiffel.com/license"
cluster: winlib
expanded class ECOM_TYPEFLAGS
inherit

INTEGER
redefine
out
end
feature -- Data

flags: BIT 32
feature -- Integer_values of flags

TYPEFLAG_FAPPOBJECT: INTEGER

TYPEFLAG_FCANCREATE: INTEGER

TYPEFLAG_FLICENSED: INTEGER

TYPEFLAG_FPREDECLID: INTEGER

TYPEFLAG_FHIDDEN: INTEGER

TYPEFLAG_FCONTROL: INTEGER

TYPEFLAG_FDUAL: INTEGER

TYPEFLAG_FNONEXTENSIBLE: INTEGER

TYPEFLAG_FOLEAUTOMATION: INTEGER

TYPEFLAG_FRESTRICTED: INTEGER

TYPEFLAG_FAGGREGATABLE: INTEGER

TYPEFLAG_FREPLACEABLE: INTEGER

TYPEFLAG_FDISPATCHABLE: INTEGER
feature -- Indexes of flags

FAPPOBJECT: INTEGER

FCANCREATE: INTEGER

FLICENSED: INTEGER

FPREDECLID: INTEGER

FHIDDEN: INTEGER

FCONTROL: INTEGER

FDUAL: INTEGER

FNONEXTENSIBLE: INTEGER

FOLEAUTOMATION: INTEGER

FRESTRICTED: INTEGER

FAGGREGATABLE: INTEGER

FREPLACEABLE: INTEGER

FDISPATCHABLE: INTEGER
feature -- Queries

is_FAPPOBJECT: BOOLEAN

is_FCANCREATE: BOOLEAN

is_FLICENSED: BOOLEAN

is_FPREDECLID: BOOLEAN

is_FHIDDEN: BOOLEAN

is_FCONTROL: BOOLEAN

is_FDUAL: BOOLEAN

is_FNONEXTENSIBLE: BOOLEAN

is_FOLEAUTOMATION: BOOLEAN

is_FRESTRICTED: BOOLEAN

is_FAGGREGATABLE: BOOLEAN

is_FREPLACEABLE: BOOLEAN

is_FDISPATCHABLE: BOOLEAN
feature -- Set flags

set_flags (ind: INTEGER)

set_FAPPOBJECT

set_FCANCREATE

set_FLICENSED

set_FPREDECLID

set_FHIDDEN

set_FCONTROL

set_FDUAL

set_FNONEXTENSIBLE

set_FOLEAUTOMATION

set_FRESTRICTED

set_FAGGREGATABLE

set_FREPLACEABLE

set_FDISPATCHABLE
feature -- Out

out: STRING
end -- class ECOM_TYPEFLAGS

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES