INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

project: "Visual Eiffel COM"
copyright: "Object Tools, 1998"
version: 1.0
key: "COM"
cluster: ecom
class ECOM_CONVERSION_SERVER
inherit

RTS_SERVER
end
feature -- to Eiffel types conversion

boolean2variant_bool (b: BOOLEAN): INTEGER

variant_bool2boolean (vb: INTEGER): BOOLEAN

VB_TRUE: ECOM_VARIANT_BOOL

VB_FALSE: ECOM_VARIANT_BOOL
feature -- to VARIANT conversion

int2var (val: INTEGER): ECOM_VARIANT

char2var (val: CHARACTER): ECOM_VARIANT

short2var (val: RTS_SHORT_INTEGER): ECOM_VARIANT

dbl2var (val: DOUBLE): ECOM_VARIANT

bool2var (val: BOOLEAN): ECOM_VARIANT

str2var (val: STRING): ECOM_VARIANT

punk2var (val: expanded ECOM_CLIENT_IUNKNOWN): ECOM_VARIANT

pdisp2var (val: expanded ECOM_CLIENT_IDISPATCH): ECOM_VARIANT
end -- class ECOM_CONVERSION_SERVER

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES