变体类型 Variant VARIANT

变体类型 Variant VARIANT

class RTL_DELPHIRETURN Variant: public TVarData

typedef struct    tagVARIANT  VARIANT;

Variant Arrays

V: Variant;

V := VarArrayCreate([0,9], varInteger);

 CreateOleObject("ss.comds"); 
OleFunction