Example: lrc_Get<Type-Name>Array_by_refFromVariant

This example gets a short integer array from a variant by reference:

        VARIANT var;
        ShortArray array0;
        ShortArray array1 = 0;
        array0 = Create1DShortArray(0, 5);
        PutElementIn1DShortArray(array0, 0, lrc_short("10"));
        PutElementIn1DShortArray(array0, 1, lrc_short("9"));
        PutElementIn1DShortArray(array0, 2, lrc_short("8"));
        PutElementIn1DShortArray(array0, 3, lrc_short("7"));
        PutElementIn1DShortArray(array0, 4, lrc_short("6"));
        P1 = lrc_variant_ShortArray_by_ref(array0);
        array1 = lrc_GetShortArray_by_refFromVariant(&var);