次の方法で共有


xlAutoFree/xlAutoFree12

適用対象: Excel 2013 | Office 2013 | Visual Studio

XLL ワークシート関数が XLOPER/ XLOPER12 を返した直後に、XLL がまだ解放する必要があるメモリがあることを示すフラグ セットを使用して、Microsoft Excel によって呼び出されます。 これにより、動的に割り当てられた配列、文字列および外部参照をメモリ リークなしに XLL でワークシートに返せるようになります。 詳細については、「Excel でのメモリ管理」を参照してください。

xlAutoFree12 関数と XLOPER12 データ型は、Excel 2007 以降でサポートされています。

Excel では、XLL がこれらいずれかの関数を実装してエクスポートすることは不要です。 ただし、動的にメモリが割り当てられている、または動的に割り当てられたメモリへのポインタを含んでいる XLOPER または XLOPER12 を XLL 関数が返す場合は、その必要があります。 これらのデータ型に選択するメモリ管理の方法は、XLL 全体での一貫性を確保し、xlAutoFree および xlAutoFree12 の実装方法と矛盾しないようにします。

xlAutoFree/ xlAutoFree12 関数の内部では、Excel へのコールバックは無効化されています。これには 1 つの例外があり、Excel によって割り当てられたメモリを解放するための xlFree の呼び出しは可能です。

void WINAPI xlAutoFree(LPXLOPER pxFree);
void WINAPI xlAutoFree12(LPXLOPER12 pxFree);

パラメーター

pxFree (LPXLOPER in the case of xlAutoFree)

pxFree (LPXLOPER12 in the case of xlAutoFree12)

解放する必要のあるメモリが割り当てられている XLOPER または XLOPER12 へのポインター。

プロパティ値/戻り値

この関数は値を返しません。void を返すように宣言されている必要があります。

注釈

マルチスレッド ブックの再計算を使用するように Excel が構成されている場合、 xlAutoFree/ xlAutoFree12 は、それを返した関数の呼び出しに使用されるのと同じスレッドで呼び出されます。 xlAutoFree/ xlAutoFree12 の呼び出しは、常に、そのスレッドで後続のワークシートのセルが評価される前に行われます。 これにより、XLL でのスレッド セーフな設計が簡単になります。

指定した xlAutoFree/ xlAutoFree12 関数が pxFreexltype フィールドを確認する場合は、xlbitDLLFree ビットがまだ設定されることに注意してください。

実装例 1

の最初のコード\SAMPLES\EXAMPLE\EXAMPLE.Cは、1 つの関数 fArray で動作するように設計された xlAutoFree の非常に具体的な実装を示しています。 一般に、XLL には解放する必要があるメモリを返す関数が 1 つ以上存在します。その場合は、制限の少ない実装が必要です。

実装例 2

2 番目の実装例は、セクション 1.6.3、xl12_Str_example、xl12_Ref_example、および xl12_Multi_example の XLOPER12 の作成例で使用した前提条件に適合します。 その前提条件とは「xlbitDLLFree ビットが設定されているときには、すべての文字列、配列、および外部参照メモリが malloc を使用して動的に割り当てられていて、free の呼び出しで解放する必要がある」ということです。

実装例 3

3 番目の実装例は、malloc を使用して XLOPER12 が割り当てた文字列、外部参照および配列を返す関数をエクスポートした XLL、または XLOPER12 自体も動的に割り当てられた XLL に適合します。 動的に割り当てられた XLOPER12 へのポインターが一方向に返されることで、関数がスレッド セーフであることを保証します。

//////////////////////////////////////////
//       BEGIN EXAMPLE IMPLEMENTATION 1
//////////////////////////////////////////
LPXLOPER12 WINAPI fArray(void)
{
    LPXLOPER12 pxArray;
    static XLOPER12 xMulti;
    int i;
    int rwcol;
    xMulti.xltype = xltypeMulti | xlbitDLLFree;
    xMulti.val.array.columns = 1;
    xMulti.val.array.rows = 8;
    // For large values of rows and columns, this would overflow
    // use __int64 in that case and return an error if rwcol
    // contains a number that won't fit in sizeof(int) bytes
    rwcol = xMulti.val.array.columns * xMulti.val.array.rows; 
    pxArray = (LPXLOPER12)GlobalLock(hArray = GlobalAlloc(GMEM_ZEROINIT, rwcol * sizeof(XLOPER12)));
    xMulti.val.array.lparray = pxArray;
    for(i = 0; i < rwcol; i++) 
    {
        pxArray[i].xltype = xltypeInt;
        pxArray[i].val.w = i;
    }
// Word of caution - returning static XLOPERs/XLOPER12s is not thread safe
// for UDFs declared as thread safe, use alternate memory allocation mechanisms
    return (LPXLOPER12)&xMulti;
}
void WINAPI xlAutoFree12(LPXLOPER12 pxFree)
{
    GlobalUnlock(hArray);
    GlobalFree(hArray);
    return;
}
//////////////////////////////////////////
//       BEGIN EXAMPLE IMPLEMENTATION 2
//////////////////////////////////////////
void WINAPI xlAutoFree12(LPXLOPER12 pxFree)
{
    if(pxFree->xltype & xltypeMulti)
    {
/* Assume all string elements were allocated using malloc, and
** need to be freed using free.  Then free the array itself.
*/
        int size = pxFree->val.array.rows *
            pxFree->val.array.columns;
        LPXLOPER12 p = pxFree->val.array.lparray;
        for(; size-- > 0; p++) // check elements for strings
            if(p->xltype == xltypeStr)
                free(p->val.str);
        free(pxFree->val.array.lparray);
    }
    else if(pxFree->xltype & xltypeStr)
    {
        free(pxFree->val.str);
    }
    else if(pxFree->xltype & xltypeRef)
    {
        free(pxFree->val.mref.lpmref);
    }
}
//////////////////////////////////////////
//       BEGIN EXAMPLE IMPLEMENTATION 3
//////////////////////////////////////////
LPXLOPER12 WINAPI example_xll_function(LPXLOPER12 pxArg)
{
// Thread-safe return value. Every invocation of this function
// gets its own piece of memory.
    LPXLOPER12 pxRtnValue = (LPXLOPER12)malloc(sizeof(XLOPER12));
// Initialize to a safe default
    pxRtnValue->xltype = xltypeNil;
// Set the value of pxRtnValue making sure that strings, external
// references, arrays, and strings within arrays are all dynamically
// allocated using malloc.
//    (code omitted)
//    ...
// Set xlbitDLLFree regardless of the type of the return value to
// ensure xlAutoFree12 is called and pxRtnValue is freed.
    pxRtnValue->xltype |= xlbitDLLFree;
    return pxRtnValue;
}
void WINAPI xlAutoFree12(LPXLOPER pxFree)
{
    if(pxFree->xltype & xltypeMulti)
    {
// Assume all string elements were allocated using malloc, and
// need to be freed using free. Then free the array itself.
        int size = pxFree->val.array.rows *
            pxFree->val.array.columns;
        LPXLOPER12 p = pxFree->val.array.lparray;
        for(; size-- > 0; p++) // check elements for strings
            if(p->xltype == xltypeStr)
                free(p->val.str);
        free(pxFree->val.array.lparray);
    }
    else if(pxFree->xltype & xltypeStr)
    {
        free(pxFree->val.str);
    }
    else if(pxFree->xltype & xltypeRef)
    {
        free(pxFree->val.mref.lpmref);
    }
// Assume pxFree was itself dynamically allocated using malloc.
    free(pxFree);
}

関連項目

アドイン マネージャーと XLL インターフェイス関数